fact: Definition cell_to_pb_obj_pr1 {a b₁ b₂ b₃ : B} {f : b₁ --> b₃} {g : b₂ --> b₃} {h₁ h₂ : a --> f /≃ g} (α : h₁ · π₁ ==> h₂ · π₁) (β : h₁ · π₂ ==> h₂ · π₂) (p : cell_to_pb_obj_homot α β) : cell_to_pb_obj α β p ▹ π₁ = α.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Unitors UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Limits.Pullbacks