Section CoincR_for_concyclic.
Context `{TE:Tarski_euclidean}.
Definition ss_ok_for_concy ss interp :=
@ss_ok Tarski_is_a_Arity_for_concy
Tarski_is_a_Coinc_predicates_for_concy ss interp.
Definition st_ok_for_concy st interp :=
@st_ok Tarski_is_a_Arity_for_concy
Tarski_is_a_Coinc_predicates_for_concy st interp.

Lemma st_ok_empty_for_concy : forall interp, st_ok_for_concy STempty interp.