let P be Instruction-Sequence of SCM+FSA; :: thesis: for s being State of SCM+FSA
for I being parahalting Program of SCM+FSA
for a being Int-Location st not I destroys a holds
(IExec (I,P,s)) . a = (Initialized s) . a
let s be State of SCM+FSA; :: thesis: for I being parahalting Program of SCM+FSA
for a being Int-Location st not I destroys a holds
(IExec (I,P,s)) . a = (Initialized s) . a
set D = Data-Locations ;
let I be parahalting Program of SCM+FSA; :: thesis: for a being Int-Location st not I destroys a holds
(IExec (I,P,s)) . a = (Initialized s) . a
let a be Int-Location ; :: thesis: ( 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 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 Th90
.= (Initialize (Initialized s)) . a by EXTPRO_1:2
.= (Initialized s) . a by A1, SCMFSA6A:7 ;
:: thesis: verum