fact: Variables (a : So) (I_lt_a J_lt_a : forall b, b <B a -> set Te) (e : forall b (h : b <B a), I_lt_a h [=] J_lt_a h).
imports: Coq(IndefiniteDescription Structures.OrderedType) CoLoR(LogicUtil SN LCompSimple Tarski VecUtil SetUtil RelUtil)