proposition: Lemma gen_decP C : reflect (gen C) (gen_dec C).
proof: Proof. exact: sumboolP. Qed.
imports: mathcomp.ssreflect.ssreflect mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base sltype) CompDecModal.K(K_def demo gentzen)