| ⊦ i i>> j = (# int2bits(i) ≤ i→n(band(band(j, 31), 31)) ⊃ (i < 0 ⊃ ~1;0);bits2int(sublist(0, # int2bits(i) - i→n(band(band(j, 31), 31)), int2bits(i)))) |
⊦ band(band(i, j), j) = band(i, j)
⊦ i i>> j = (# int2bits(i) ≤ i→n(band(j, 31)) ⊃ (i < 0 ⊃ ~1;0);bits2int(sublist(0, # int2bits(i) - i→n(band(j, 31)), int2bits(i))))
Used terms: 31, j