| gcd(i, j0) = 1, rational(i, j0) * rational(i, j0) = rational(j, 1), 0 < j0 ⊦ ∃ i. j = i * i |
⊦ j1 ≠ 0 ∧ j2 ≠ 0 → rational(i1, j1) * rational(i2, j2) = rational(i1 * i2, j1 * j2)
j0 ≠ 0 ∧ j0 ≠ 0, gcd(i, j0) = 1, rational(i * i, j0 * j0) = rational(j, 1), 0 < j0 ⊦ ∃ i. j = i * i
Used simplifier rules: ⊦ gcd(i, 0) = abs(i); Used terms: j0, i, j0, i