| Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) ≤ 1 * n→i(# countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0)), i ^ i0 ≤ 2 * j ∧ 2 * j < i ^ (i0 + 1) ∧ 0 ≤ i0 ∧ prime(i) ∧ 0 < j, i ^ i0 ≤ 2 * j, 2 * j < i ^ (i0 + 1), 0 ≤ i0, prime(i), 0 < j ⊦ Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) ≤ i0 |
i ^ i0 ≤ 2 * j, 2 * j < i ^ (i0 + 1), prime(i), Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) ≤ n→i(# countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0)), i0 < Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0), i ^ i0 < i ^ (i0 + 1), 0 ≤ i0, 0 < j, 0 < Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0), i0 < n→i(# countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0)) ⊦ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) = []
Used simplifier rules: l: ⊦ # ints = 0 ↔ ints = []; from specification list-data[intlista]%zero: ⊦ 0 < m ↔ m ≠ 0; from specification nat-basic1%num-n2i-ls-02: 0 ≤ i ⊦ (* i) < n→i(n) ↔ i→n(i) < n; from specification intnat%forward-le: ⊦ i ≤ j ∧ 0 < i → 0 < j; (forward) from specification int-abs%forward-lels: ⊦ i ≤ j ∧ j < j0 → i < j0; (forward) from specification int-abs%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%forward-lsle: ⊦ i < j ∧ j ≤ j0 → i < j0; (forward) from specification int-abs%lels-01: ⊦ ¬ i ≤ j ↔ j < i; from specification int-abs%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%one: ⊦ 1 * i = i; from specification int-mult