fact: Definition satC (M : fmodel) (w:M) C := [all s in C, evalb (interp s) w].
imports: Relations mathcomp.ssreflect.ssreflect mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base modular_hilbert sltype) CompDecModal.Kstar(Kstar_def)