fact: Definition flattenT_eq {X : Type} : forall {t : Telescope}, relation (flattenT t X) := Eval unfold flattenT_R_relation, forall_relation in @flattenT_R_relation X eq.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Relations.Relation_Definitions Coq.Classes.Morphisms