Definition op_enriched_psfunctor_data : psfunctor_data (op2_bicat (bicat_of_enriched_cats V)) (bicat_of_enriched_cats V). Proof. use make_psfunctor_data. - refine (λ (E : enriched_cat V), _). use make_enriched_cat. + exact (op_unicat E). + exact (op_enrichment V E). - refine (λ (E₁ E₂ : enriched_cat V) (F : enriched_functor _ _), _). use make_enriched_functor. + exact (functor_opp F). + exact (functor_op_enrichment V (enriched_functor_enrichment F)). - refine (λ (E₁ E₂ : enriched_cat V) (F₁ F₂ : enriched_functor _ _) (τ : enriched_nat_trans _ _), _). use make_enriched_nat_trans. + exact (op_nt τ). + exact (nat_trans_op_enrichment V _ τ). - refine (λ (E : enriched_cat V), _). use make_enriched_nat_trans. + exact (functor_identity_op _). + exact (functor_identity_op_enrichment V E). - refine (λ (E₁ E₂ E₃ : enriched_cat V) (F G : enriched_functor _ _), _). use make_enriched_nat_trans. + exact (functor_comp_op _ _). + exact (functor_comp_op_enrichment V (enriched_functor_enrichment F) (enriched_functor_enrichment G)). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.Univalence. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.Core.NaturalTransformations. Require Import UniMath.CategoryTheory.whiskering. Require Import UniMath.CategoryTheory.opp_precat. Require Import UniMath.CategoryTheory.OppositeCategory.Core. Require Import UniMath.CategoryTheory.EnrichedCats.Enrichment. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentFunctor. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentTransformation. Require Import UniMath.CategoryTheory.EnrichedCats.Examples.OppositeEnriched. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Monoidal.Structure.Symmetric. Require Import UniMath.Bicategories.Core.Bicat. Import Bicat.Notations. Require Import UniMath.Bicategories.Core.Examples.BicatOfUnivCats. Require Import UniMath.Bicategories.Core.Examples.OpCellBicat. Require Import UniMath.Bicategories.DisplayedBicats.Examples.EnrichedCats. Require Import UniMath.Bicategories.PseudoFunctors.Display.PseudoFunctorBicat. Require Import UniMath.Bicategories.PseudoFunctors.PseudoFunctor.