Require Export GeoCoq.Elements.OriginalProofs.lemma_samesidesymmetric.
Require Export GeoCoq.Elements.OriginalProofs.lemma_inequalitysymmetric.
Section Euclid.
Context `{Ax1:euclidean_neutral}.

Lemma lemma_tarskiparallelflip :
forall A B C D,
TP A B C D ->
TP B A C D /\ TP A B D C /\ TP B A D C.