| i < 0 ⊦ j = 0, bits2int(firstn(# int2bits(i), mklist(false, i→n(j)) + int2bits(i))) = bits2int(sublist(0, 1 + # int2bits(i), mklist(false, i→n(j)) + false ' + int2bits(i))) |
⊦ sublist(m, n, bits) = firstn(n, restn(m, bits))
i < 0 ⊦ j = 0, bits2int(firstn(# int2bits(i), mklist(false, i→n(j)) + int2bits(i))) = bits2int(firstn(1 + # int2bits(i), restn(0, mklist(false, i→n(j)) + false ' + int2bits(i))))
Used terms: mklist(false, i→n(j)) + false ' + int2bits(i), 1 + # int2bits(i), 0