fact: Definition demap_id {A B : Type} {DA : A -> Type} `{DHasEquivs A DA} {DB : B -> Type} `{DHasEquivs B DB} (F : A -> B) `{!Is0Functor F, !Is1Functor F} (F' : forall (a : A), DA a -> DB (F a)) `{!IsD0Functor F F', !IsD1Functor F F'} {a : A} {a' : DA a} : DGpdHom (emap_id F) (dcate_fun (demap F F' (did_cate a'))) (dcate_fun (did_cate (F' a a'))).
imports: Basics.Overture Basics.Tactics Basics.Equivalences Types.Sigma WildCat.Core WildCat.Displayed WildCat.Equiv