| i0 * j + i1 * j + j0 = i2 * j + j1, i2 * j + j1 < j, i2 * j + j1 < 0, i2 < j, i2 ≤ 0, j1 < j, j1 ≤ 0, 0 < j, abs(j0) < j, 1 + i2 * j + j1 < j, (i1 * j + j0) + 1 < j, j0 ≤ 0, j0 < j, i1 ≤ 0, i1 < j, i1 * j + j0 < 0, i1 * j + j0 < j, 0 ≤ i0, abs(j1) < j ⊦ (i0 + i1) * j + ~ j1 = i2 * j + ~ j0 ∧ 0 ≤ ~ j1 ∧ ~ j1 < j ∧ 0 ≤ ~ j0 ∧ ~ j0 < j, i2 = i0 + i1 |
i0 * j + i1 * j + j0 = i2 * j + j1, i1 * j + j0 < j + j1, i2 * j + j1 < j, i2 * j + j1 < 0, i2 < j, i2 ≤ 0, j1 < j, j1 ≤ 0, 0 < j, abs(j0) < j, 1 + i2 * j + j1 < j, (i1 * j + j0) + 1 < j, j0 ≤ 0, j0 < j, i1 ≤ 0, i1 < j, i1 * j + j0 < 0, i1 * j + j0 < j, 0 ≤ i0, abs(j1) < j, 0 < j + j1, 0 < j + j0, i2 * j + 1 < j, (i2 * j + j1) + 1 < j + j0, i2 * j + j1 < j + j0, i2 < j + j1, i2 < j + j0, j1 < j + j0, j0 < j + j1, i1 < j + j1, i1 < j + j0, (i1 * j + j0) + 1 < j + j1, i1 * j + 1 < j ⊦ j1 + i2 * j = (i0 + i1) * j + j0, i2 = i0 + i1
Used simplifier rules: add-less: ⊦ 0 < i → i1 < i1 + i; from specification int-basic2%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%lsone: ⊦ i < 1 ↔ i ≤ 0; from specification int-abs%ls-same: ⊦ 0 < i → (i * j < i ↔ j < 1); from specification int-mult%ls-01: ⊦ i + j < i + i0 ↔ j < i0; from specification int-basic2%succ-01: ⊦ i +1 = i + 1; from specification int-basic2%trans: ⊦ i < j ∧ j < j0 → i < j0; (forward) from specification int-basic1%lf-01: ⊦ i < j ∧ j < i0 → i +1 < i0; (forward) from specification int-basic1%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs%zero-gels-03: ⊦ i < 0 ∧ 0 ≤ j → i ≤ j; from specification int-abs%lenls: ⊦ i ≤ j → ¬ j < i; from specification int-abs%abs-08: ⊦ i < 0 → abs(i) = ~ i; from specification int-abs%ls: ⊦ i + j < j ↔ i < 0; from specification int-basic2%forward-lele: ⊦ j ≤ j0 ∧ j0 ≤ j1 → j ≤ j1; (forward) from specification int-abs%forward-le-04: ⊦ j ≤ i ∧ i ≤ 0 → j ≤ 0; (forward) from specification int-abs%forward-lels: ⊦ i ≤ j ∧ j < j0 → i < j0; (forward) from specification int-abs%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%neg-13: ⊦ ~ i < j ↔ 0 < j + i; from specification int-abs%zero-gels-04: ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j; from specification int-abs%add-zero-rev: ⊦ 0 + i = i; from specification int-basic2%negle-07: ⊦ i ≤ ~ j ↔ i + j ≤ 0; from specification int-abs%sub-add-01: ⊦ i + (j - i0) = i + j - i0; from specification int-abs%sub-eq: ⊦ i - j = i0 ↔ i = i0 + 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%neg-15: ⊦ i + ~ j = i - j; from specification int-abs