fact: Definition make_disp_mnd_mor {m₁ m₂ : mnd B} {f : m₁ --> m₂} {dm₁ : disp_mnd m₁} {dm₂ : disp_mnd m₂} (ff : ob_of_disp_mnd dm₁ -->[ mor_of_mnd_mor f] ob_of_disp_mnd dm₂) (Hff : ff ;; endo_of_disp_mnd dm₂ ==>[ mnd_mor_endo f] endo_of_disp_mnd dm₁ ;; ff) : disp_mnd_mor f dm₁ dm₂ := ff ,, Hff.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.DisplayedCats.Core UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.Unitors UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.DisplayedBicats.Examples.EndoMap UniMath.Bicategories.DisplayedBicats.Examples.MonadsLax