Module CSHL_Def := Def.Module CConseqFacts := GenCConseqFacts (Def) (CConseq).Module ConseqFacts := GenConseqFacts (Def) (Conseq).

Lemma semax_orp: forall {CS: compspecs} {Espec: OracleKind}, forall Delta P1 P2 c Q, @semax CS Espec Delta P1 c Q -> @semax CS Espec Delta P2 c Q -> @semax CS Espec Delta (P1 || P2) c Q.