let s be State of SCM+FSA; :: thesis: for a being Int-Location
for p being Instruction-Sequence of SCM+FSA
for I being really-closed Program of SCM+FSA st I is_halting_on Initialized s,p & not I destroys a holds
(IExec (I,p,s)) . a = (Initialized s) . a
let a be Int-Location; :: thesis: for p being Instruction-Sequence of SCM+FSA
for I being really-closed Program of SCM+FSA st I is_halting_on Initialized s,p & not I destroys a holds
(IExec (I,p,s)) . a = (Initialized s) . a
let p be Instruction-Sequence of SCM+FSA; :: thesis: for I being really-closed Program of SCM+FSA st I is_halting_on Initialized s,p & not I destroys a holds
(IExec (I,p,s)) . a = (Initialized s) . a
let I be really-closed Program of SCM+FSA; :: thesis: ( I is_halting_on Initialized s,p & not I destroys a implies (IExec (I,p,s)) . a = (Initialized s) . a )
A1: DataPart (Initialized s) = DataPart (Initialize (Initialized s)) by MEMSTR_0:79;
assume ( I is_halting_on Initialized s,p & not I destroys a ) ; :: thesis: (IExec (I,p,s)) . a = (Initialized s) . a
hence (IExec (I,p,s)) . a = (Comput ((p +* I),(Initialize (Initialized s)),0)) . a by Th51
.= (Initialize (Initialized s)) . a
.= (Initialized s) . a by A1, SCMFSA_M:2 ;
:: thesis: verum