proposition: Lemma ispoabmonoidfracrelint (X : abmonoid) (A : subabmonoid X) {L : hrel X} (is : ispartbinophrel A L) (isl : ispreorder L) : ispreorder (abmonoidfracrelint X A L).
proof: Proof. split with (istransabmonoidfracrelint X A is (pr1 isl)). apply (isreflabmonoidfracrelint X A is (pr2 isl)). Defined.
imports: UniMath.Algebra.BinaryOperations UniMath.MoreFoundations.Subtypes UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders