| bits2int(bits) * 2 ^ n→i(m) + bits2int(lastn(m, int2bits(i))) = i, int2bits(i) = bits + lastn(m, int2bits(i)), # bits = # int2bits(i) - m, 1 + m < # sgn(lastn(m, int2bits(i))), bits2int(bits) + 1 < bits2int(lastn(m, int2bits(i))), i + 1 < bits2int(lastn(m, int2bits(i))), 0 < bits2int(lastn(m, int2bits(i))), bits2int(bits) + 1 < 2 ^ n→i(m), bits2int(bits) < bits2int(lastn(m, int2bits(i))), i < 2 ^ n→i(m), i + 1 < 2 ^ n→i(m), i < bits2int(lastn(m, int2bits(i))), i < 0, 0 < 2 ^ n→i(m), 0 ≤ bits2int(lastn(m, int2bits(i))), m ≤ # int2bits(i), bits2int(bits) < 0, bits2int(bits) < 2 ^ n→i(m) ⊦ bits2int(lastn(m, int2bits(i))) % 2 ^ n→i(m) = 0, bits = [], m = 0, i % 2 ^ n→i(m) = 0, bits2int(lastn(m, int2bits(i))) = bits2int(lastn(m, int2bits(i))) % 2 ^ n→i(m) |
⊦ # bits ≤ n → ¬ n < # sgn(bits)
Used simplifier rules: ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + j = j + i;% ⊦ n ≤ # bits → # lastn(n, bits) = n;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ ¬ m + n < m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m; Used terms: lastn(m, int2bits(i)), 1 + m