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

Lemma project_existence : forall P A B X Y,
X<>Y -> A<>B ->
~ Par X Y A B ->
exists! P', Proj P P' A B X Y.