fact: Definition strict_counit_data_help (F G : psfunctor B₁ B₂) (α : pstrans F G) (X Y : B₁) (f : X --> Y) : (rassociator (id₁ (F X)) ((pr111 α) X) (#G f)) • (id₁ (F X) ◃ (psnaturality_of α f)) • (lassociator (id₁ (F X)) (#F f) (α Y)) • (((lunitor (# F f) • rinvunitor (# F f)) ▹ α Y)) • (rassociator (# F f) (id₁ (F Y)) (α Y)) • (# F f ◃ (lunitor (α Y) • rinvunitor (α Y))) = ((lunitor ((pr111 α) X) • rinvunitor (α X)) ▹ # G f) • (rassociator (α X) (id₁ (G X)) (# G f)) • ((α X ◃ (lunitor (# G f) • rinvunitor (# G f)))) • (lassociator (α X) (# G f) (id₁ (G Y))) • ((psnaturality_of α f ▹ id₁ (G Y))) • rassociator (# F f) (α Y) (id₁ (G Y)).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.DisplayedCats.Core UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.Unitors UniMath.Bicategories.Core.Univalence UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.PseudoFunctors.Display.StrictPseudoFunctorBicat UniMath.Bicategories.PseudoFunctors.Display.PseudoFunctorBicat UniMath.Bicategories.PseudoFunctors.Display.Base UniMath.Bicategories.PseudoFunctors.Display.Map1Cells UniMath.Bicategories.PseudoFunctors.Display.Map2Cells UniMath.Bicategories.PseudoFunctors.Display.StrictIdentitor UniMath.Bicategories.PseudoFunctors.Display.StrictCompositor UniMath.Bicategories.PseudoFunctors.PseudoFunctor UniMath.Bicategories.PseudoFunctors.StrictPseudoFunctor UniMath.Bicategories.Transformations.PseudoTransformation UniMath.Bicategories.Modifications.Modification UniMath.Bicategories.PseudoFunctors.Examples.StrictToPseudo UniMath.Bicategories.PseudoFunctors.Examples.Identity UniMath.Bicategories.PseudoFunctors.Examples.Composition