Definition curried_enriched_transformation_to_nat_trans {V : sym_monoidal_cat} {C₁ C₂ C₃ : category} {E₁ : enrichment C₁ V} {E₂ : enrichment C₂ V} {E₃ : enrichment C₃ V} {F G : enriched_curried_bifunctor E₁ E₂ E₃} (τ : curried_enriched_transformation F G) : enriched_nat_trans (enriched_curried_bifunctor_to_bifunctor F) (enriched_curried_bifunctor_to_bifunctor G). Proof. simple refine (_ ,, _). - exact (λ xy, enriched_from_arr _ (τ (pr1 xy) (pr2 xy))). - abstract (intros xy₁ xy₂ ; exact (curried_enriched_transformation_natural τ (pr1 xy₁) (pr1 xy₂) (pr2 xy₁) (pr2 xy₂))). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Prelude. Require Import UniMath.CategoryTheory.EnrichedCats.Enrichment. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentFunctor. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentTransformation. Require Import UniMath.CategoryTheory.EnrichedCats.Enriched.Enriched. Require Import UniMath.CategoryTheory.EnrichedCats.Enriched.EnrichmentEquiv. Require Import UniMath.CategoryTheory.EnrichedCats.Examples.Tensor. Require Import UniMath.CategoryTheory.EnrichedCats.Bifunctors.CurriedBifunctors. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Monoidal.WhiskeredBifunctors. Require Import UniMath.CategoryTheory.Monoidal.Structure.Symmetric. Import MonoidalNotations.