| 0 ≤ i, 2 ^ i ≤ i0, i0 < 2 ^ (i + 1), 0 < i0 * 2 + j1, 2 ^ i < 2 ^ (i + 1), 0 ≤ j1, j1 < 2, 0 ≤ i0, 0 < 2 ^ (i + 1), ∀ j0. i→n(j0) < i→n(i0 * 2 + j1) → 0 < j0 → (∃ i. 0 ≤ i ∧ 2 ^ i ≤ j0 ∧ j0 < 2 ^ (i + 1)) ⊦ i0 * 2 + j1 = 1, i0 * 2 + j1 = 0, 0 ≤ i + 1 ∧ 2 ^ (i + 1) ≤ i0 * 2 + j1 ∧ i0 * 2 + j1 < 2 ^ (2 + i) |
⊦ 0 < i → j ^ i = j ^ i -1 * j
0 < i + 1, 0 ≤ i, 2 ^ i ≤ i0, i0 < 2 ^ (i + 1)-1 * 2, 0 < i0 * 2 + j1, 2 ^ i < 2 ^ (i + 1)-1 * 2, 0 ≤ j1, j1 < 2, 0 ≤ i0, 0 < 2 ^ (i + 1)-1 * 2, ∀ j0. i→n(j0) < i→n(i0 * 2 + j1) → 0 < j0 → (∃ i. 0 ≤ i ∧ 2 ^ i ≤ j0 ∧ j0 < 2 ^ (i + 1)) ⊦ i0 * 2 + j1 = 1, i0 * 2 + j1 = 0, 0 ≤ i + 1 ∧ 2 ^ (i + 1)-1 * 2 ≤ i0 * 2 + j1 ∧ i0 * 2 + j1 < 2 ^ (2 + i)
Used simplifier rules: numls-02: ⊦ (* j) < i0 + (* j0) ↔ j - j0 < i0; from specification int-abs%mone-06: ⊦ ~1 < i ↔ 0 ≤ i; from specification int-abs%lels-01: ⊦ ¬ i ≤ j ↔ j < i; from specification int-abs%lels-04: ⊦ i ≤ j → (¬ ¬ j < i ↔ false); from specification int-abs%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-c: ⊦ i + j = j + i; from specification int-basic2 Used terms: i + 1, 2