| ⊦ j = 0, bits2int(sublist(0, # int2bits(i), mklist(false, i→n(j)) + int2bits(i))) = bits2uint(int2bits(i)) >> j |
⊦ i >> j = bits2int(sublist(0, # int2bits(i), mklist(int2bits(i).first, i→n(j)) + int2bits(i)))
⊦ j = 0, bits2int(sublist(0, # int2bits(i), mklist(false, i→n(j)) + int2bits(i))) = bits2int (sublist(0, # int2bits(bits2uint(int2bits(i))), mklist(int2bits(bits2uint(int2bits(i))).first, i→n(j)) + int2bits(bits2uint(int2bits(i)))))
Used terms: j, bits2uint(int2bits(i))