Hint Resolve expr_closed_addrof expr_closedl_addrof : closed.

(* Specifications: *)
Lemma lvalue_closed_field: forall {cs: compspecs} S e f t,
lvalue_closed_wrt_vars S e ->
lvalue_closed_wrt_vars S (Efield e f t).
Lemma lvalue_closedl_field: forall S e f t,
lvalue_closed_wrt_lvars S e ->
lvalue_closed_wrt_lvars S (Efield e f t).