Require Export GeoCoq.Tarski_dev.Ch16_coordinates.
Section PythagoreanFun.
Context `{T2D:Tarski_2D}.
Context `{TE:@Tarski_euclidean Tn TnEQD}.

Lemma PythRel_exists : forall O E E', ~ Col O E  E' -> forall A B,
Col O E A -> Col O E B ->
exists C, PythRel O E E' A B C.