| 2 ^ (i0 + 1) % 2 = 0 ∧ 0 < 2 ^ (i0 + 1), n→i(n) = i0 + 1, 1 ≤ n, 0 < j, 2 ^ i0 ≤ (2 ^ (i0 + 1) / 2 - 1) >> (j - 1), ∀ n, i, j0. i→n(j0) < i→n(j) → true → i < 0 ∧ # int2bits(i) ≤ n ∧ 0 < j0 ∧ n ≠ 0 → >>>(n, i, j0) < 2 ^ (n→i(n) - 1) ⊦ j = 0, n = 0 |
2 ^ (i0 + 1) % 2 = 0, n→i(n) = i0 + 1, 1 ≤ n, 0 < j, 2 ^ i0 ≤ (2 ^ (i0 + 1) / 2 - 1) >> (j - 1), ~1 ≤ i0, ∀ n, i, j0. i→n(j0) < i→n(j) → true → i < 0 ∧ # int2bits(i) ≤ n ∧ 0 < j0 ∧ n ≠ 0 → >>>(n, i, j0) < 2 ^ (n→i(n) - 1) ⊦ j = 0, n = 0
Used simplifier rules: ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ (* j) ≤ i0 + (* j0) ↔ j - j0 ≤ i0;% ⊦ 0 < 2 ^ i ↔ 0 ≤ i;