End GenConseq.
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:
forall (R': ret_assert) Espec {cs: compspecs} Delta (R: ret_assert) P c,
local (tc_environ Delta) && RA_normal R' |-- RA_normal R ->
local (tc_environ Delta) && RA_break R' |-- RA_break R ->
local (tc_environ Delta) && RA_continue R' |-- RA_continue R ->
(forall vl, local (tc_environ Delta) && RA_return R' vl |-- RA_return R vl) ->
@semax cs Espec Delta P c R' ->  @semax cs Espec Delta P c R.