theorem
  x is Element of the Points of ProjHorizon(AS) iff ex X st x=LDir(X) &
  X is being_line by Th14;
