Section Euclid_to_Tarski.
Context `{Ax:euclidean_neutral_ruler_compass}.
Definition Bet A B C := BetS A B C \/ A=B \/ B=C.
Definition TCong A B C D := Cong A B C D \/ (A=B /\ C=D).

Lemma Tcong_reflexive: forall A B, TCong A B A B.