fact: Definition bincoprod_ump_1cell_inl (a : B) (ainl : b₁ --> a) (ainr : b₂ --> a) : invertible_2cell (bincoprod_cocone_inl p · bincoprod_ump_1cell ainl ainr) ainl := bincoprod_1cell_inl (has_bincoprod_ump_1 _ H (make_bincoprod_cocone a ainl ainr)).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Univalence UniMath.CategoryTheory.Adjunctions.Core UniMath.CategoryTheory.Equivalences.Core UniMath.CategoryTheory.Equivalences.FullyFaithful UniMath.CategoryTheory.PrecategoryBinProduct UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.Unitors UniMath.Bicategories.Core.Univalence UniMath.Bicategories.Core.AdjointUnique UniMath.Bicategories.Core.Examples.BicatOfUnivCats UniMath.Bicategories.Morphisms.Adjunctions