Values (intloc 1) = INT
by SCMFSA_2:11;
then reconsider E = 1 as Element of Values (intloc 1) by INT_1:def 1;
Values (intloc 0) = INT
by SCMFSA_2:11;
then reconsider D = 1 as Element of Values (intloc 0) by INT_1:def 1;
reconsider DWA = 2 as Element of INT by INT_1:def 1;
set w = the State of SCM+FSA;
<*DWA*> in INT *
by FINSEQ_1:def 11;
then reconsider F = <*2*> as Element of Values (fsloc 0) by SCMFSA_2:12;
reconsider t = (( the State of SCM+FSA +* ((fsloc 0) .--> F)) +* ((intloc 0) .--> D)) +* ((intloc 1) .--> E) as State of SCM+FSA ;
A1:
t . (intloc 0) = D
by AMI_3:10, BVFUNC14:12;
A2:
t . (fsloc 0) = F
by Lm3, Lm4, FUNCT_7:114;
then
dom (t . (fsloc 0)) = {1}
by FINSEQ_1:2, FINSEQ_1:def 8;
then A3:
1 in dom (t . (fsloc 0))
by TARSKI:def 1;
consider k being Nat such that
A4:
k = |.(t . (intloc 1)).|
and
A5:
(Exec (((intloc 0) := ((fsloc 0),(intloc 1))),t)) . (intloc 0) = (t . (fsloc 0)) /. k
by SCMFSA_2:72;
intloc 0 in Int-Locations
by AMI_2:def 16;
then A6:
intloc 0 in Data-Locations
by SCMFSA_2:100, XBOOLE_0:def 3;
t . (intloc 1) = E
by FUNCT_7:94;
then
k = 1
by A4, ABSVALUE:def 1;
then A7: (Exec (((intloc 0) := ((fsloc 0),(intloc 1))),t)) . (intloc 0) =
(t . (fsloc 0)) . 1
by A5, A3, PARTFUN1:def 6
.=
2
by A2, FINSEQ_1:def 8
;
InsCode (b := (f,a)) =
9
.=
InsCode ((intloc 0) := ((fsloc 0),(intloc 1)))
;
hence
for b1 being InsType of the InstructionsF of SCM+FSA st b1 = InsCode (b := (f,a)) holds
not b1 is jump-only
by A1, A7, A6; verum