| max_prime_divisor(j0) ≠ 0, max_prime_divisor(j0) * i0 = j0, i0 * i0 = i1 * i1 * j, prime(max_prime_divisor(j0)), 0 < j, 0 < j0, 0 < max_prime_divisor(j0) * i1, ∀ j1, j, i. i→n(j1) < i→n(j0) → j1 * j1 = j * i * i ∧ 0 < j1 ∧ 0 < j ∧ 0 < i → i = 0 ∨ isSquare(j) ⊦ i0 * i0 = j * i1 * i1 ∧ 0 < i0 ∧ 0 < j ∧ 0 < i1, max_prime_divisor(j0) = 0, i1 = 0, isSquare(j), prime(j0) |
i0 * i0 = i1 * i1 * j, max_prime_divisor(j0) * i0 = j0, 0 < j0, 0 < j, prime(max_prime_divisor(j0)), 0 < i1, 0 < max_prime_divisor(j0), i0 ≤ 0, i0 < j0, i0 < j, i0 < i1, i0 < max_prime_divisor(j0), ∀ j1, j, i. i→n(j1) < i→n(j0) → j1 * j1 = j * i * i ∧ 0 < j1 ∧ 0 < j ∧ 0 < i → i = 0 ∨ isSquare(j) ⊦ max_prime_divisor(j0) = 0, i1 = 0, prime(j0), isSquare(j)
Used simplifier rules: prime-not-neg: ⊦ j < 0 → ¬ prime(j);%lf-02: ⊦ i < j ∧ j = i0 → i < i0; (forward) from specification int-basic1%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs%forward-le-04: ⊦ j ≤ i ∧ i ≤ 0 → j ≤ 0; (forward) from specification int-abs%forward-lels: ⊦ i ≤ j ∧ j < j0 → i < j0; (forward) from specification int-abs%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%zero-gr: ⊦ 0 < i → (0 < i * j ↔ 0 < j); from specification int-mult%zero-gr-01: ⊦ i < 0 → (0 < i * j ↔ j < 0); from specification int-mult%lst-01: ⊦ ¬ i < j → (i ≠ j ↔ j < i); from specification int-basic1%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult