consider w being State of SCM;
set t = w +* (((dl. 0),(dl. 1)) --> (0,1));
A6: InsCode (AddTo (a,b)) = 2 by RECDEF_2:def 1
.= InsCode (AddTo ((dl. 0),(dl. 1))) by RECDEF_2:def 1 ;
A7: dom (((dl. 0),(dl. 1)) --> (0,1)) = {(dl. 0),(dl. 1)} by FUNCT_4:65;
then dl. 0 in dom (((dl. 0),(dl. 1)) --> (0,1)) by TARSKI:def 2;
then A8: (w +* (((dl. 0),(dl. 1)) --> (0,1))) . (dl. 0) = (((dl. 0),(dl. 1)) --> (0,1)) . (dl. 0) by FUNCT_4:14
.= 0 by AMI_3:52, FUNCT_4:66 ;
XX: dl. 0 in Data-Locations SCM by AMI_3:73;
dl. 1 in dom (((dl. 0),(dl. 1)) --> (0,1)) by A7, TARSKI:def 2;
then (w +* (((dl. 0),(dl. 1)) --> (0,1))) . (dl. 1) = (((dl. 0),(dl. 1)) --> (0,1)) . (dl. 1) by FUNCT_4:14
.= 1 by FUNCT_4:66 ;
then ( dl. 0 <> IC SCM & (Exec ((AddTo ((dl. 0),(dl. 1))),(w +* (((dl. 0),(dl. 1)) --> (0,1))))) . (dl. 0) = 0 + 1 ) by A8, AMI_3:9, AMI_3:57;
hence for b₁ being InsType of SCM st b₁ = InsCode (AddTo (a,b)) holds
not b₁ is jump-only by A6, A8, AMISTD_1:def 3, XX; :: thesis: verum