reserve AS for AffinSpace;
reserve A,K,M,X,Y,Z,X9,Y9 for Subset of AS;
reserve zz for Element of AS;
reserve x,y for set;

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