fact: Definition p_release (p q : X -> Prop) pi := forall n, (exists2 m, m < n & p (pi m)) \/ q (pi n).
imports: mathcomp.ssreflect.ssreflect mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base modular_hilbert sltype)