fact: Definition isapbinop {X : tightapSet} (op : binop X) := (islapbinop op) × (israpbinop op).
imports: UniMath.Algebra.BinaryOperations UniMath.Foundations.Propositions UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions