begin
theorem
canceled;
theorem
canceled;
theorem Th3:
theorem Th4:
theorem
theorem
theorem Th7:
theorem
canceled;
theorem Th9:
theorem Th10:
theorem Th11:
theorem Th12:
theorem Th13:
theorem
canceled;
theorem Th15:
theorem Th16:
Lm4:
for T being InsType of SCM+FSA holds
( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 )
theorem Th17:
theorem Th18:
theorem Th19:
theorem Th20:
theorem Th21:
theorem Th22:
theorem
canceled;
theorem Th24:
theorem Th25:
theorem Th26:
theorem Th27:
theorem Th28:
theorem Th29:
theorem Th30:
theorem Th31:
theorem Th32:
theorem Th33:
theorem Th34:
theorem Th35:
theorem Th36:
theorem Th37:
theorem Th38:
theorem Th39:
theorem Th40:
theorem Th41:
theorem Th42:
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem Th53:
theorem Th54:
theorem
canceled;
theorem Th56:
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
theorem
canceled;
Lm5:
for l being Element of NAT
for i being Instruction of SCM+FSA st ( for s being State of SCM+FSA st IC s = l & s . l = i holds
(Exec i,s) . (IC SCM+FSA ) = succ (IC s) ) holds
NIC i,l = {(succ l)}
Lm6:
for i being Instruction of SCM+FSA st ( for l being Element of NAT holds NIC i,l = {(succ l)} ) holds
JUMP i is empty
theorem Th68:
theorem Th69:
theorem Th70:
theorem Th71:
theorem Th72:
theorem Th73:
theorem Th74:
theorem Th75:
theorem Th76:
theorem Th77:
theorem Th78:
theorem Th79:
theorem Th80:
theorem Th81:
theorem Th82:
theorem Th83:
theorem Th84:
theorem Th85:
Lm7:
intloc 0 <> intloc 1
by AMI_3:52;
registration
let a,
b be
Int-Location ;
cluster a := b -> non
jump-only sequential ;
coherence
( not a := b is jump-only & a := b is sequential )
cluster AddTo a,
b -> non
jump-only sequential ;
coherence
( not AddTo a,b is jump-only & AddTo a,b is sequential )
cluster SubFrom a,
b -> non
jump-only sequential ;
coherence
( not SubFrom a,b is jump-only & SubFrom a,b is sequential )
cluster MultBy a,
b -> non
jump-only sequential ;
coherence
( not MultBy a,b is jump-only & MultBy a,b is sequential )
cluster Divide a,
b -> non
jump-only sequential ;
coherence
( not Divide a,b is jump-only & Divide a,b is sequential )
end;
Lm8:
fsloc 0 <> intloc 0
by SCMFSA_2:126;
Lm9:
fsloc 0 <> intloc 1
by SCMFSA_2:126;
theorem
canceled;
theorem
canceled;
theorem Th89:
theorem Th90:
theorem Th91:
theorem Th28:
theorem Th30:
theorem Th31: