Require Export GeoCoq.Tarski_dev.Ch04_col.
Section Equivalence_between_decidability_properties_of_basic_relations.
Context `{Tn:Tarski_neutral_dimensionless}.

Lemma eq_dec_implies_l2_11 :
(forall A B:Tpoint, A=B \/ A<>B) ->
forall A B C A' B' C',
Bet A B C -> Bet A' B' C' -> Cong A B A' B' -> Cong B C B' C' -> Cong A C A' C'.