Section INITMEM_EXISTS.
Variable ge: t.

Lemma alloc_global_exists:
forall m idg,
match idg with
| (id, Gfun f) => True
| (id, Gvar v) =>
init_data_list_aligned 0 v.(gvar_init)
/\ forall i o, In (Init_addrof i o) v.(gvar_init) -> exists b, find_symbol ge i = Some b
end ->
exists m', alloc_global ge m idg = Some m'.