Definition enriched_weighted_to_conical_cone : enriched_conical_lim_cone D. Proof. use make_enriched_conical_lim_cone. - exact a. - exact (λ i, enriched_to_arr E (enriched_lim_cone_pr _ _ _ a i)). - abstract (intros i j f ; cbn ; use (invmaponpathsweq (make_weq _ (isweq_enriched_from_arr E _ _))) ; cbn ; rewrite enriched_from_to_arr ; pose (enriched_lim_cone_commute _ _ _ a f) as p ; cbn in p ; rewrite id_left in p ; rewrite <- p ; rewrite enriched_from_arr_comp ; rewrite enriched_from_to_arr ; rewrite tensor_split ; rewrite !assoc ; rewrite <- tensor_linvunitor ; rewrite !assoc' ; apply maponpaths ; rewrite !assoc ; apply idpath). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Univalence. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.OppositeCategory.Core. Require Import UniMath.CategoryTheory.Categories.StandardCategories. Require Import UniMath.CategoryTheory.PrecategoryBinProduct. Require Import UniMath.CategoryTheory.Limits.Ends. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Monoidal.Structure.Symmetric. Require Import UniMath.CategoryTheory.Monoidal.Structure.Closed. Require Import UniMath.CategoryTheory.EnrichedCats.Enrichment. Require Import UniMath.CategoryTheory.EnrichedCats.Examples.SelfEnriched. Require Import UniMath.CategoryTheory.EnrichedCats.Limits.EnrichedConicalLimits. Require Import UniMath.CategoryTheory.EnrichedCats.Limits.EnrichedPowers. Import MonoidalNotations.