Module CSHL_MinimumLogic := DeepEmbeddedMinimumSeparationLogic.
Definition semax_set := @DeepEmbeddedMinimumSeparationLogic.SetB.semax_set_backward.
Arguments semax {_} {_} _ _ _ _.

Lemma semax_frame:
forall {CS: compspecs} {Espec: OracleKind},
forall Delta P s R F,
closed_wrt_modvars s F ->
@semax CS Espec Delta P s R ->
@semax CS Espec Delta (P * F) s (frame_ret_assert R F).