fact: Definition machine_goes_wrong (C: code) (s_init: store) : Prop := exists pc σ s, transitions C (0, nil, s_init) (pc, σ, s) /\ irred (transition C) (pc, σ, s) /\ (instr_at C pc <> Some Ihalt \/ σ <> nil).
imports: Coq(Arith ZArith Psatz Bool String List Program.Equality) CDF(Sequences IMP Simulation)