proposition: Proposition hcomp_split_globular_r_path {C : double_cat} {x : C} {v₁ v₂ : x -->v x} (q₁ : identity_v x = v₁) (q₂ : identity_v x = v₂) : v₁ = v₁ ·v v₂.
proof: Proof. induction q₁, q₂. refine (!_). apply id_v_left. Qed.
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat UniMath.CategoryTheory.TwoSidedDisplayedCats.Univalence UniMath.Bicategories.Core.Bicat UniMath.Bicategories.DoubleCategories.Core.DoubleCats UniMath.Bicategories.DoubleCategories.DerivedLaws.TransportLaws UniMath.Bicategories.DoubleCategories.DerivedLaws.Variations