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