fact: Definition Algebra_laws (X : Algebra_data) : UU := (η T X · Alg_map X = identity X) × (μ T X · Alg_map X = #T (Alg_map X) · Alg_map X).
imports: UniMath.Foundations.PartD UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.whiskering UniMath.CategoryTheory.Adjunctions.Core UniMath.CategoryTheory.Monads.Monads UniMath.CategoryTheory.Monads.Derivative