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