set w = the State of (SCM S);
consider e being Element of S such that
A1: e <> 0. S by STRUCT_0:def 18;
reconsider e = e as Element of S ;
set t = the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e));
A2: dom (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e)) = {(dl. (S,0)),(dl. (S,1))} by FUNCT_4:62;
then dl. (S,0) in dom (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e)) by TARSKI:def 2;
then A3: ( the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e))) . (dl. (S,0)) = (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e)) . (dl. (S,0)) by FUNCT_4:13
.= 0. S by AMI_3:10, FUNCT_4:63 ;
A4: InsCode (AddTo (p,q)) = 2
.= InsCode (AddTo ((dl. (S,0)),(dl. (S,1)))) ;
dl. (S,1) in dom (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e)) by A2, TARSKI:def 2;
then A5: ( the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e))) . (dl. (S,1)) = (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e)) . (dl. (S,1)) by FUNCT_4:13
.= e by FUNCT_4:63 ;
dl. (S,0) in Data-Locations by SCMRING2:1;
then A6: dl. (S,0) in Data-Locations by SCMRING2:22;
(Exec ((AddTo ((dl. (S,0)),(dl. (S,1)))),( the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e))))) . (dl. (S,0)) = (( the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e))) . (dl. (S,0))) + (( the State of (SCM S) +* (((dl. (S,0)),(dl. (S,1))) --> ((0. S),e))) . (dl. (S,1))) by SCMRING2:12
.= e by A3, A5, RLVECT_1:4 ;
hence for b1 being InsType of the InstructionsF of (SCM S) st b1 = InsCode (AddTo (p,q)) holds
not b1 is jump-only by A1, A4, A3, A6; :: thesis: verum