(** Semantic preservation for expressions. *)
Section EXPRESSIONS.
Variable cunit: Cminor.program.
Variable hf: helper_functions.
Hypothesis LINK: linkorder cunit prog.
Hypothesis HF: helper_functions_declared cunit hf.

Lemma sel_builtin_res_correct:
forall oid v e v' e',
env_lessdef e e' -> Val.lessdef v v' ->
env_lessdef (set_optvar oid v e) (set_builtin_res (sel_builtin_res oid) v' e').