reserve X for set;
reserve CS for non empty CollStr;
reserve a,b,c for Point of CS;
reserve CLSP for CollSp;
reserve a,b,c,d,p,q,r for Point of CLSP;

theorem Th6:
  a<>b & a,b,c are_collinear & a,b,d are_collinear implies a,c,d are_collinear
proof
  assume
A1: a<>b & a,b,c are_collinear & a,b,d are_collinear;
  a,b,a are_collinear by Th2;
  hence thesis by A1,Th3;
end;
