proposition: Lemma opfunctorcat_adjdata_functorcatofoppcats_form_adjunction : form_adjunction (opfunctorcat_from_functorcatofoppcats C D) (opfunctorcat_to_functorcatofoppcats C D) (unit_opfunctorcat_functorcatofoppcats C D) (counit_opfunctorcat_functorcatofoppcats C D).
proof: Proof. split. - intro. use nat_trans_eq. { apply homset_property. } intro ; apply id_left. - intro. use nat_trans_eq. { apply homset_property. } intro ; apply id_left. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.FunctorCategory UniMath.CategoryTheory.opp_precat UniMath.CategoryTheory.OppositeCategory.Core UniMath.CategoryTheory.Adjunctions.Core UniMath.CategoryTheory.Equivalences.Core UniMath.CategoryTheory.whiskering