fact: Variables (a : So) (I_lt_a : forall b, b <B a -> set Te) (I_lt_a_cp_aeq : forall b (h : b<B a), cp_aeq (I_lt_a h)) (I_lt_a_cp_sn : forall b (h : b<B a), cp_sn (I_lt_a h)) (I_lt_a_cp_red : forall b (h : b<B a), cp_red (I_lt_a h)) (I_lt_a_cp_neutral : forall b (h : b<B a), cp_neutral (I_lt_a h)) (X : set Te) (X_cp_aeq : cp_aeq X) (X_cp_sn : cp_sn X) (X_cp_red : cp_red X) (X_cp_neutral : cp_neutral X).
imports: Coq(IndefiniteDescription Structures.OrderedType) CoLoR(LogicUtil SN LCompSimple Tarski VecUtil SetUtil RelUtil)