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

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