fact: Definition subobject_classifier_square_commutes {X Y} (m : Monic _ X Y) : m · characteristic_morphism m = TerminalArrow _ _ · true := pr1 (pr2 (iscontrpr1 (subobject_classifier_universal_property m))).
imports: UniMath.Foundations.PartA UniMath.Foundations.PartB UniMath.Foundations.PartD UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Limits.Terminal UniMath.CategoryTheory.Limits.Pullbacks UniMath.CategoryTheory.Monics UniMath.CategoryTheory.Epis UniMath.CategoryTheory.Limits.Equalizers UniMath.CategoryTheory.Subobjects UniMath.CategoryTheory.Categories.HSET.Core UniMath.CategoryTheory.Core.Functors UniMath.Foundations.Sets UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Monics UniMath.CategoryTheory.Subcategory.Core