proposition: Proposition make_struct_enrichment_laws : struct_enrichment_laws make_struct_enrichment_data.
proof: Proof. intros x y z. use (transportf_struct_mor_prod_via_eq P). - exact (pr1 (enriched_comp E x y z)). - exact (pr2 (enriched_comp E x y z)). - intros fg ; cbn. unfold enriched_hom_to_mor. rewrite (enriched_to_arr_comp E). apply maponpaths. use eq_mor_hset_struct. intro t ; induction t. apply idpath. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Core.Univalence UniMath.CategoryTheory.DisplayedCats.Structures.CartesianStructure UniMath.CategoryTheory.DisplayedCats.Structures.StructureLimitsAndColimits UniMath.CategoryTheory.Monoidal.WhiskeredBifunctors UniMath.CategoryTheory.Monoidal.Categories UniMath.CategoryTheory.Monoidal.Structure.Cartesian UniMath.CategoryTheory.Monoidal.Examples.StructuresMonoidal UniMath.CategoryTheory.EnrichedCats.Enrichment UniMath.CategoryTheory.EnrichedCats.EnrichmentFunctor