fact: Definition natmultabmonoid : abmonoid := make_abmonoid (make_setwithbinop natset (λ n m : nat, n * m)) (make_dirprod (make_dirprod natmultassoc (@make_isunital natset _ 1 (make_dirprod natmultl1 natmultr1))) natmultcomm).
imports: UniMath.Foundations.NaturalNumbers UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.NegativePropositions UniMath.Algebra.Archimedean UniMath.Algebra.Domains_and_Fields UniMath.Algebra.IteratedBinaryOperations