(* Gabriel Braun March 2013 *)
Require Export GeoCoq.Tarski_dev.Annexes.vectors.
Section Projections.
Context `{T2D:Tarski_2D}.
Context `{TE:@Tarski_euclidean Tn TnEQD}.

Lemma par_col_project :
forall P P' A B X Y ,
A <> B ->
~ Par A B X Y ->
Par P P' X Y ->
Col A B P' ->
Proj P P' A B X Y.