(* End misc lemmas *)

Lemma rel_lvalue_global: forall {CS: compspecs} id ty b P rho,
P |-- !! (Map.get (ve_of rho) id = None /\ Map.get (ge_of rho) id = Some b) ->
P |-- rel_lvalue (Evar id ty) (Vptr b Ptrofs.zero) rho.