proposition: Lemma isbinopabgrdiffrel (X : abmonoid) {L : hrel X} (is : isbinophrel L) : @isbinophrel (abgrdiff X) (abgrdiffrel X is).
proof: Proof. intros. apply (isbinopquotrel (binopeqrelabgrdiff X) (iscomprelabgrdiffrelint X is)). apply (isbinopabgrdiffrelint X is). Defined.
imports: UniMath.MoreFoundations.Orders UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.Subtypes UniMath.Algebra.BinaryOperations UniMath.Algebra.Monoids