let N be with_non-empty_elements set ; :: thesis: for i being Instruction of (STC N) holds i is jump-only
let i be Instruction of (STC N); :: thesis: i is jump-only
set M = STC N;
A1:
( the carrier of (STC N) = NAT \/ {NAT } & the Instruction-Counter of (STC N) = NAT & NAT = NAT )
by Def11;
let s be State of (STC N); :: according to AMISTD_1:def 3,AMISTD_1:def 4 :: thesis: for o being Object of (STC N)
for I being Instruction of (STC N) st InsCode I = InsCode i & o <> IC (STC N) holds
(Exec I,s) . o = s . o
let o be Object of (STC N); :: thesis: for I being Instruction of (STC N) st InsCode I = InsCode i & o <> IC (STC N) holds
(Exec I,s) . o = s . o
let I be Instruction of (STC N); :: thesis: ( InsCode I = InsCode i & o <> IC (STC N) implies (Exec I,s) . o = s . o )
assume that
InsCode I = InsCode i
and
A2:
o <> IC (STC N)
; :: thesis: (Exec I,s) . o = s . o
( o in NAT or o in {NAT } )
by A1, XBOOLE_0:def 3;
then reconsider l = o as Instruction-Location of STC N by A1, A2, AMI_1:def 4, TARSKI:def 1;
(Exec i,s) . l = s . l
by AMI_1:def 13;
hence
(Exec I,s) . o = s . o
by AMI_1:def 13; :: thesis: verum