theorem :: EXTPRO_1:21

for N being non empty with_zero set
for S being non empty with_non-empty_values IC-Ins-separated halting AMI-Struct over N
for P being Instruction-Sequence of S
for s being State of S st ex k being Nat st P halts_at IC (Comput (P,s,k)) holds
for i being Nat holds Result (P,s) = Result (P,(Comput (P,s,i))) by Th8;