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 gsep_trans': forall {F V} (ge: Genv.t F V) mu mu' mu'', SM_wd mu'' -> intern_incr mu' mu'' -> globals_separate ge mu mu' -> globals_separate ge mu' mu'' -> globals_separate ge mu mu''.