| j * j = i * j0 * j0, 0 < i, j ≠ 0 ∨ j0 ≠ 0 ⊦ j < 0, 0 < j ∧ 0 < j0, ∃ i0. i = i0 * i0 |
j * j = i * j0 * j0, 0 < i, 0 ≤ j, j ≠ 0 ∨ j0 ≠ 0 ⊦ 0 < j ∧ 0 < j0, ∃ i0. i = i0 * i0
Used simplifier rules: forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs