| 0 < i0 → (∃ j. 0 < j ∧ j * j ≤ i0 ∧ i0 < (j + 1) * (j + 1)), 0 < i0 -1 ⊦ ∃ j. 0 < j ∧ j * j ≤ i0 -1 ∧ i0 -1 < (j + 1) * (j + 1) |
0 < j, 1 < (j + 1) * (j + 1), 0 < (j + 1) * (j + 1), 2 < (j + 1) * (j + 1), i0 < (j + 1) * (j + 1), j * j ≤ i0, 0 < i0, 1 < i0 ⊦ ∃ j0. 0 < j0 ∧ j0 * j0 < i0 ∧ i0 ≤ (j0 + 1) * (j0 + 1)
Used simplifier rules: square-ls: ⊦ i * i < j * j ↔ abs(i) < abs(j);%associativity: ⊦ i * j * j0 = (i * j) * j0;%commutativity: ⊦ i * j = j * i;%ler: ⊦ i ≤ i; from specification int-abs%abs-16: ⊦ 0 < j → abs(j) = j; from specification int-abs%abs-17: ⊦ 0 < j → abs(j + 1) = j + 1; from specification int-abs%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-lels: ⊦ i ≤ j ∧ j < j0 → i < j0; (forward) from specification int-abs%forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs%forward-pos: ⊦ i < j ∧ 0 < i → 0 < j ∧ 1 < j; (forward) from specification int-basic1%succ-02: ⊦ i < j + 1 ↔ i ≤ j; from specification int-abs%sub-ls: ⊦ i - j < i0 ↔ i < j + i0; from specification int-abs%succ-01: ⊦ i + 1 ≤ j ↔ i < j; from specification int-abs%sub-le-01: ⊦ 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%sub-ls-01: ⊦ i < j - i0 ↔ i + i0 < j; from specification int-abs%sub-pred: ⊦ i -1 = i - 1; from specification int-abs