(* Build an [rmap] that's identical to [phi] except where [m] has stored. *)
Definition inflate_store: rmap.

(* Specifications: *)
Lemma adr_inv0: forall (b b': block) (ofs ofs': Z) (sz: Z), ~ adr_range (b, ofs) sz (b', ofs') -> b <> b' \/ ~ ofs <= ofs' < ofs + sz.
Lemma adr_inv: forall (b b': block) (ofs ofs': Z) ch, ~ adr_range (b, ofs) (size_chunk ch) (b', ofs') -> b <> b' \/ ~ ofs <= ofs' < ofs + size_chunk ch.
Lemma range_inv0: forall ofs ofs' sz, ~ ofs <= ofs' < ofs + sz -> ofs' < ofs \/ ofs' >= ofs + sz.
Lemma range_inv: forall ofs ofs' ch, ~ ofs <= ofs' < ofs + size_chunk ch -> ofs' < ofs \/ ofs' >= ofs + size_chunk ch.
Lemma perm_of_sh_Freeable_top: forall sh, perm_of_sh sh = Some Freeable -> sh = Share.top.
Lemma nextblock_access_empty: forall m b ofs k, (b >= nextblock m)%positive -> access_at m (b, ofs) k = None.