fact: Definition left_adjoint_equivalence_in_disp_map_slice_right_adj_cell : invertible_2cell (pr12 f₂) (r · pr12 f₁) := comp_of_invertible_2cell (linvunitor_invertible_2cell _) (comp_of_invertible_2cell (rwhisker_of_invertible_2cell _ (inv_of_invertible_2cell ε)) (comp_of_invertible_2cell (rassociator_invertible_2cell _ _ _) (lwhisker_of_invertible_2cell _ (inv_of_invertible_2cell (pr22 l))))).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.DisplayedCats.Core UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.Unitors UniMath.Bicategories.Core.BicategoryLaws UniMath.Bicategories.Core.EquivToAdjequiv UniMath.Bicategories.Core.Univalence UniMath.Bicategories.Core.Discreteness UniMath.Bicategories.Morphisms.FullyFaithful UniMath.Bicategories.Morphisms.InternalStreetFibration UniMath.Bicategories.Morphisms.InternalStreetOpFibration UniMath.Bicategories.Morphisms.DiscreteMorphisms UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.DisplayedBicats.DispInvertibles UniMath.Bicategories.DisplayedBicats.DispAdjunctions UniMath.Bicategories.DisplayedBicats.DispUnivalence UniMath.Bicategories.Logic.DisplayMapBicat UniMath.Bicategories.Limits.Pullbacks