| i0 = (i / 2) / j * 2, j ≠ 0, 0 ≤ i, 0 ≤ j ⊦ i / j = i0 + (i - j * i0 < j ⊃ 0;1) |
0 ≤ i, 0 < j ⊦ j = 0, i / j = i / (2 * j) * 2 + (i < j * (i / (2 * j) * 2 + 1) ⊃ 0;1)
Used simplifier rules: div-div-pos: ⊦ 0 ≤ i ∧ 0 < j ∧ 0 < j0 → (i / j) / j0 = i / (j * j0);%forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs%lels-02: ⊦ i ≠ j → (i ≤ j ↔ i < j); from specification int-abs%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%succ-rmerge: ⊦ i * j + i = i * (j + 1); from specification int-mult%sub-ls: ⊦ i - j < i0 ↔ i < j + i0; from specification int-abs