| 0 ≤ 2 ^ (abs(j) - 1) + i, i < 0 ⊦ i >> j = ~1 |
⊦ i >> j = bits2int(sublist(0, # int2bits(i), mklist(int2bits(i).first, i→n(j)) + int2bits(i)))
0 ≤ 2 ^ (abs(j) - 1) + i, i < 0 ⊦ bits2int(sublist(0, # int2bits(i), mklist(int2bits(i).first, i→n(j)) + int2bits(i))) = ~1
Used terms: j, i