let a be Int_position ; :: thesis: for P being the Instructions of SCMPDS -valued ManySortedSet of NAT
for s being 0 -started State of SCMPDS
for i being No-StopCode parahalting Instruction of SCMPDS
for j being shiftable parahalting Instruction of SCMPDS holds (IExec ((i ';' j),P,s)) . a = (Exec (j,(Exec (i,(Initialize s))))) . a
let P be the Instructions of SCMPDS -valued ManySortedSet of NAT ; :: thesis: for s being 0 -started State of SCMPDS
for i being No-StopCode parahalting Instruction of SCMPDS
for j being shiftable parahalting Instruction of SCMPDS holds (IExec ((i ';' j),P,s)) . a = (Exec (j,(Exec (i,(Initialize s))))) . a
let s be 0 -started State of SCMPDS; :: thesis: for i being No-StopCode parahalting Instruction of SCMPDS
for j being shiftable parahalting Instruction of SCMPDS holds (IExec ((i ';' j),P,s)) . a = (Exec (j,(Exec (i,(Initialize s))))) . a
let i be No-StopCode parahalting Instruction of SCMPDS; :: thesis: for j being shiftable parahalting Instruction of SCMPDS holds (IExec ((i ';' j),P,s)) . a = (Exec (j,(Exec (i,(Initialize s))))) . a
let j be shiftable parahalting Instruction of SCMPDS; :: thesis: (IExec ((i ';' j),P,s)) . a = (Exec (j,(Exec (i,(Initialize s))))) . a
set Mi = Load i;
thus (IExec ((i ';' j),P,s)) . a = (IExec (((Load i) ';' j),P,s)) . a
.= (Exec (j,(IExec ((Load i),P,s)))) . a by Th46
.= (Exec (j,(Exec (i,(Initialize s))))) . a by Th45 ; :: thesis: verum