| 0 ≤ i1, 0 < i1, ∀ j0, i, i0. i→n(j0) < i→n(i1 + 1) → true → 0 ≤ j0 → (i + i0) ^ j0 = Σ countFun(0, j0, λ j1. binom_coef(j0, j1) * i ^ j1 * i0 ^ (j0 - j1)) ⊦ ~1 = i1, i ^ i1 * i + i0 * Σ countFun(0, i1, λ j1. binom_coef(i1, j1) * i ^ j1 * i0 ^ (i1 - j1)) = i0 ^ (1 + i1) + Σ countFun(1, i1, λ j0. binom_coef(i1, j0) * i ^ j0 * i0 ^ (i1 + 1 - j0)) + i ^ (i1 + 1) |
⊦ i ≤ j → countFun(i, j, intfun) = intfun(i) ' + countFun(i + 1, j, intfun)
0 ≤ i1, 0 ≤ i1, 0 < i1, ∀ j0, i, i0. i→n(j0) < i→n(i1 + 1) → true → 0 ≤ j0 → (i + i0) ^ j0 = Σ countFun(0, j0, λ j1. binom_coef(j0, j1) * i ^ j1 * i0 ^ (j0 - j1)) ⊦ ~1 = i1, i ^ i1 * i + i0 * Σ((binom_coef(i1, 0) * i ^ 0 * i0 ^ (i1 - 0))' + countFun(0 + 1, i1, λ j0. binom_coef(i1, j0) * i ^ j0 * i0 ^ (i1 - j0))) = i0 ^ (1 + i1) + Σ countFun(1, i1, λ j0. binom_coef(i1, j0) * i ^ j0 * i0 ^ (i1 + 1 - j0)) + i ^ (i1 + 1)
Used simplifier rules: associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%commutativity: ⊦ i * j = j * i; from specification int-mult Used terms: λ j0. binom_coef(i1, j0) * i ^ j0 * i0 ^ (i1 - j0), i1, 0