fact: Definition israpbinop {X : tightapSet} (op : binop X) := ∏ x, isapunop (λ y, op x y).
imports: UniMath.Algebra.BinaryOperations UniMath.Foundations.Propositions UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions