Definition enriched_bifunctor_curried_bifunctor_weq {V : sym_monoidal_cat} {C₁ C₂ C₃ : category} (E₁ : enrichment C₁ V) (E₂ : enrichment C₂ V) (E₃ : enrichment C₃ V) : enriched_functor (tensor_enriched_precat E₁ E₂) (make_enriched_cat (C₃ ,, E₃)) ≃ enriched_curried_bifunctor E₁ E₂ E₃. Proof. use weq_iso. - exact enriched_bifunctor_to_curried_bifunctor. - exact enriched_curried_bifunctor_to_bifunctor. - abstract (intro F ; apply idpath). - abstract (intro F ; apply idpath). 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.Enriched.Enriched. Require Import UniMath.CategoryTheory.EnrichedCats.Enriched.EnrichmentEquiv. Require Import UniMath.CategoryTheory.EnrichedCats.Examples.Tensor. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Monoidal.WhiskeredBifunctors. Require Import UniMath.CategoryTheory.Monoidal.Structure.Symmetric. Require Import UniMath.CategoryTheory.Monoidal.Structure.SymmetricDiagonal. Import MonoidalNotations. Section FromBifunctor. End FromBifunctor.