Section Tarski_is_a_Coinc_theory_for_concyclic.
Context `{TE:Tarski_euclidean}.
Definition not_col : arity Tpoint 3 := fun A B C : Tpoint => ~ Col A B C.

Lemma concy_bd : forall (A : Tpoint) (X : cartesianPower Tpoint 2),
app_2_n concy A A X.