fact: Definition comma_category_induced_functor s d (m : morphism ((A -> C)^op * (B -> C)) s d) : Functor (fst s / snd s) (fst d / snd d).
imports: Category.Core Functor.Core NaturalTransformation.Core Category.Dual Category.Prod NaturalTransformation.Identity FunctorCategory.Core Cat.Core InitialTerminalCategory.Core InitialTerminalCategory.Functors HoTT.Tactics Basics.Tactics