Definition ringmultabmonoid (X : commring) : abmonoid := make_abmonoid (make_setwithbinop X op2) (ringop2axs X ,, ringcomm2 X).
Require Import UniMath.Algebra.Groups. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders.