let P be Instruction-Sequence of SCMPDS; :: thesis: for s being 0 -started State of SCMPDS
for i being No-StopCode parahalting Instruction of SCMPDS
for J being parahalting shiftable Program of
for a being Int_position holds (IExec ((i ';' J),P,s)) . a = (IExec (J,P,(Initialize (Exec (i,s))))) . a

let s be 0 -started State of SCMPDS; :: thesis: for i being No-StopCode parahalting Instruction of SCMPDS
for J being parahalting shiftable Program of
for a being Int_position holds (IExec ((i ';' J),P,s)) . a = (IExec (J,P,(Initialize (Exec (i,s))))) . a

let i be No-StopCode parahalting Instruction of SCMPDS; :: thesis: for J being parahalting shiftable Program of
for a being Int_position holds (IExec ((i ';' J),P,s)) . a = (IExec (J,P,(Initialize (Exec (i,s))))) . a

let J be parahalting shiftable Program of ; :: thesis: for a being Int_position holds (IExec ((i ';' J),P,s)) . a = (IExec (J,P,(Initialize (Exec (i,s))))) . a
let a be Int_position; :: thesis: (IExec ((i ';' J),P,s)) . a = (IExec (J,P,(Initialize (Exec (i,s))))) . a
thus (IExec ((i ';' J),P,s)) . a = (IExec (((Load i) ';' J),P,s)) . a
.= (IExec (J,P,(Initialize (IExec ((Load i),P,s))))) . a by SCMPDS_5:35
.= (IExec (J,P,(Initialize (Exec (i,s))))) . a by SCMPDS_5:40 ; :: thesis: verum