proposition: Proposition transportf_enriched_l {V : monoidal_cat} {C : category} (E : enrichment C V) {x₁ x₂ : C} (p : x₁ = x₂) {y : C} {v : V} (f : v --> E ⦃ x₁ , y ⦄) : transportf (λ (x : C), v --> E ⦃ x , y ⦄) p f = f · precomp_arr E y (idtoiso (!p)).
proof: Proof. induction p ; cbn. rewrite precomp_arr_id. rewrite id_right. apply idpath. 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.covyoneda UniMath.CategoryTheory.Categories.HSET.All UniMath.CategoryTheory.Monoidal.Categories