fact: Definition enrichment_id_right (x y : C) : mon_runitor (E ⦃ x , y ⦄) = identity _ #⊗ enriched_id E x · enriched_comp E x x y.
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