| # int2bits(j0) = i→n(i) + 1, int2bits(j0) = false ' + bits, 0 < i, j0 < 2 ^ i, 0 < j, 0 ≤ j, 0 < 2 ^ i, 0 ≤ j0, i→n(i) ≤ # bits, false ∈ int2bits(j0) ⊦ i = 0, bitsinvert(uint2bits(j)) + mklist(true, i→n(i)) = [], bits2int(false ' + bits) + 2 ^ n→i(# bits) * j = j * 2 ^ i + j0, bits = [] |
# int2bits(j0) = i→n(i) + 1, int2bits(j0) = false ' + bits, 0 < i, j0 < 2 ^ i, 0 < j, 0 ≤ j, 0 < 2 ^ i, 0 ≤ j0, i→n(i) ≤ # bits, false ∈ int2bits(j0) ⊦ i = 0, bitsinvert(uint2bits(j)) + mklist(true, i→n(i)) = [], bits2int(int2bits(j0)) + 2 ^ n→i(# bits) * j = j * 2 ^ i + j0, bits = []