Opaque Mem.storebytes.

Lemma mem_obs_eq_changePerm:
forall mc mf rmap rmapF rmap' rmapF' f
(Hlt: permMapLt rmap (getMaxPerm mc))
(HltF: permMapLt rmapF (getMaxPerm mf))
(Hlt': permMapLt rmap' (getMaxPerm mc))
(HltF': permMapLt rmapF' (getMaxPerm mf))
(Hrmap: forall b1 b2 ofs,
f b1 = Some b2 ->
rmap' # b1 ofs = rmapF' # b2 ofs)
(Hobs_eq: mem_obs_eq f (restrPermMap Hlt) (restrPermMap HltF))
(Hnew: forall b ofs, Mem.perm_order' (rmap' # b ofs) Readable ->
Mem.perm_order' (rmap # b ofs) Readable),
mem_obs_eq f (restrPermMap Hlt') (restrPermMap HltF').