Section X86Context.
Context {initU: seq.seq nat}
{the_program: Asm.program}.
Notation the_ge := (@the_ge the_program).
Context {Hsafe : safe_genv the_ge}.
Instance X86Sem: Semantics := @X86Sem the_program Hsafe.

Lemma exec_load_same_mem:
forall ch m a rs rd rs' m',
exec_load the_ge ch m a rs rd = Next rs' m' ->
m=m'.