fact: Definition disp_pstrans_comp_law : UU := ∏ (x y z : B₁) (f : B₁ ⟦ x, y ⟧) (g : B₁ ⟦ y, z ⟧) (xx : D₁ x) (yy : D₁ y) (zz : D₁ z) (ff : xx -->[ f] yy) (gg : yy -->[ g] zz), (ααdata x xx ◃◃ disp_psfunctor_comp D₁ D₂ F₂ FF₂ ff gg) •• disp_psnaturality_of ααdata (ff;; gg) = transportb (λ p, _ ==>[p] _) (pstrans_comp α f g) (((((disp_lassociator (ααdata x xx) (disp_psfunctor_mor D₁ D₂ F₂ FF₂ ff) (disp_psfunctor_mor D₁ D₂ F₂ FF₂ gg) •• (disp_psnaturality_of ααdata ff ▹▹ disp_psfunctor_mor D₁ D₂ F₂ FF₂ gg)) •• disp_rassociator (disp_psfunctor_mor D₁ D₂ F₁ FF₁ ff) (ααdata y yy) (disp_psfunctor_mor D₁ D₂ F₂ FF₂ gg)) •• (disp_psfunctor_mor D₁ D₂ F₁ FF₁ ff ◃◃ disp_psnaturality_of ααdata gg)) •• disp_lassociator (disp_psfunctor_mor D₁ D₂ F₁ FF₁ ff) (disp_psfunctor_mor D₁ D₂ F₁ FF₁ gg) (ααdata z zz)) •• (disp_psfunctor_comp D₁ D₂ F₁ FF₁ ff gg ▹▹ ααdata z zz)).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.DisplayedCats.Core UniMath.CategoryTheory.DisplayedCats.Constructions UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Examples.Initial UniMath.Bicategories.Core.Examples.Final UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.Core.Univalence UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.DisplayedBicats.DispInvertibles UniMath.Bicategories.DisplayedBicats.DispAdjunctions UniMath.Bicategories.DisplayedBicats.DispUnivalence UniMath.Bicategories.PseudoFunctors.Display.PseudoFunctorBicat UniMath.Bicategories.PseudoFunctors.PseudoFunctor UniMath.Bicategories.PseudoFunctors.Examples.Identity UniMath.Bicategories.PseudoFunctors.Examples.Composition UniMath.Bicategories.Transformations.PseudoTransformation UniMath.Bicategories.Transformations.Examples.Whiskering UniMath.Bicategories.Transformations.Examples.Unitality UniMath.Bicategories.Transformations.Examples.Associativity UniMath.Bicategories.DisplayedBicats.DispPseudofunctor