Module Input.
Definition F: functor := CovariantFunctor_MixVariantFunctor KI.F.
Definition other := KI.other.
Definition Rel A := @eq (F A).
Definition ORel := @eq other.
Definition T := Prop.
Definition T_bot := False.
Definition T_rel (x y:T) := x -> y.

Lemma T_rel_refl : forall x, T_rel x x.