fact: Definition nat_trans_from_univalent_kleisli_cat_help : Left_Kleisli_functor m ∙ (functor_to_kleisli_cat m ∙ G₁) ⟹ Left_Kleisli_functor m ∙ (functor_to_kleisli_cat m ∙ G₂) := nat_trans_comp _ _ _ (nat_trans_comp _ _ _ (post_whisker (nat_z_iso_inv (functor_to_kleisli_cat_incl_nat_z_iso m)) _) α) (post_whisker (functor_to_kleisli_cat_incl_nat_z_iso m) _).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Univalence UniMath.CategoryTheory.Categories.EilenbergMoore UniMath.CategoryTheory.Subcategory.Core UniMath.CategoryTheory.Subcategory.Full UniMath.CategoryTheory.Monads.Monads UniMath.CategoryTheory.Monads.KleisliCategory UniMath.CategoryTheory.whiskering UniMath.CategoryTheory.PrecompEquivalence