Section INIT.
Variable bc: block_classification.
Hypothesis GMATCH: genv_match bc ge.

Lemma store_init_data_list_sound:
forall idl m b p m' ab,
Genv.store_init_data_list ge m b p idl = Some m' ->
bmatch bc m b ab ->
bmatch bc m' b (store_init_data_list ab p idl).