Notation the_ge := (@the_ge the_program).

Lemma eval_builtin_args_ev_erasure: forall rs rs' sp sp' m m' ba vs T (Hrs: regs_erasure rs rs') (Hsp: val_erasure sp sp') (Hmem: mem_erasure m m') (Hbuiltin_ev: Asm_event.eval_builtin_args_ev _ the_ge rs sp m ba vs T), exists vs' T', Asm_event.eval_builtin_args_ev _ the_ge rs' sp' m' ba vs' T' /\ val_erasure_list vs vs' /\ mem_event_list_erasure T T'.