begin
begin
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem Th12:
for
k being
Element of
NAT for
p being
autonomic FinPartState of
SCM+FSA for
s1,
s2 being
State of
SCM+FSA st
IC in dom p &
NPP p c= s1 &
NPP (Relocated (p,k)) c= s2 holds
for
P1,
P2 being the
Instructions of
SCM+FSA -valued ManySortedSet of
NAT st
ProgramPart p c= P1 &
Reloc (
(ProgramPart p),
k)
c= P2 holds
for
i being
Element of
NAT holds
(
(IC (Comput (P1,s1,i))) + k = IC (Comput (P2,s2,i)) &
IncAddr (
(CurInstr (P1,(Comput (P1,s1,i)))),
k)
= CurInstr (
P2,
(Comput (P2,s2,i))) &
(Comput (P1,s1,i)) | (dom (DataPart p)) = (Comput (P2,s2,i)) | (dom (DataPart p)) &
DataPart (Comput (P1,(s1 +* (DataPart s2)),i)) = DataPart (Comput (P2,s2,i)) )