fact: Definition η_bind_bind {C : category} (M : Monad C) (x : C) : η M (M(M x)) · bind (identity _) · bind (identity _) = μ M x · η M (M x) · bind (identity _).
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.Adjunctions.Core UniMath.CategoryTheory.Monads.Monads UniMath.CategoryTheory.whiskering