Section Tagged_predicates.
Context `{Tn:Tarski_neutral_dimensionless}.
Definition Diff_tagged (A B: Tpoint) := A <> B.
Definition Cong_tagged A B C D := Cong A B C D.

Lemma Cong_tagged_Cong : forall A B C D, Cong_tagged A B C D -> Cong A B C D.