fact: Definition Build_IsTerminalMorphism_curried : forall (A : D) (p : morphism C (U A) X) (Ap := CommaCategory.Build_object U !X A tt p) (m : forall (A' : D) (p' : morphism C (U A') X), morphism D A' A) (H : forall (A' : D) (p' : morphism C (U A') X), p o U _1 (m A' p') = p') (H' : forall (A' : D) (p' : morphism C (U A') X) m', p o U _1 m' = p' -> m A' p' = m'), IsTerminalMorphism Ap := @Build_IsInitialMorphism_curried (C^op) (D^op) X (U^op).
imports: Category.Core Functor.Core Category.Dual Functor.Dual Category.Objects InitialTerminalCategory.Core InitialTerminalCategory.Functors Trunc Types.Sigma HoTT.Tactics Basics.Tactics