Notation the_ge := (@the_ge the_program).

Lemma get_extcall_arg_erase: forall rs rs' m m' l v (Hrs: regs_erasure rs rs') (Hmem: mem_erasure m m') (Harg: get_extcall_arg rs m l = Some v), exists v', get_extcall_arg rs' m' l = Some v' /\ val_erasure v v'.