| 0 ≤ i ∧ 0 < j → i = i0 * j + j0 ∧ 0 ≤ i0 ∧ 0 ≤ j0 ∧ j0 < j ⊦ j = 0, j < 0, i < 0, ∃ i0, j0. i = i0 * j + j0 ∧ abs(j0) < abs(j) |
j0 < j, 0 < j, 0 ≤ j0, 0 ≤ i0 ⊦ ∃ i1, j1. i0 * j + j0 = i1 * j + j1 ∧ abs(j1) < j
Used simplifier rules: zero-ge-add: ⊦ 0 ≤ j1 ∧ j1 < j → (0 ≤ i0 * j + j1 ↔ 0 ≤ i0);%associativity: ⊦ i * j * j0 = (i * j) * j0;%commutativity: ⊦ i * j = j * i;%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%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% ⊦ 0 < j → abs(j) = j; (s)% ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j; (s)% ⊦ i < j → ¬ j < i; (s)% ⊦ i < j ↔ ¬ j ≤ i; (ss)% ⊦ ¬ i < j → (i = j ↔ ¬ j < i); (ss)