Lemma eval_expr_any:
forall {CS: compspecs} rho e v,
eval_expr e any_environ = v ->
v <> Vundef ->
eval_expr e rho = v
with eval_lvalue_any:
forall {CS: compspecs} rho e v,
eval_lvalue e any_environ = v ->
v <> Vundef ->
eval_lvalue e rho = v.