| 0 ≤ j, prime(j), ≡mod(i1 ^ j, i1, j), 0 ≤ i1, 0 ≤ j, ∀ i0, j. i→n(i0) < i→n(i1 + 1) → prime(j) ∧ 0 < i0 → ≡mod(i0 ^ j, i0, j) ⊦ ≡mod(Σ((i1 ^ 0 * binom_coef(j, 0))' + countFun(0 + 1, j, λ j0. i1 ^ j0 * binom_coef(j, j0))), i1 + 1, j) |
prime(j), ≡mod(i1 ^ j, i1, j), 0 ≤ i1, 0 ≤ j, ∀ i0, j. i→n(i0) < i→n(i1 + 1) → prime(j) ∧ 0 < i0 → ≡mod(i0 ^ j, i0, j) ⊦ ≡mod(Σ countFun(1, j, λ j0. i1 ^ j0 * binom_coef(j, j0)), i1, j)
Used simplifier rules: cong-same-add: ⊦ ≡mod(i + i0, i + i1, j) ↔ ≡mod(i0, i1, j);%a: ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1; from specification list[intlista]%sum-rec: ⊦ Σ(i ' + ints) = i + Σ ints; from specification intlist%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%coef-zero: ⊦ 0 ≤ i → binom_coef(i, 0) = 1; from specification int-fac%Pot-zero: ⊦ j ^ 0 = 1; from specification int-pot