proposition: Theorem refpred_ref' C : ref F C -> ref' C.
proof: Proof. elim => *; [apply: ref_R1|apply: ref_R2|apply: ref_R3|apply: ref_R4]; eassumption. Qed.
imports: Lia mathcomp.ssreflect.ssreflect mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base sltype) CompDecModal.CTL(CTL_def demo gen_def relaxed_pruning)