MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  pwp1fsum Structured version   Visualization version   GIF version

Theorem pwp1fsum 15316
Description: The n-th power of a number increased by 1 expressed by a product with a finite sum. (Contributed by AV, 15-Aug-2021.)
Hypotheses
Ref Expression
pwp1fsum.a (𝜑𝐴 ∈ ℂ)
pwp1fsum.n (𝜑𝑁 ∈ ℕ)
Assertion
Ref Expression
pwp1fsum (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1) = ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
Distinct variable groups:   𝐴,𝑘   𝑘,𝑁   𝜑,𝑘

Proof of Theorem pwp1fsum
Dummy variable 𝑙 is distinct from all other variables.
StepHypRef Expression
1 pwp1fsum.a . . . 4 (𝜑𝐴 ∈ ℂ)
2 1cnd 10248 . . . 4 (𝜑 → 1 ∈ ℂ)
3 fzfid 12966 . . . . 5 (𝜑 → (0...(𝑁 − 1)) ∈ Fin)
4 neg1cn 11316 . . . . . . . 8 -1 ∈ ℂ
54a1i 11 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → -1 ∈ ℂ)
6 elfznn0 12626 . . . . . . . 8 (𝑘 ∈ (0...(𝑁 − 1)) → 𝑘 ∈ ℕ0)
76adantl 473 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → 𝑘 ∈ ℕ0)
85, 7expcld 13202 . . . . . 6 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (-1↑𝑘) ∈ ℂ)
91adantr 472 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → 𝐴 ∈ ℂ)
109, 7expcld 13202 . . . . . 6 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴𝑘) ∈ ℂ)
118, 10mulcld 10252 . . . . 5 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
123, 11fsumcl 14663 . . . 4 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
131, 2, 12adddird 10257 . . 3 (𝜑 → ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))))
143, 1, 11fsummulc2 14715 . . . . 5 (𝜑 → (𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))))
159, 11mulcomd 10253 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = (((-1↑𝑘) · (𝐴𝑘)) · 𝐴))
168, 10, 9mulassd 10255 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (((-1↑𝑘) · (𝐴𝑘)) · 𝐴) = ((-1↑𝑘) · ((𝐴𝑘) · 𝐴)))
17 expp1 13061 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
181, 6, 17syl2an 495 . . . . . . . . . 10 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
1918eqcomd 2766 . . . . . . . . 9 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((𝐴𝑘) · 𝐴) = (𝐴↑(𝑘 + 1)))
2019oveq2d 6829 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · ((𝐴𝑘) · 𝐴)) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2115, 16, 203eqtrd 2798 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2221ralrimiva 3104 . . . . . 6 (𝜑 → ∀𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2322sumeq2d 14631 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2414, 23eqtrd 2794 . . . 4 (𝜑 → (𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2512mulid2d 10250 . . . 4 (𝜑 → (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))
2624, 25oveq12d 6831 . . 3 (𝜑 → ((𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
27 1zzd 11600 . . . . . . 7 (𝜑 → 1 ∈ ℤ)
28 0zd 11581 . . . . . . 7 (𝜑 → 0 ∈ ℤ)
29 pwp1fsum.n . . . . . . . 8 (𝜑𝑁 ∈ ℕ)
30 nnz 11591 . . . . . . . . 9 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
31 peano2zm 11612 . . . . . . . . 9 (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
3230, 31syl 17 . . . . . . . 8 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℤ)
3329, 32syl 17 . . . . . . 7 (𝜑 → (𝑁 − 1) ∈ ℤ)
34 peano2nn0 11525 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
356, 34syl 17 . . . . . . . . . 10 (𝑘 ∈ (0...(𝑁 − 1)) → (𝑘 + 1) ∈ ℕ0)
3635adantl 473 . . . . . . . . 9 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝑘 + 1) ∈ ℕ0)
379, 36expcld 13202 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴↑(𝑘 + 1)) ∈ ℂ)
388, 37mulcld 10252 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴↑(𝑘 + 1))) ∈ ℂ)
39 oveq2 6821 . . . . . . . 8 (𝑘 = (𝑙 − 1) → (-1↑𝑘) = (-1↑(𝑙 − 1)))
40 oveq1 6820 . . . . . . . . 9 (𝑘 = (𝑙 − 1) → (𝑘 + 1) = ((𝑙 − 1) + 1))
4140oveq2d 6829 . . . . . . . 8 (𝑘 = (𝑙 − 1) → (𝐴↑(𝑘 + 1)) = (𝐴↑((𝑙 − 1) + 1)))
4239, 41oveq12d 6831 . . . . . . 7 (𝑘 = (𝑙 − 1) → ((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = ((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))))
4327, 28, 33, 38, 42fsumshft 14711 . . . . . 6 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))))
44 elfzelz 12535 . . . . . . . . . . . . 13 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → 𝑙 ∈ ℤ)
4544zcnd 11675 . . . . . . . . . . . 12 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → 𝑙 ∈ ℂ)
4645adantl 473 . . . . . . . . . . 11 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → 𝑙 ∈ ℂ)
47 npcan1 10647 . . . . . . . . . . 11 (𝑙 ∈ ℂ → ((𝑙 − 1) + 1) = 𝑙)
4846, 47syl 17 . . . . . . . . . 10 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((𝑙 − 1) + 1) = 𝑙)
4948oveq2d 6829 . . . . . . . . 9 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → (𝐴↑((𝑙 − 1) + 1)) = (𝐴𝑙))
5049oveq2d 6829 . . . . . . . 8 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = ((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5150ralrimiva 3104 . . . . . . 7 (𝜑 → ∀𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = ((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5251sumeq2d 14631 . . . . . 6 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5329nncnd 11228 . . . . . . . . . 10 (𝜑𝑁 ∈ ℂ)
54 npcan1 10647 . . . . . . . . . 10 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5553, 54syl 17 . . . . . . . . 9 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
56 0p1e1 11324 . . . . . . . . . . . 12 (0 + 1) = 1
5756fveq2i 6355 . . . . . . . . . . 11 (ℤ‘(0 + 1)) = (ℤ‘1)
58 nnuz 11916 . . . . . . . . . . 11 ℕ = (ℤ‘1)
5957, 58eqtr4i 2785 . . . . . . . . . 10 (ℤ‘(0 + 1)) = ℕ
6059a1i 11 . . . . . . . . 9 (𝜑 → (ℤ‘(0 + 1)) = ℕ)
6129, 55, 603eltr4d 2854 . . . . . . . 8 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘(0 + 1)))
6256oveq1i 6823 . . . . . . . . . . 11 ((0 + 1)...((𝑁 − 1) + 1)) = (1...((𝑁 − 1) + 1))
6362eleq2i 2831 . . . . . . . . . 10 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) ↔ 𝑙 ∈ (1...((𝑁 − 1) + 1)))
644a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → -1 ∈ ℂ)
65 nnm1nn0 11526 . . . . . . . . . . . . . . 15 (𝑙 ∈ ℕ → (𝑙 − 1) ∈ ℕ0)
6665adantl 473 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → (𝑙 − 1) ∈ ℕ0)
6764, 66expcld 13202 . . . . . . . . . . . . 13 ((𝜑𝑙 ∈ ℕ) → (-1↑(𝑙 − 1)) ∈ ℂ)
681adantr 472 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → 𝐴 ∈ ℂ)
69 nnnn0 11491 . . . . . . . . . . . . . . 15 (𝑙 ∈ ℕ → 𝑙 ∈ ℕ0)
7069adantl 473 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → 𝑙 ∈ ℕ0)
7168, 70expcld 13202 . . . . . . . . . . . . 13 ((𝜑𝑙 ∈ ℕ) → (𝐴𝑙) ∈ ℂ)
7267, 71mulcld 10252 . . . . . . . . . . . 12 ((𝜑𝑙 ∈ ℕ) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ)
7372expcom 450 . . . . . . . . . . 11 (𝑙 ∈ ℕ → (𝜑 → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
74 elfznn 12563 . . . . . . . . . . 11 (𝑙 ∈ (1...((𝑁 − 1) + 1)) → 𝑙 ∈ ℕ)
7573, 74syl11 33 . . . . . . . . . 10 (𝜑 → (𝑙 ∈ (1...((𝑁 − 1) + 1)) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
7663, 75syl5bi 232 . . . . . . . . 9 (𝜑 → (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
7776imp 444 . . . . . . . 8 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ)
78 oveq1 6820 . . . . . . . . . 10 (𝑙 = ((𝑁 − 1) + 1) → (𝑙 − 1) = (((𝑁 − 1) + 1) − 1))
7978oveq2d 6829 . . . . . . . . 9 (𝑙 = ((𝑁 − 1) + 1) → (-1↑(𝑙 − 1)) = (-1↑(((𝑁 − 1) + 1) − 1)))
80 oveq2 6821 . . . . . . . . 9 (𝑙 = ((𝑁 − 1) + 1) → (𝐴𝑙) = (𝐴↑((𝑁 − 1) + 1)))
8179, 80oveq12d 6831 . . . . . . . 8 (𝑙 = ((𝑁 − 1) + 1) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) = ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1))))
8261, 77, 81fsumm1 14679 . . . . . . 7 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = (Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) + ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1)))))
8333zcnd 11675 . . . . . . . . . . . 12 (𝜑 → (𝑁 − 1) ∈ ℂ)
84 pncan1 10646 . . . . . . . . . . . 12 ((𝑁 − 1) ∈ ℂ → (((𝑁 − 1) + 1) − 1) = (𝑁 − 1))
8583, 84syl 17 . . . . . . . . . . 11 (𝜑 → (((𝑁 − 1) + 1) − 1) = (𝑁 − 1))
8685oveq2d 6829 . . . . . . . . . 10 (𝜑 → ((0 + 1)...(((𝑁 − 1) + 1) − 1)) = ((0 + 1)...(𝑁 − 1)))
8786sumeq1d 14630 . . . . . . . . 9 (𝜑 → Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑙 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)))
88 oveq1 6820 . . . . . . . . . . . 12 (𝑙 = 𝑘 → (𝑙 − 1) = (𝑘 − 1))
8988oveq2d 6829 . . . . . . . . . . 11 (𝑙 = 𝑘 → (-1↑(𝑙 − 1)) = (-1↑(𝑘 − 1)))
90 oveq2 6821 . . . . . . . . . . 11 (𝑙 = 𝑘 → (𝐴𝑙) = (𝐴𝑘))
9189, 90oveq12d 6831 . . . . . . . . . 10 (𝑙 = 𝑘 → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) = ((-1↑(𝑘 − 1)) · (𝐴𝑘)))
9291cbvsumv 14625 . . . . . . . . 9 Σ𝑙 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))
9387, 92syl6eq 2810 . . . . . . . 8 (𝜑 → Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)))
9485oveq2d 6829 . . . . . . . . 9 (𝜑 → (-1↑(((𝑁 − 1) + 1) − 1)) = (-1↑(𝑁 − 1)))
9555oveq2d 6829 . . . . . . . . 9 (𝜑 → (𝐴↑((𝑁 − 1) + 1)) = (𝐴𝑁))
9694, 95oveq12d 6831 . . . . . . . 8 (𝜑 → ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
9793, 96oveq12d 6831 . . . . . . 7 (𝜑 → (Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) + ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1)))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
9882, 97eqtrd 2794 . . . . . 6 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
9943, 52, 983eqtrd 2798 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
100 nnm1nn0 11526 . . . . . . . . 9 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
101 elnn0uz 11918 . . . . . . . . 9 ((𝑁 − 1) ∈ ℕ0 ↔ (𝑁 − 1) ∈ (ℤ‘0))
102100, 101sylib 208 . . . . . . . 8 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ‘0))
10329, 102syl 17 . . . . . . 7 (𝜑 → (𝑁 − 1) ∈ (ℤ‘0))
104 oveq2 6821 . . . . . . . . 9 (𝑘 = 0 → (-1↑𝑘) = (-1↑0))
105 exp0 13058 . . . . . . . . . 10 (-1 ∈ ℂ → (-1↑0) = 1)
1064, 105ax-mp 5 . . . . . . . . 9 (-1↑0) = 1
107104, 106syl6eq 2810 . . . . . . . 8 (𝑘 = 0 → (-1↑𝑘) = 1)
108 oveq2 6821 . . . . . . . 8 (𝑘 = 0 → (𝐴𝑘) = (𝐴↑0))
109107, 108oveq12d 6831 . . . . . . 7 (𝑘 = 0 → ((-1↑𝑘) · (𝐴𝑘)) = (1 · (𝐴↑0)))
110103, 11, 109fsum1p 14681 . . . . . 6 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) = ((1 · (𝐴↑0)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
111 exp0 13058 . . . . . . . . . 10 (𝐴 ∈ ℂ → (𝐴↑0) = 1)
1121, 111syl 17 . . . . . . . . 9 (𝜑 → (𝐴↑0) = 1)
113112oveq2d 6829 . . . . . . . 8 (𝜑 → (1 · (𝐴↑0)) = (1 · 1))
114 1t1e1 11367 . . . . . . . 8 (1 · 1) = 1
115113, 114syl6eq 2810 . . . . . . 7 (𝜑 → (1 · (𝐴↑0)) = 1)
116115oveq1d 6828 . . . . . 6 (𝜑 → ((1 · (𝐴↑0)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (1 + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
117 fzfid 12966 . . . . . . . 8 (𝜑 → ((0 + 1)...(𝑁 − 1)) ∈ Fin)
118 elfznn 12563 . . . . . . . . . . 11 (𝑘 ∈ (1...(𝑁 − 1)) → 𝑘 ∈ ℕ)
1194a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → -1 ∈ ℂ)
120 nnnn0 11491 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
121120adantl 473 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ0)
122119, 121expcld 13202 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (-1↑𝑘) ∈ ℂ)
1231adantr 472 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝐴 ∈ ℂ)
124123, 121expcld 13202 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (𝐴𝑘) ∈ ℂ)
125122, 124mulcld 10252 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
126125expcom 450 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
127118, 126syl 17 . . . . . . . . . 10 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
12856oveq1i 6823 . . . . . . . . . 10 ((0 + 1)...(𝑁 − 1)) = (1...(𝑁 − 1))
129127, 128eleq2s 2857 . . . . . . . . 9 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
130129impcom 445 . . . . . . . 8 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
131117, 130fsumcl 14663 . . . . . . 7 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
1322, 131addcomd 10430 . . . . . 6 (𝜑 → (1 + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1))
133110, 116, 1323eqtrd 2798 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1))
13499, 133oveq12d 6831 . . . 4 (𝜑 → (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1)))
135 nnm1nn0 11526 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑘 − 1) ∈ ℕ0)
136135adantl 473 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (𝑘 − 1) ∈ ℕ0)
137119, 136expcld 13202 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (-1↑(𝑘 − 1)) ∈ ℂ)
138137, 124mulcld 10252 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
139138expcom 450 . . . . . . . . . 10 (𝑘 ∈ ℕ → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
140118, 139syl 17 . . . . . . . . 9 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
141140, 128eleq2s 2857 . . . . . . . 8 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
142141impcom 445 . . . . . . 7 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
143117, 142fsumcl 14663 . . . . . 6 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
1444a1i 11 . . . . . . . 8 (𝜑 → -1 ∈ ℂ)
14529, 100syl 17 . . . . . . . 8 (𝜑 → (𝑁 − 1) ∈ ℕ0)
146144, 145expcld 13202 . . . . . . 7 (𝜑 → (-1↑(𝑁 − 1)) ∈ ℂ)
147 nnnn0 11491 . . . . . . . . 9 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
14829, 147syl 17 . . . . . . . 8 (𝜑𝑁 ∈ ℕ0)
1491, 148expcld 13202 . . . . . . 7 (𝜑 → (𝐴𝑁) ∈ ℂ)
150146, 149mulcld 10252 . . . . . 6 (𝜑 → ((-1↑(𝑁 − 1)) · (𝐴𝑁)) ∈ ℂ)
151143, 150addcld 10251 . . . . 5 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) ∈ ℂ)
152151, 131, 2addassd 10254 . . . 4 (𝜑 → (((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + 1) = ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1)))
153143, 150addcomd 10430 . . . . . . 7 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))))
154153oveq1d 6828 . . . . . 6 (𝜑 → ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((((-1↑(𝑁 − 1)) · (𝐴𝑁)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
155150, 143, 131addassd 10254 . . . . . 6 (𝜑 → ((((-1↑(𝑁 − 1)) · (𝐴𝑁)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))))
156 nncn 11220 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
157 npcan1 10647 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℂ → ((𝑘 − 1) + 1) = 𝑘)
158156, 157syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ → ((𝑘 − 1) + 1) = 𝑘)
159158eqcomd 2766 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → 𝑘 = ((𝑘 − 1) + 1))
160159oveq2d 6829 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → (-1↑𝑘) = (-1↑((𝑘 − 1) + 1)))
1614a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → -1 ∈ ℂ)
162161, 135expp1d 13203 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → (-1↑((𝑘 − 1) + 1)) = ((-1↑(𝑘 − 1)) · -1))
163161, 135expcld 13202 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → (-1↑(𝑘 − 1)) ∈ ℂ)
164163, 161mulcomd 10253 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) · -1) = (-1 · (-1↑(𝑘 − 1))))
165160, 162, 1643eqtrd 2798 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (-1↑𝑘) = (-1 · (-1↑(𝑘 − 1))))
166165oveq2d 6829 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = ((-1↑(𝑘 − 1)) + (-1 · (-1↑(𝑘 − 1)))))
167163mulm1d 10674 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (-1 · (-1↑(𝑘 − 1))) = -(-1↑(𝑘 − 1)))
168167oveq2d 6829 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1 · (-1↑(𝑘 − 1)))) = ((-1↑(𝑘 − 1)) + -(-1↑(𝑘 − 1))))
169163negidd 10574 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + -(-1↑(𝑘 − 1))) = 0)
170166, 168, 1693eqtrd 2798 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = 0)
171170adantl 473 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = 0)
172171oveq1d 6828 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) + (-1↑𝑘)) · (𝐴𝑘)) = (0 · (𝐴𝑘)))
173137, 122, 124adddird 10257 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) + (-1↑𝑘)) · (𝐴𝑘)) = (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))))
174124mul02d 10426 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (0 · (𝐴𝑘)) = 0)
175172, 173, 1743eqtr3d 2802 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0)
176175expcom 450 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
177118, 176syl 17 . . . . . . . . . . . 12 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
178177, 128eleq2s 2857 . . . . . . . . . . 11 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
179178impcom 445 . . . . . . . . . 10 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0)
180179sumeq2dv 14632 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))(((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))0)
181117, 142, 130fsumadd 14669 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))(((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
182117olcd 407 . . . . . . . . . 10 (𝜑 → (((0 + 1)...(𝑁 − 1)) ⊆ (ℤ‘1) ∨ ((0 + 1)...(𝑁 − 1)) ∈ Fin))
183 sumz 14652 . . . . . . . . . 10 ((((0 + 1)...(𝑁 − 1)) ⊆ (ℤ‘1) ∨ ((0 + 1)...(𝑁 − 1)) ∈ Fin) → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))0 = 0)
184182, 183syl 17 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))0 = 0)
185180, 181, 1843eqtr3d 2802 . . . . . . . 8 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = 0)
186185oveq2d 6829 . . . . . . 7 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 0))
187150addid1d 10428 . . . . . . 7 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 0) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
188186, 187eqtrd 2794 . . . . . 6 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
189154, 155, 1883eqtrd 2798 . . . . 5 (𝜑 → ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
190189oveq1d 6828 . . . 4 (𝜑 → (((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + 1) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
191134, 152, 1903eqtr2d 2800 . . 3 (𝜑 → (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
19213, 26, 1913eqtrd 2798 . 2 (𝜑 → ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
193192eqcomd 2766 1 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1) = ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wo 382  wa 383   = wceq 1632  wcel 2139  wss 3715  cfv 6049  (class class class)co 6813  Fincfn 8121  cc 10126  0cc0 10128  1c1 10129   + caddc 10131   · cmul 10133  cmin 10458  -cneg 10459  cn 11212  0cn0 11484  cz 11569  cuz 11879  ...cfz 12519  cexp 13054  Σcsu 14615
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1871  ax-4 1886  ax-5 1988  ax-6 2054  ax-7 2090  ax-8 2141  ax-9 2148  ax-10 2168  ax-11 2183  ax-12 2196  ax-13 2391  ax-ext 2740  ax-rep 4923  ax-sep 4933  ax-nul 4941  ax-pow 4992  ax-pr 5055  ax-un 7114  ax-inf2 8711  ax-cnex 10184  ax-resscn 10185  ax-1cn 10186  ax-icn 10187  ax-addcl 10188  ax-addrcl 10189  ax-mulcl 10190  ax-mulrcl 10191  ax-mulcom 10192  ax-addass 10193  ax-mulass 10194  ax-distr 10195  ax-i2m1 10196  ax-1ne0 10197  ax-1rid 10198  ax-rnegex 10199  ax-rrecex 10200  ax-cnre 10201  ax-pre-lttri 10202  ax-pre-lttrn 10203  ax-pre-ltadd 10204  ax-pre-mulgt0 10205  ax-pre-sup 10206
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-tru 1635  df-fal 1638  df-ex 1854  df-nf 1859  df-sb 2047  df-eu 2611  df-mo 2612  df-clab 2747  df-cleq 2753  df-clel 2756  df-nfc 2891  df-ne 2933  df-nel 3036  df-ral 3055  df-rex 3056  df-reu 3057  df-rmo 3058  df-rab 3059  df-v 3342  df-sbc 3577  df-csb 3675  df-dif 3718  df-un 3720  df-in 3722  df-ss 3729  df-pss 3731  df-nul 4059  df-if 4231  df-pw 4304  df-sn 4322  df-pr 4324  df-tp 4326  df-op 4328  df-uni 4589  df-int 4628  df-iun 4674  df-br 4805  df-opab 4865  df-mpt 4882  df-tr 4905  df-id 5174  df-eprel 5179  df-po 5187  df-so 5188  df-fr 5225  df-se 5226  df-we 5227  df-xp 5272  df-rel 5273  df-cnv 5274  df-co 5275  df-dm 5276  df-rn 5277  df-res 5278  df-ima 5279  df-pred 5841  df-ord 5887  df-on 5888  df-lim 5889  df-suc 5890  df-iota 6012  df-fun 6051  df-fn 6052  df-f 6053  df-f1 6054  df-fo 6055  df-f1o 6056  df-fv 6057  df-isom 6058  df-riota 6774  df-ov 6816  df-oprab 6817  df-mpt2 6818  df-om 7231  df-1st 7333  df-2nd 7334  df-wrecs 7576  df-recs 7637  df-rdg 7675  df-1o 7729  df-oadd 7733  df-er 7911  df-en 8122  df-dom 8123  df-sdom 8124  df-fin 8125  df-sup 8513  df-oi 8580  df-card 8955  df-pnf 10268  df-mnf 10269  df-xr 10270  df-ltxr 10271  df-le 10272  df-sub 10460  df-neg 10461  df-div 10877  df-nn 11213  df-2 11271  df-3 11272  df-n0 11485  df-z 11570  df-uz 11880  df-rp 12026  df-fz 12520  df-fzo 12660  df-seq 12996  df-exp 13055  df-hash 13312  df-cj 14038  df-re 14039  df-im 14040  df-sqrt 14174  df-abs 14175  df-clim 14418  df-sum 14616
This theorem is referenced by:  oddpwp1fsum  15317
  Copyright terms: Public domain W3C validator