(*  NOT TRUE, because readable doesn't constraint NoneP ... Lemma readable_VAL: forall w l, readable l (w_m w) <-> exists sh, (VALspec sh l * TT) w.  *)

Lemma VALspec_range_exp_address_mapsto:
forall ch sh l,
(align_chunk ch | snd l) ->
VALspec_range (size_chunk ch) sh l |-- EX v: val, address_mapsto ch v sh l.