| j0 + j < 0, 0 ≤ j + j2, j < 0, j * i0 ≤ j * i + j0, i0 < i, 0 ≤ j0, 0 < j2, j0 < j2, abs(j + 1) < j2 → abs(j + 1) * i ≤ abs(j + 1) * i0 + j0 ∧ 0 ≤ j0 ∧ j0 < abs(j + 1) → i ≤ i0, ∀ j, i, i0, j0. abs(j) < j2 → abs(j) * i ≤ abs(j) * i0 + j0 ∧ 0 ≤ j0 ∧ j0 < abs(j) → i ≤ i0 ⊦ j = 0 |
j0 + j = ~1, j * i0 + i0 ≤ i + j * i + j0, 0 ≤ j + j2, j < 0, j * i0 ≤ j * i + j0, i0 < i, 0 ≤ j0, 0 < j2, j0 < j2, ∀ j, i, i0, j0. abs(j) < j2 → abs(j) * i ≤ abs(j) * i0 + j0 ∧ 0 ≤ j0 ∧ j0 < abs(j) → i ≤ i0 ⊦ j = 0
Used simplifier rules: minus-left: ⊦ ~ i * j = ~(i * j);%dist-lsplit: ⊦ (i + i0) * j = i * j + i0 * j;%one: ⊦ 1 * i = i;%associativity: ⊦ i * j * j0 = (i * j) * j0;%commutativity: ⊦ i * j = j * i;%forward-le-02: ⊦ j < i ∧ i ≤ 0 → j < 0; (forward) from specification int-abs%forward-lsle: ⊦ i < j ∧ j ≤ j0 → i < j0; (forward) from specification int-abs%mone-08: ⊦ i < 0 → (~1 ≤ i ↔ i = ~1); from specification int-abs%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%int-simp-05: ⊦ i ≤ i1 ∧ i2 < i3 → (i1 + i3 < i + i2 ↔ false); from specification int-abs%lels-01: ⊦ ¬ i ≤ j ↔ j < i; from specification int-abs%lels-03: ⊦ i < j → (¬ ¬ j ≤ i ↔ false); from specification int-abs%numls-03: ⊦ i + (* j) < (* j0) ↔ i < j0 - j; from specification int-abs%neg-07: ⊦ i < ~ j ↔ i + j < 0; from specification int-abs%add-zero: ⊦ i + 0 = i; from specification int-basic2%sub-le-01: ⊦ i ≤ j - i0 ↔ i + i0 ≤ j; from specification int-abs%sub-add-01: ⊦ i + (j - i0) = i + j - i0; from specification int-abs%negle-13: ⊦ ~ i ≤ j ↔ 0 ≤ i + j; from specification int-abs%neg-15: ⊦ i + ~ j = i - j; from specification int-abs%zero-gels-04: ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j; from specification int-abs%mone-06: ⊦ ~1 < i ↔ 0 ≤ i; from specification int-abs%numls-02: ⊦ (* j) < i0 + (* j0) ↔ j - j0 < i0; from specification int-abs%neg-13: ⊦ ~ i < j ↔ 0 < j + i; 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%subsub: ⊦ ~ i - j = ~(i + j); from specification int-abs%abs-08: ⊦ i < 0 → abs(i) = ~ i; from specification int-abs%abs-05: ⊦ i < 0 → abs(i + 1) = abs(i) - 1; from specification int-abs