Lemma isaprop_islapbinop {X : tightapSet} (op : binop X) : isaprop (islapbinop op). Proof. apply impred_isaprop ; intro x. now apply isaprop_isapunop. Qed.
Require Import UniMath.Foundations.Propositions. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.DecidablePropositions.