End CLIGHT_SEPARATION_HOARE_LOGIC_SET_FORWARD.
Module Type CLIGHT_SEPARATION_HOARE_LOGIC_SET_BACKWARD.
Declare Module CSHL_Def: CLIGHT_SEPARATION_HOARE_LOGIC_DEF.

Axiom semax_set_backward: forall {CS: compspecs} {Espec: OracleKind} (Delta: tycontext),
forall (P: environ->mpred) id e,
@semax CS Espec Delta
(|> ( (tc_expr Delta e) &&
(tc_temp_id id (typeof e) Delta e) &&
subst id (eval_expr e) P))
(Sset id e) (normal_ret_assert P).