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