Require Export GeoCoq.Elements.OriginalProofs.lemma_Euclid4.
Require Export GeoCoq.Elements.OriginalProofs.proposition_14.
Section Euclid.
Context `{Ax:euclidean_neutral_ruler_compass}.

Lemma lemma_righttogether :
forall A B C G,
Per G A B -> Per B A C -> TS G B A C ->
RT G A B B A C /\ BetS G A C.