proposition: Lemma isbinop1funtoringdiff (X : rig) : @isbinopfun (rigaddabmonoid X) (rigtoring X) (toringdiff X).
proof: Proof. intros. unfold isbinopfun. intros x x'. apply (isbinopfuntoabgrdiff (rigaddabmonoid X) x x'). Defined.
imports: UniMath.Algebra.Groups UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders UniMath.Algebra.Monoids