| i < j ⊦ (i - j) * j0 < 0 ↔ 0 < j0 |
Used simplifier rules: zero-ls: ⊦ 0 < i → (i * j < 0 ↔ j < 0);%associativity: ⊦ i * j * j0 = (i * j) * j0;%commutativity: ⊦ i * j = j * i;%zero-ls-03: ⊦ i ≤ 0 → (i * j < 0 ↔ 0 < j ∧ i ≠ 0);% ⊦ i < j → ¬ j < i; (s)% ⊦ i < j - i0 ↔ i + i0 < j; (s)% ⊦ i < j ↔ ¬ j ≤ i; (ss)%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2% ⊦ i + 0 = i; (s)% ⊦ i - j < i0 ↔ i < j + i0; (s)