fact: Definition triangle_1_statement_over {C C' : category} {A : adjunction C C'} {D D'} (X : disp_adjunction_data A D D') (FF := left_adj_over X) (ηη := unit_over X) (εε := counit_over X) : UU := ∏ x xx, ♯ FF (ηη x xx) ;; εε _ (FF _ xx) = transportb _ (triangle_id_left_ad A x ) (id_disp _) .
imports: UniMath.Foundations.Sets UniMath.MoreFoundations.PartA UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Adjunctions.Core UniMath.CategoryTheory.Equivalences.Core UniMath.CategoryTheory.DisplayedCats.Core UniMath.CategoryTheory.DisplayedCats.Functors UniMath.CategoryTheory.DisplayedCats.NaturalTransformations UniMath.CategoryTheory.DisplayedCats.Isos UniMath.CategoryTheory.DisplayedCats.Fiber