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 intern_incr_globals_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)) (GF: forall b, isGlobalBlock ge b = true -> frgnBlocksSrc mu b = true) (WD: SM_wd mu) (WDnu: SM_wd nu), globals_separate ge mu nu.