Program Definition mapsto_can_store_definition ch v sh (wsh: writable0_share sh) b ofs jm (v':val)
  (MAPSTO: (address_mapsto ch v sh (b, ofs) * TT)%pred (m_phi jm)):
  Memory.mem.

Lemma adr_range_zle_zlt : forall b lo hi ofs, adr_range (b,lo) (hi-lo) (b,ofs) -> zle lo ofs && zlt ofs hi = true.