| 0 < 2, i0 + 2 ^ n→i(# bits0) * 2 = 2 * 2 ^ i + 1, i0 ≤ 2 * 2 ^ i, i0 < 2 ^ i * 2, 2 ^ i < 2 * i0, i0 < 2 ^ i, 1 < 2 ^ i, 0 < 2 ^ i, 0 ≤ i0, 0 < i0, 1 < i, 1 < i0, 0 < i, 0 ≤ i, 0 ≤ 2 ^ i, ∀ j0, i. i→n(j0) < i→n(2 * i0 + 0) → 0 < i ∧ 0 ≤ j0 ∧ 2 ^ i < j0 ∧ j0 < 2 * 2 ^ i → sgn(uint2bits(2 ^ (i + 2) - j0).rest) = uint2bits(2 ^ (i + 2) - j0).rest ⊦ sgn(true ' + (0 = 1)') = (true ' + bits0) + (0 = 1)', (2 * 2) * 2 ^ i = 1 + 2 * i0, false ∈ bits0 |
i0 + 2 ^ n→i(# bits0) * 2 = 2 * 2 ^ i + 1, i0 ≤ 2 * 2 ^ i, i0 < 2 ^ i * 2, 2 ^ i < 2 * i0, i0 < 2 ^ i, 1 < 2 ^ i, 0 < 2 ^ i, 0 ≤ i0, 0 < i0, 1 < i, 1 < i0, 0 < i, 0 ≤ i, 0 ≤ 2 ^ i, ∀ j0, i. i→n(j0) < i→n(2 * i0 + 0) → 0 < i ∧ 0 ≤ j0 ∧ 2 ^ i < j0 ∧ j0 < 2 * 2 ^ i → sgn(uint2bits(2 ^ (i + 2) - j0).rest) = uint2bits(2 ^ (i + 2) - j0).rest ⊦ bits0 = [], 4 * 2 ^ i = 1 + 2 * i0, false ∈ bits0
Used simplifier rules: ⊦ i * j = j * i;% ⊦ bits = bits0 + bits ↔ bits0 = [];% ⊦ bits + bits0 = bits + bits1 ↔ bits0 = bits1;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ sgn(true ' + false ') = true ' + false ';