Definition comnd_mor_comult_law : UU := (comult_of_comnd C₁ ▹ _) • rassociator _ _ _ • (_ ◃ comnd_mor_endo f) • lassociator _ _ _ • (comnd_mor_endo f ▹ _) • rassociator _ _ _ = comnd_mor_endo f • (_ ◃ comult_of_comnd C₂).
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.DisplayedCats.Core. Require Import UniMath.Bicategories.Core.Bicat. Import Bicat.Notations. Require Import UniMath.Bicategories.Core.Examples.OpCellBicat. Require Import UniMath.Bicategories.DisplayedBicats.DispBicat. Import DispBicat.Notations. Require Import UniMath.Bicategories.DisplayedBicats.Examples.MonadsLax.