proposition: Proposition arr_to_copower_commutes {b : C} (f : I_{V} --> v ⊸ (E ⦃ x , b ⦄)) : enriched_from_arr E (arr_to_copower f) · is_copower_enriched_map a b = f.
proof: Proof. unfold arr_to_copower. rewrite enriched_from_to_arr. apply mor_to_copower_commutes. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Univalence UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Monoidal.Categories UniMath.CategoryTheory.Monoidal.Structure.Symmetric UniMath.CategoryTheory.Monoidal.Structure.Closed UniMath.CategoryTheory.EnrichedCats.Enrichment