(* Lemma unchanged_on_sym P m m' b: Mem.unchanged_on P m m' -> Mem.valid_block m b -> Mem.unchanged_on (fun bb z => P bb z /\ bb=b) m' m. *)

Lemma inject_separated_incr_fwd:
forall j j' m1 m2 j'' m2'
(InjSep : inject_separated j j' m1 m2)
(InjSep' : inject_separated j' j'' m1 m2')
(InjIncr' : inject_incr j' j'')
(Fwd: mem_forward m2 m2'),
inject_separated j j'' m1 m2.