for l being Element of NAT holds NIC (AddTo a,k1,b,k2),l = {(succ l)} by Th16;
hence JUMP (AddTo a,k1,b,k2) is empty by Th8; :: thesis: verum