| j * j = i * j0 * j0, gcd(j, j0) = 1, ∃ i0. j1 * i0 = i, prime(j1), j1 * j1 ≤ i, 0 < j0, 0 < j, 0 ≤ j0, 1 < i, 0 < i, ∀ i0, j, j0. i→n(i0) < i→n(i) → 0 < i0 ∧ 0 < j ∧ 0 < j0 ∧ gcd(j, j0) = 1 ∧ j * j = i0 * j0 * j0 → (∃ i1. i0 = i1 * i1) ⊦ ∃ i0. i = i0 * i0 |
j * j = (j1 * i0) * j0 * j0, gcd(j, j0) = 1, prime(j1), j1 * j1 ≤ j1 * i0, 0 < j0, 0 < j, 0 ≤ j0, 1 < j1 * i0, 0 < j1 * i0, ∀ i1, j, j0. i→n(i1) < i→n(j1 * i0) → 0 < i1 ∧ 0 < j ∧ 0 < j0 ∧ gcd(j, j0) = 1 ∧ j * j = i1 * j0 * j0 → (∃ i2. i1 = i2 * i2) ⊦ ∃ i1. j1 * i0 = i1 * i1
Used simplifier rules: forward-pos: ⊦ i < j ∧ 0 < i → 0 < j ∧ 1 < j; (forward) from specification int-basic1%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs