Definition globals_separate {F V:Type} (ge: Genv.t F V) mu nu :=
    forall b1 b2 d, as_inj mu b1 = None ->
            as_inj nu b1 =Some(b2,d) ->
            isGlobalBlock ge b2 = false.

Lemma meminj_preserves_globals_intern_incr_separate {F V:Type} (ge': Genv.t F V) mu nu: forall (INC: intern_incr mu nu) (PG: meminj_preserves_globals ge' (as_inj mu)) (WDnu: SM_wd nu) (GSep: globals_separate ge' mu nu), meminj_preserves_globals ge' (as_inj nu).