let N be with_zero set ; :: thesis: for S being non empty with_non-empty_values IC-Ins-separated AMI-Struct over N
for I being Instruction of S st I is halting holds
JUMP I is empty

let S be non empty with_non-empty_values IC-Ins-separated AMI-Struct over N; :: thesis: for I being Instruction of S st I is halting holds
JUMP I is empty

let I be Instruction of S; :: thesis: ( I is halting implies JUMP I is empty )
assume I is halting ; :: thesis: JUMP I is empty
then for l being Nat holds NIC (I,l) = {l} by AMISTD_1:2;
hence JUMP I is empty by AMISTD_1:1; :: thesis: verum