| i < 0, abs(i) < i0, 0 < i0 - abs(i), i0 - abs(i) < abs(i0) ⊦ gcd(abs(i), i0 - abs(i)) = gcd(abs(i0), abs(i0) - (i0 - abs(i))), i0 < 0, 0 < i ∧ i < i0 + i |
abs(i0) - (i0 - abs(i)) = abs(i), i0 - abs(i) < abs(i0), 0 < i0 - abs(i), abs(i) < i0, i < 0 ⊦ gcd(abs(i), i0 - abs(i)) = gcd(abs(i0), abs(i0) - (i0 - abs(i))), i0 < 0, 0 < i ∧ i < i0 + i
Used simplifier rules: ⊦ i < 0 → abs(i) = ~ i; (s)% ⊦ i - ~ j = i + j; (s)% ⊦ ¬ j < 0 → abs(j) = j; (s)% ⊦ i - j + i = ~ j; (s)%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-c: ⊦ i + j = j + i; from specification int-basic2% ⊦ ~ i = ~ j ↔ i = j; (s) Used formulas: abs(i0) - (i0 - abs(i)) = abs(i)