fact: Definition make_ob_eilenberg_moore (x : C) (f : m x --> x) (p : η m x · f = identity x) (q : μ m x · f = # m f · f) : eilenberg_moore_cat := (x ,, _) ,, (p ,, q).
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.Dialgebras UniMath.CategoryTheory.Subcategory.Core UniMath.CategoryTheory.Subcategory.Full UniMath.CategoryTheory.Monads.Monads