fact: Fixpoint flatten_forall {t : Telescope} : flattenT t Type -> Type := match t return flattenT t Type -> Type with | bottom => fun P => P | tele A B => fun P => forall a : A, flatten_forall (P a) end.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Relations.Relation_Definitions Coq.Classes.Morphisms