Notation the_ge := (@the_ge the_program).

Lemma builtin_event_erasure: forall ef m1 m1' vs1 vs1' T1 (Hmem: mem_erasure m1 m1') (Hval_erasure: val_erasure_list vs1 vs1') (Hbuiltin: Asm_event.builtin_event ef m1 vs1 T1), exists T1', Asm_event.builtin_event ef m1' vs1' T1' /\ mem_event_list_erasure T1 T1'.