proposition: Lemma isaprop_israpbinop {X : tightapSet} (op : binop X) : isaprop (israpbinop op).
proof: Proof. apply impred_isaprop ; intro x. now apply isaprop_isapunop. Qed.
imports: UniMath.Algebra.BinaryOperations UniMath.Foundations.Propositions UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions