| i0 * gcd(i, j) | i ∧ i0 * gcd(i, j) | j ∧ (i ≠ 0 ∨ j ≠ 0) → i0 * gcd(i, j) ≤ gcd(i, j), j = (i0 * i1) * gcd(j, i), i = (i0 * i3) * gcd(i, j), 0 ≤ j, 0 < i, 0 < j, 0 < i0, 1 < i0, 0 ≤ i, 0 < gcd(i, j), 0 ≤ i3, 0 < i3, 0 ≤ i1, 0 < i1, 0 < gcd(j, i) ⊦ |
j = (i0 * i1) * gcd(j, i), i = (i0 * i3) * gcd(i, j), 0 ≤ j, 0 < i, 0 < j, 0 < i0, 1 < i0, 0 ≤ i, 0 < gcd(i, j), 0 ≤ i3, 0 < i3, 0 ≤ i1, 0 < i1, 0 < gcd(j, i) ⊦ i0 * gcd(i, j) | i ∧ i0 * gcd(i, j) | j ∧ (i ≠ 0 ∨ j ≠ 0)
Used simplifier rules: le-same: ⊦ 0 < i → (i * j ≤ i ↔ j ≤ 1); from specification int-mult%bet: ⊦ 0 < i → (i ≤ 1 ↔ i = 1); from specification int-abs%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%commutativity: ⊦ i * j = j * i; from specification int-mult%one-01: ⊦ i = 1 → i * j = j; from specification int-mult%lf-02: ⊦ i < j ∧ j = i0 → i < i0; (forward) from specification int-basic1