| ¬ # int2bits(j % 2 ^ i) ≤ i→n(i) + 1, j % 2 ^ i < ~1, i→n(i) ≤ (# fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) - 1) + # int2bits(j / 2 ^ i - 1), j + 2 ^ i ≤ 0, j + 2 ^ i < i, 0 < i, j < 0, j % 2 ^ i + 2 ^ (i - 1) < 0, j < 2 ^ (i - 1), 2 ^ (i - 1) + j < 0, j % 2 ^ i < 0, 2 ^ i + j % 2 ^ i < 0 ⊦ i→n(i) = # fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) - 1, fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) = [], j % 2 ^ i = 0, i = 1, j = ~1, bits2int(lastn(i→n(i), int2bits(j / 2 ^ i - 1) + fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)).rest)) = j % 2 ^ i + 2 ^ i |
j % 2 ^ i < ~1, i→n(i) ≤ (# fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) - 1) + # int2bits(j / 2 ^ i - 1), j + 2 ^ i ≤ 0, j + 2 ^ i < i, 0 < i, j < 0, j % 2 ^ i + 2 ^ (i - 1) < 0, j < 2 ^ (i - 1), 2 ^ (i - 1) + j < 0, j % 2 ^ i < 0, 2 ^ i + j % 2 ^ i < 0, i→n(i) + 1 < # int2bits(j % 2 ^ i) ⊦ i→n(i) = # fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) - 1, fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)) = [], j % 2 ^ i = 0, i = 1, j = ~1, bits2int(lastn(i→n(i), int2bits(j / 2 ^ i - 1) + fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)).rest)) = j % 2 ^ i + 2 ^ i
Used simplifier rules: ⊦ ¬ m ≤ n ↔ n < m;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;