Local Hint Resolve valid_block_inject_1 valid_block_inject_2: mem.

Theorem perm_inject_inv:
forall f m1 m2 b1 ofs b2 delta k p,
inject f m1 m2 ->
f b1 = Some(b2, delta) ->
perm m2 b2 (ofs + delta) k p ->
perm m1 b1 ofs k p \/ ~perm m1 b1 ofs Max Nonempty.