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

Theorem pwp1fsum 15450
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 10323 . . . 4 (𝜑 → 1 ∈ ℂ)
3 fzfid 13027 . . . . 5 (𝜑 → (0...(𝑁 − 1)) ∈ Fin)
4 neg1cn 11434 . . . . . . . 8 -1 ∈ ℂ
54a1i 11 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → -1 ∈ ℂ)
6 elfznn0 12687 . . . . . . . 8 (𝑘 ∈ (0...(𝑁 − 1)) → 𝑘 ∈ ℕ0)
76adantl 474 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → 𝑘 ∈ ℕ0)
85, 7expcld 13262 . . . . . 6 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (-1↑𝑘) ∈ ℂ)
91adantr 473 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → 𝐴 ∈ ℂ)
109, 7expcld 13262 . . . . . 6 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴𝑘) ∈ ℂ)
118, 10mulcld 10349 . . . . 5 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
123, 11fsumcl 14805 . . . 4 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
131, 2, 12adddird 10354 . . 3 (𝜑 → ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))))
143, 1, 11fsummulc2 14854 . . . . 5 (𝜑 → (𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))))
159, 11mulcomd 10350 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = (((-1↑𝑘) · (𝐴𝑘)) · 𝐴))
168, 10, 9mulassd 10352 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (((-1↑𝑘) · (𝐴𝑘)) · 𝐴) = ((-1↑𝑘) · ((𝐴𝑘) · 𝐴)))
17 expp1 13121 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
181, 6, 17syl2an 590 . . . . . . . . . 10 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
1918eqcomd 2805 . . . . . . . . 9 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((𝐴𝑘) · 𝐴) = (𝐴↑(𝑘 + 1)))
2019oveq2d 6894 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · ((𝐴𝑘) · 𝐴)) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2115, 16, 203eqtrd 2837 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2221ralrimiva 3147 . . . . . 6 (𝜑 → ∀𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = ((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2322sumeq2d 14773 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))(𝐴 · ((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2414, 23eqtrd 2833 . . . 4 (𝜑 → (𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))))
2512mulid2d 10347 . . . 4 (𝜑 → (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))
2624, 25oveq12d 6896 . . 3 (𝜑 → ((𝐴 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + (1 · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
27 1zzd 11698 . . . . . . 7 (𝜑 → 1 ∈ ℤ)
28 0zd 11678 . . . . . . 7 (𝜑 → 0 ∈ ℤ)
29 pwp1fsum.n . . . . . . . 8 (𝜑𝑁 ∈ ℕ)
30 nnz 11689 . . . . . . . . 9 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
31 peano2zm 11710 . . . . . . . . 9 (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
3230, 31syl 17 . . . . . . . 8 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℤ)
3329, 32syl 17 . . . . . . 7 (𝜑 → (𝑁 − 1) ∈ ℤ)
34 peano2nn0 11622 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
356, 34syl 17 . . . . . . . . . 10 (𝑘 ∈ (0...(𝑁 − 1)) → (𝑘 + 1) ∈ ℕ0)
3635adantl 474 . . . . . . . . 9 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝑘 + 1) ∈ ℕ0)
379, 36expcld 13262 . . . . . . . 8 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → (𝐴↑(𝑘 + 1)) ∈ ℂ)
388, 37mulcld 10349 . . . . . . 7 ((𝜑𝑘 ∈ (0...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴↑(𝑘 + 1))) ∈ ℂ)
39 oveq2 6886 . . . . . . . 8 (𝑘 = (𝑙 − 1) → (-1↑𝑘) = (-1↑(𝑙 − 1)))
40 oveq1 6885 . . . . . . . . 9 (𝑘 = (𝑙 − 1) → (𝑘 + 1) = ((𝑙 − 1) + 1))
4140oveq2d 6894 . . . . . . . 8 (𝑘 = (𝑙 − 1) → (𝐴↑(𝑘 + 1)) = (𝐴↑((𝑙 − 1) + 1)))
4239, 41oveq12d 6896 . . . . . . 7 (𝑘 = (𝑙 − 1) → ((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = ((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))))
4327, 28, 33, 38, 42fsumshft 14850 . . . . . 6 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))))
44 elfzelz 12596 . . . . . . . . . . . . 13 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → 𝑙 ∈ ℤ)
4544zcnd 11773 . . . . . . . . . . . 12 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → 𝑙 ∈ ℂ)
4645adantl 474 . . . . . . . . . . 11 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → 𝑙 ∈ ℂ)
47 npcan1 10747 . . . . . . . . . . 11 (𝑙 ∈ ℂ → ((𝑙 − 1) + 1) = 𝑙)
4846, 47syl 17 . . . . . . . . . 10 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((𝑙 − 1) + 1) = 𝑙)
4948oveq2d 6894 . . . . . . . . 9 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → (𝐴↑((𝑙 − 1) + 1)) = (𝐴𝑙))
5049oveq2d 6894 . . . . . . . 8 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = ((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5150ralrimiva 3147 . . . . . . 7 (𝜑 → ∀𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = ((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5251sumeq2d 14773 . . . . . 6 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴↑((𝑙 − 1) + 1))) = Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)))
5329nncnd 11330 . . . . . . . . . 10 (𝜑𝑁 ∈ ℂ)
54 npcan1 10747 . . . . . . . . . 10 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5553, 54syl 17 . . . . . . . . 9 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
56 0p1e1 11442 . . . . . . . . . . . 12 (0 + 1) = 1
5756fveq2i 6414 . . . . . . . . . . 11 (ℤ‘(0 + 1)) = (ℤ‘1)
58 nnuz 11967 . . . . . . . . . . 11 ℕ = (ℤ‘1)
5957, 58eqtr4i 2824 . . . . . . . . . 10 (ℤ‘(0 + 1)) = ℕ
6059a1i 11 . . . . . . . . 9 (𝜑 → (ℤ‘(0 + 1)) = ℕ)
6129, 55, 603eltr4d 2893 . . . . . . . 8 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘(0 + 1)))
6256oveq1i 6888 . . . . . . . . . . 11 ((0 + 1)...((𝑁 − 1) + 1)) = (1...((𝑁 − 1) + 1))
6362eleq2i 2870 . . . . . . . . . 10 (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) ↔ 𝑙 ∈ (1...((𝑁 − 1) + 1)))
644a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → -1 ∈ ℂ)
65 nnm1nn0 11623 . . . . . . . . . . . . . . 15 (𝑙 ∈ ℕ → (𝑙 − 1) ∈ ℕ0)
6665adantl 474 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → (𝑙 − 1) ∈ ℕ0)
6764, 66expcld 13262 . . . . . . . . . . . . 13 ((𝜑𝑙 ∈ ℕ) → (-1↑(𝑙 − 1)) ∈ ℂ)
681adantr 473 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → 𝐴 ∈ ℂ)
69 nnnn0 11588 . . . . . . . . . . . . . . 15 (𝑙 ∈ ℕ → 𝑙 ∈ ℕ0)
7069adantl 474 . . . . . . . . . . . . . 14 ((𝜑𝑙 ∈ ℕ) → 𝑙 ∈ ℕ0)
7168, 70expcld 13262 . . . . . . . . . . . . 13 ((𝜑𝑙 ∈ ℕ) → (𝐴𝑙) ∈ ℂ)
7267, 71mulcld 10349 . . . . . . . . . . . 12 ((𝜑𝑙 ∈ ℕ) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ)
7372expcom 403 . . . . . . . . . . 11 (𝑙 ∈ ℕ → (𝜑 → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
74 elfznn 12624 . . . . . . . . . . 11 (𝑙 ∈ (1...((𝑁 − 1) + 1)) → 𝑙 ∈ ℕ)
7573, 74syl11 33 . . . . . . . . . 10 (𝜑 → (𝑙 ∈ (1...((𝑁 − 1) + 1)) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
7663, 75syl5bi 234 . . . . . . . . 9 (𝜑 → (𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1)) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ))
7776imp 396 . . . . . . . 8 ((𝜑𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) ∈ ℂ)
78 oveq1 6885 . . . . . . . . . 10 (𝑙 = ((𝑁 − 1) + 1) → (𝑙 − 1) = (((𝑁 − 1) + 1) − 1))
7978oveq2d 6894 . . . . . . . . 9 (𝑙 = ((𝑁 − 1) + 1) → (-1↑(𝑙 − 1)) = (-1↑(((𝑁 − 1) + 1) − 1)))
80 oveq2 6886 . . . . . . . . 9 (𝑙 = ((𝑁 − 1) + 1) → (𝐴𝑙) = (𝐴↑((𝑁 − 1) + 1)))
8179, 80oveq12d 6896 . . . . . . . 8 (𝑙 = ((𝑁 − 1) + 1) → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) = ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1))))
8261, 77, 81fsumm1 14821 . . . . . . 7 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = (Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) + ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1)))))
8333zcnd 11773 . . . . . . . . . . . 12 (𝜑 → (𝑁 − 1) ∈ ℂ)
84 pncan1 10746 . . . . . . . . . . . 12 ((𝑁 − 1) ∈ ℂ → (((𝑁 − 1) + 1) − 1) = (𝑁 − 1))
8583, 84syl 17 . . . . . . . . . . 11 (𝜑 → (((𝑁 − 1) + 1) − 1) = (𝑁 − 1))
8685oveq2d 6894 . . . . . . . . . 10 (𝜑 → ((0 + 1)...(((𝑁 − 1) + 1) − 1)) = ((0 + 1)...(𝑁 − 1)))
8786sumeq1d 14772 . . . . . . . . 9 (𝜑 → Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑙 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)))
88 oveq1 6885 . . . . . . . . . . . 12 (𝑙 = 𝑘 → (𝑙 − 1) = (𝑘 − 1))
8988oveq2d 6894 . . . . . . . . . . 11 (𝑙 = 𝑘 → (-1↑(𝑙 − 1)) = (-1↑(𝑘 − 1)))
90 oveq2 6886 . . . . . . . . . . 11 (𝑙 = 𝑘 → (𝐴𝑙) = (𝐴𝑘))
9189, 90oveq12d 6896 . . . . . . . . . 10 (𝑙 = 𝑘 → ((-1↑(𝑙 − 1)) · (𝐴𝑙)) = ((-1↑(𝑘 − 1)) · (𝐴𝑘)))
9291cbvsumv 14767 . . . . . . . . 9 Σ𝑙 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))
9387, 92syl6eq 2849 . . . . . . . 8 (𝜑 → Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)))
9485oveq2d 6894 . . . . . . . . 9 (𝜑 → (-1↑(((𝑁 − 1) + 1) − 1)) = (-1↑(𝑁 − 1)))
9555oveq2d 6894 . . . . . . . . 9 (𝜑 → (𝐴↑((𝑁 − 1) + 1)) = (𝐴𝑁))
9694, 95oveq12d 6896 . . . . . . . 8 (𝜑 → ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
9793, 96oveq12d 6896 . . . . . . 7 (𝜑 → (Σ𝑙 ∈ ((0 + 1)...(((𝑁 − 1) + 1) − 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) + ((-1↑(((𝑁 − 1) + 1) − 1)) · (𝐴↑((𝑁 − 1) + 1)))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
9882, 97eqtrd 2833 . . . . . 6 (𝜑 → Σ𝑙 ∈ ((0 + 1)...((𝑁 − 1) + 1))((-1↑(𝑙 − 1)) · (𝐴𝑙)) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
9943, 52, 983eqtrd 2837 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))))
100 nnm1nn0 11623 . . . . . . . . 9 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
101 elnn0uz 11969 . . . . . . . . 9 ((𝑁 − 1) ∈ ℕ0 ↔ (𝑁 − 1) ∈ (ℤ‘0))
102100, 101sylib 210 . . . . . . . 8 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ‘0))
10329, 102syl 17 . . . . . . 7 (𝜑 → (𝑁 − 1) ∈ (ℤ‘0))
104 oveq2 6886 . . . . . . . . 9 (𝑘 = 0 → (-1↑𝑘) = (-1↑0))
105 exp0 13118 . . . . . . . . . 10 (-1 ∈ ℂ → (-1↑0) = 1)
1064, 105ax-mp 5 . . . . . . . . 9 (-1↑0) = 1
107104, 106syl6eq 2849 . . . . . . . 8 (𝑘 = 0 → (-1↑𝑘) = 1)
108 oveq2 6886 . . . . . . . 8 (𝑘 = 0 → (𝐴𝑘) = (𝐴↑0))
109107, 108oveq12d 6896 . . . . . . 7 (𝑘 = 0 → ((-1↑𝑘) · (𝐴𝑘)) = (1 · (𝐴↑0)))
110103, 11, 109fsum1p 14823 . . . . . 6 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) = ((1 · (𝐴↑0)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
111 exp0 13118 . . . . . . . . . 10 (𝐴 ∈ ℂ → (𝐴↑0) = 1)
1121, 111syl 17 . . . . . . . . 9 (𝜑 → (𝐴↑0) = 1)
113112oveq2d 6894 . . . . . . . 8 (𝜑 → (1 · (𝐴↑0)) = (1 · 1))
114 1t1e1 11482 . . . . . . . 8 (1 · 1) = 1
115113, 114syl6eq 2849 . . . . . . 7 (𝜑 → (1 · (𝐴↑0)) = 1)
116115oveq1d 6893 . . . . . 6 (𝜑 → ((1 · (𝐴↑0)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (1 + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
117 fzfid 13027 . . . . . . . 8 (𝜑 → ((0 + 1)...(𝑁 − 1)) ∈ Fin)
118 elfznn 12624 . . . . . . . . . . 11 (𝑘 ∈ (1...(𝑁 − 1)) → 𝑘 ∈ ℕ)
1194a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → -1 ∈ ℂ)
120 nnnn0 11588 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
121120adantl 474 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ0)
122119, 121expcld 13262 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (-1↑𝑘) ∈ ℂ)
1231adantr 473 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝐴 ∈ ℂ)
124123, 121expcld 13262 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (𝐴𝑘) ∈ ℂ)
125122, 124mulcld 10349 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
126125expcom 403 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
127118, 126syl 17 . . . . . . . . . 10 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
12856oveq1i 6888 . . . . . . . . . 10 ((0 + 1)...(𝑁 − 1)) = (1...(𝑁 − 1))
129127, 128eleq2s 2896 . . . . . . . . 9 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ))
130129impcom 397 . . . . . . . 8 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → ((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
131117, 130fsumcl 14805 . . . . . . 7 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) ∈ ℂ)
1322, 131addcomd 10528 . . . . . 6 (𝜑 → (1 + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1))
133110, 116, 1323eqtrd 2837 . . . . 5 (𝜑 → Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1))
13499, 133oveq12d 6896 . . . 4 (𝜑 → (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)) + 1)))
135 nnm1nn0 11623 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑘 − 1) ∈ ℕ0)
136135adantl 474 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (𝑘 − 1) ∈ ℕ0)
137119, 136expcld 13262 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (-1↑(𝑘 − 1)) ∈ ℂ)
138137, 124mulcld 10349 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
139138expcom 403 . . . . . . . . . 10 (𝑘 ∈ ℕ → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
140118, 139syl 17 . . . . . . . . 9 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
141140, 128eleq2s 2896 . . . . . . . 8 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ))
142141impcom 397 . . . . . . 7 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → ((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
143117, 142fsumcl 14805 . . . . . 6 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) ∈ ℂ)
1444a1i 11 . . . . . . . 8 (𝜑 → -1 ∈ ℂ)
14529, 100syl 17 . . . . . . . 8 (𝜑 → (𝑁 − 1) ∈ ℕ0)
146144, 145expcld 13262 . . . . . . 7 (𝜑 → (-1↑(𝑁 − 1)) ∈ ℂ)
147 nnnn0 11588 . . . . . . . . 9 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
14829, 147syl 17 . . . . . . . 8 (𝜑𝑁 ∈ ℕ0)
1491, 148expcld 13262 . . . . . . 7 (𝜑 → (𝐴𝑁) ∈ ℂ)
150146, 149mulcld 10349 . . . . . 6 (𝜑 → ((-1↑(𝑁 − 1)) · (𝐴𝑁)) ∈ ℂ)
151143, 150addcld 10348 . . . . 5 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) ∈ ℂ)
152151, 131, 2addassd 10351 . . . 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 10528 . . . . . . 7 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘))))
154153oveq1d 6893 . . . . . 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 10351 . . . . . 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 11321 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
157 npcan1 10747 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℂ → ((𝑘 − 1) + 1) = 𝑘)
158156, 157syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ → ((𝑘 − 1) + 1) = 𝑘)
159158eqcomd 2805 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → 𝑘 = ((𝑘 − 1) + 1))
160159oveq2d 6894 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → (-1↑𝑘) = (-1↑((𝑘 − 1) + 1)))
1614a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → -1 ∈ ℂ)
162161, 135expp1d 13263 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → (-1↑((𝑘 − 1) + 1)) = ((-1↑(𝑘 − 1)) · -1))
163161, 135expcld 13262 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → (-1↑(𝑘 − 1)) ∈ ℂ)
164163, 161mulcomd 10350 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) · -1) = (-1 · (-1↑(𝑘 − 1))))
165160, 162, 1643eqtrd 2837 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (-1↑𝑘) = (-1 · (-1↑(𝑘 − 1))))
166165oveq2d 6894 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = ((-1↑(𝑘 − 1)) + (-1 · (-1↑(𝑘 − 1)))))
167163mulm1d 10774 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (-1 · (-1↑(𝑘 − 1))) = -(-1↑(𝑘 − 1)))
168167oveq2d 6894 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1 · (-1↑(𝑘 − 1)))) = ((-1↑(𝑘 − 1)) + -(-1↑(𝑘 − 1))))
169163negidd 10674 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + -(-1↑(𝑘 − 1))) = 0)
170166, 168, 1693eqtrd 2837 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = 0)
171170adantl 474 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → ((-1↑(𝑘 − 1)) + (-1↑𝑘)) = 0)
172171oveq1d 6893 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) + (-1↑𝑘)) · (𝐴𝑘)) = (0 · (𝐴𝑘)))
173137, 122, 124adddird 10354 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) + (-1↑𝑘)) · (𝐴𝑘)) = (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))))
174124mul02d 10524 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (0 · (𝐴𝑘)) = 0)
175172, 173, 1743eqtr3d 2841 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0)
176175expcom 403 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
177118, 176syl 17 . . . . . . . . . . . 12 (𝑘 ∈ (1...(𝑁 − 1)) → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
178177, 128eleq2s 2896 . . . . . . . . . . 11 (𝑘 ∈ ((0 + 1)...(𝑁 − 1)) → (𝜑 → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0))
179178impcom 397 . . . . . . . . . 10 ((𝜑𝑘 ∈ ((0 + 1)...(𝑁 − 1))) → (((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = 0)
180179sumeq2dv 14774 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))(((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))0)
181117, 142, 130fsumadd 14811 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))(((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑𝑘) · (𝐴𝑘))) = (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
182117olcd 901 . . . . . . . . . 10 (𝜑 → (((0 + 1)...(𝑁 − 1)) ⊆ (ℤ‘1) ∨ ((0 + 1)...(𝑁 − 1)) ∈ Fin))
183 sumz 14794 . . . . . . . . . 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 2841 . . . . . . . 8 (𝜑 → (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = 0)
186185oveq2d 6894 . . . . . . 7 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 0))
187150addid1d 10526 . . . . . . 7 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 0) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
188186, 187eqtrd 2833 . . . . . 6 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + (Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘)))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
189154, 155, 1883eqtrd 2837 . . . . 5 (𝜑 → ((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = ((-1↑(𝑁 − 1)) · (𝐴𝑁)))
190189oveq1d 6893 . . . 4 (𝜑 → (((Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑(𝑘 − 1)) · (𝐴𝑘)) + ((-1↑(𝑁 − 1)) · (𝐴𝑁))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) + 1) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
191134, 152, 1903eqtr2d 2839 . . 3 (𝜑 → (Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴↑(𝑘 + 1))) + Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
19213, 26, 1913eqtrd 2837 . 2 (𝜑 → ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))) = (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1))
193192eqcomd 2805 1 (𝜑 → (((-1↑(𝑁 − 1)) · (𝐴𝑁)) + 1) = ((𝐴 + 1) · Σ𝑘 ∈ (0...(𝑁 − 1))((-1↑𝑘) · (𝐴𝑘))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 385  wo 874   = wceq 1653  wcel 2157  wss 3769  cfv 6101  (class class class)co 6878  Fincfn 8195  cc 10222  0cc0 10224  1c1 10225   + caddc 10227   · cmul 10229  cmin 10556  -cneg 10557  cn 11312  0cn0 11580  cz 11666  cuz 11930  ...cfz 12580  cexp 13114  Σcsu 14757
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-8 2159  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2377  ax-ext 2777  ax-rep 4964  ax-sep 4975  ax-nul 4983  ax-pow 5035  ax-pr 5097  ax-un 7183  ax-inf2 8788  ax-cnex 10280  ax-resscn 10281  ax-1cn 10282  ax-icn 10283  ax-addcl 10284  ax-addrcl 10285  ax-mulcl 10286  ax-mulrcl 10287  ax-mulcom 10288  ax-addass 10289  ax-mulass 10290  ax-distr 10291  ax-i2m1 10292  ax-1ne0 10293  ax-1rid 10294  ax-rnegex 10295  ax-rrecex 10296  ax-cnre 10297  ax-pre-lttri 10298  ax-pre-lttrn 10299  ax-pre-ltadd 10300  ax-pre-mulgt0 10301  ax-pre-sup 10302
This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3or 1109  df-3an 1110  df-tru 1657  df-fal 1667  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2591  df-eu 2609  df-clab 2786  df-cleq 2792  df-clel 2795  df-nfc 2930  df-ne 2972  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3387  df-sbc 3634  df-csb 3729  df-dif 3772  df-un 3774  df-in 3776  df-ss 3783  df-pss 3785  df-nul 4116  df-if 4278  df-pw 4351  df-sn 4369  df-pr 4371  df-tp 4373  df-op 4375  df-uni 4629  df-int 4668  df-iun 4712  df-br 4844  df-opab 4906  df-mpt 4923  df-tr 4946  df-id 5220  df-eprel 5225  df-po 5233  df-so 5234  df-fr 5271  df-se 5272  df-we 5273  df-xp 5318  df-rel 5319  df-cnv 5320  df-co 5321  df-dm 5322  df-rn 5323  df-res 5324  df-ima 5325  df-pred 5898  df-ord 5944  df-on 5945  df-lim 5946  df-suc 5947  df-iota 6064  df-fun 6103  df-fn 6104  df-f 6105  df-f1 6106  df-fo 6107  df-f1o 6108  df-fv 6109  df-isom 6110  df-riota 6839  df-ov 6881  df-oprab 6882  df-mpt2 6883  df-om 7300  df-1st 7401  df-2nd 7402  df-wrecs 7645  df-recs 7707  df-rdg 7745  df-1o 7799  df-oadd 7803  df-er 7982  df-en 8196  df-dom 8197  df-sdom 8198  df-fin 8199  df-sup 8590  df-oi 8657  df-card 9051  df-pnf 10365  df-mnf 10366  df-xr 10367  df-ltxr 10368  df-le 10369  df-sub 10558  df-neg 10559  df-div 10977  df-nn 11313  df-2 11376  df-3 11377  df-n0 11581  df-z 11667  df-uz 11931  df-rp 12075  df-fz 12581  df-fzo 12721  df-seq 13056  df-exp 13115  df-hash 13371  df-cj 14180  df-re 14181  df-im 14182  df-sqrt 14316  df-abs 14317  df-clim 14560  df-sum 14758
This theorem is referenced by:  oddpwp1fsum  15451
  Copyright terms: Public domain W3C validator