fact: Definition comma_ump_eq (τ₁ τ₂ : φ ==> ψ) (τ₁_pr1 : τ₁ ▹ comma_cone_pr1 p = α) (τ₁_pr2 : τ₁ ▹ comma_cone_pr2 p = β) (τ₂_pr1 : τ₂ ▹ comma_cone_pr1 p = α) (τ₂_pr2 : τ₂ ▹ comma_cone_pr2 p = β) : τ₁ = τ₂ := maponpaths pr1 (proofirrelevance _ (isapropifcontr (pr2 Hp q φ ψ α β r)) (τ₁ ,, τ₁_pr1 ,, τ₁_pr2) (τ₂ ,, τ₂_pr1 ,, τ₂_pr2)).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.Univalence