fact: Definition pEU (p q : X -> Prop) (w : X) : Prop := exists pi, [/\ path pi, pi 0 = w & p_until p q pi].
imports: mathcomp.ssreflect.ssreflect mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base modular_hilbert sltype)