fact: Definition presented_monoid_intro {X : hSet} {R : hrel (free_monoid X)} : X → presented_monoid X R := presented_monoid_pr R ∘ free_monoid_unit.
imports: UniMath.MoreFoundations.Subtypes UniMath.MoreFoundations.Sets UniMath.Algebra.Monoids UniMath.Algebra.Groups UniMath.Algebra.IteratedBinaryOperations UniMath.Combinatorics.Lists