fact: Definition Build_IsPointedFunctor' {A B : Type} (F : A -> B) `{Is1Cat A, Is1Cat B, !Is0Functor F, !Is1Functor F} `{!IsPointedCat A, !IsPointedCat B, !HasEquivs A, !HasEquivs B} (p : F zero_object $<~> zero_object) : IsPointedFunctor F.
imports: Basics.Overture Basics.Tactics WildCat.Core WildCat.Equiv