Module Sset := ToSset (Def) (Conseq) (Extr) (SetB) (PtrCmpB) (LoadB) (CastLoadB).

Theorem semax_prog_sound: forall Espec CS prog z Vspec Gspec,
@DeepEmbedded.DeepEmbeddedDefs.semax_prog Espec CS prog z Vspec Gspec ->
@semax_prog.semax_prog Espec CS prog z Vspec Gspec.