proposition: Lemma another_point : forall A, exists B:ITpoint, A<>B.
proof: Proof. intros. assert (T:=Ilower_dim). elim (eq_dec A beeson_s_axioms.PA);intro. subst. elim (eq_dec beeson_s_axioms.PA beeson_s_axioms.PB);intro. rewrite <- H in *. exfalso. apply T. apply IT_trivial. exists beeson_s_axioms.PB. assumption. exists beeson_s_axioms.PA. assumption. Qed.
imports: GeoCoq.Axioms.beeson_s_axioms GeoCoq.Axioms.tarski_axioms Classical