proposition: Proposition invertible_horizontal_square_inv_right {x y : B} {h₁ h₂ : x --> y} (s : invertible_horizontal_square h₁ h₂) : comp_hor_globular_square s (inv_of_invertible_horizontal_square s) = id_v_square_bicat h₁.
proof: Proof. exact (pr12 s). Qed.
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat UniMath.CategoryTheory.TwoSidedDisplayedCats.Isos UniMath.CategoryTheory.TwoSidedDisplayedCats.Univalence UniMath.CategoryTheory.TwoSidedDisplayedCats.Discrete UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Unitors UniMath.Bicategories.DoubleCategories.DoubleBicat.VerityDoubleBicat UniMath.Bicategories.DoubleCategories.DoubleBicat.DerivedLaws