| (i / abs(j)) / abs(j0) + ~ i / (abs(j) * abs(j0)) = 0, i < 0 ⊦ (i / j) / j0 = i / (j * j0), j = 0, j0 = 0, j < 0 |
(i / j) / abs(j0) = i / (j * abs(j0)), i < 0, 0 < j ⊦ (i / j) / j0 = i / (j * j0), j0 = 0
Used simplifier rules: neg-01: j ≠ 0 ⊦ ~ i / j = ~(i / j);%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs% ⊦ i < j → ¬ j < i; (s)% ⊦ ¬ i < j → (i = j ↔ ¬ j < i); (ss)% ⊦ i + 0 = i; (s)% ⊦ i - j = i0 ↔ i = i0 + j; (s)%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2% ⊦ i + ~ j = i - j; (s)%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult% ⊦ abs(i) = 0 ↔ i = 0; (s)% ⊦ i * j = 0 ↔ i = 0 ∨ j = 0; (ws)% ⊦ ¬ j < 0 → abs(j) = j; (s)