Lemma istransabmonoidfracrel (X : abmonoid) (A : subabmonoid X) {L : hrel X} (is : ispartbinophrel A L) (isl : istrans L) : istrans (abmonoidfracrel X A is). Proof. apply istransquotrel. apply istransabmonoidfracrelint. - apply is. - apply isl. Defined.
Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders. Require Import UniMath.Algebra.Monoids2.