fact: Definition em_comnd_ump_mor_cell {a : B} (g : a --> z) (γ : g ==> g · h) (p₁ : γ • (g ◃ ε) = rinvunitor g) (p₂ : (γ • (γ ▹ h)) • rassociator g h h = γ • (g ◃ ν)) : g ==> em_comnd_ump_mor g γ p₁ p₂ · mor_of_em_comnd_cone e := cell_of_em_comnd_cone_mor (pr1 He (make_em_comnd_cone g γ p₁ p₂)).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.Unitors UniMath.Bicategories.Core.TransportLaws UniMath.Bicategories.Core.Univalence UniMath.Bicategories.Core.Examples.OpCellBicat UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.DisplayedBicats.Examples.MonadsLax