theorem Th18:
for
P being
Instruction-Sequence of
SCM+FSA for
I being
MacroInstruction of
SCM+FSA for
a being
read-write Int-Location for
s being
State of
SCM+FSA for
k,
n being
Nat st
IC ((StepWhile>0 (a,I,P,s)) . k) = 0 &
(StepWhile>0 (a,I,P,s)) . k = Comput (
(P +* (while>0 (a,I))),
(Initialize s),
n) holds
(
(StepWhile>0 (a,I,P,s)) . k = Initialize ((StepWhile>0 (a,I,P,s)) . k) &
(StepWhile>0 (a,I,P,s)) . (k + 1) = Comput (
(P +* (while>0 (a,I))),
(Initialize s),
(n + ((LifeSpan (((P +* (while>0 (a,I))) +* I),(Initialize ((StepWhile>0 (a,I,P,s)) . k)))) + 2))) )