Section Intuitionistic_Tarski_to_Tarski.
Context `{BTn:intuitionistic_Tarski_neutral_dimensionless}.
Definition BetT A B C := IBet A B C \/ A=B \/ B=C.
(* Lemma 4.1 page 22 *)

Lemma eq_dec_points_from_classic : forall A B : ITpoint, A = B \/ A <> B.