Module GenConseqFacts
(Def: CLIGHT_SEPARATION_HOARE_LOGIC_DEF)
(Conseq: CLIGHT_SEPARATION_HOARE_LOGIC_CONSEQUENCE with Module CSHL_Def := Def).
(* Copied from canon.v *)

Lemma semax_post_simple:
forall (R': ret_assert) Espec {cs: compspecs} Delta (R: ret_assert) P c,
RA_normal R' |-- RA_normal R ->
RA_break R' |-- RA_break R ->
RA_continue R' |-- RA_continue R ->
(forall vl, RA_return R' vl |-- RA_return R vl) ->
@semax cs Espec Delta P c R' ->  @semax cs Espec Delta P c R.