| ∃ i, j. rj0 = rational(i, j) ∧ 0 < j, 0 < j, rational(i0, j0) < rj0, i * j0 < i0 * j, 0 < j0 ⊦ rational(i, j) < rj0 |
i * j0 < i0 * j, 0 < j0, 0 < j, i0 * j1 < i1 * j0, i1 * j ≤ i * j1, 0 < j1 ⊦
Used simplifier rules: ls-def: ⊦ 0 < j ∧ 0 < j0 → (rational(i, j) < rational(i0, j0) ↔ i * j0 < i0 * j);% ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward)% ⊦ ¬ i < j ↔ j ≤ i;