| # int2bits(i) = m + 1, mklist(i < 0, i→n(j)) + int2bits(i) = true ' + bits, j < 32, 0 ≤ j ⊦ bits2int(true ' + sublist(0, m, bits)) < 0 ↔ ¬ 0 < i, mklist(¬ 0 < i, i→n(j)) + int2bits(i) = [], i = 0 |
⊦ bits2int(true ' + bits) = ~ bits2uint(bitsinvert(true + bits) +1)
# int2bits(i) = m + 1, mklist(i < 0, i→n(j)) + int2bits(i) = true ' + bits, j < 32, 0 ≤ j ⊦ ~ bits2uint(bitsinvert(true + sublist(0, m, bits)) +1) < 0 ↔ ¬ 0 < i, mklist(¬ 0 < i, i→n(j)) + int2bits(i) = [], i = 0
Used terms: sublist(0, m, bits)