Proposition is_functor_enriched_yoneda : is_functor enriched_yoneda_data. Proof. split. - intros y. use subtypePath. { intro. apply isaprop_nat_trans_enrichment. } use nat_trans_eq ; [ apply homset_property | ]. intros x ; cbn. apply postcomp_arr_id. - intros y₁ y₂ y₃ g₁ g₂. use subtypePath. { intro. apply isaprop_nat_trans_enrichment. } use nat_trans_eq ; [ apply homset_property | ]. intros x ; cbn. apply postcomp_arr_comp. Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Prelude. 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.EnrichedCats.Examples.FunctorCategory. Require Import UniMath.CategoryTheory.EnrichedCats.Examples.SelfEnriched. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Monoidal.Structure.Symmetric. Require Import UniMath.CategoryTheory.Monoidal.Structure.Closed. Require Import UniMath.CategoryTheory.Limits.Equalizers. Require Import UniMath.CategoryTheory.Limits.Products. Import MonoidalNotations.