fact: Definition tightapSet_apSet (X : tightapSet) : apSet := pr1 X ,, (tightap_aprel (pr2 X)).
imports: UniMath.Algebra.BinaryOperations UniMath.Foundations.Propositions UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions