| prime(j0), j0 * j0 = j * i * i, 0 < j0, 0 < j, 0 < i, ∀ j1, j, i. i→n(j1) < i→n(j0) → j1 * j1 = j * i * i ∧ 0 < j1 ∧ 0 < j ∧ 0 < i → i = 0 ∨ isSquare(j) ⊦ ¬ j0 | j * i * i, i = 0, isSquare(j) |
j0 | j * i * i, prime(j0), j0 * j0 = j * i * i, 0 < j0, 0 < j, 0 < i, ∀ j1, j, i. i→n(j1) < i→n(j0) → j1 * j1 = j * i * i ∧ 0 < j1 ∧ 0 < j ∧ 0 < i → i = 0 ∨ isSquare(j) ⊦ i = 0, isSquare(j)