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

Theorem leibpi 27187
Description: The Leibniz formula for π. This proof depends on three main facts: (1) the series 𝐹 is convergent, because it is an alternating series (iseralt 15776). (2) Using leibpilem2 27186 to rewrite the series as a power series, it is the 𝑥 = 1 special case of the Taylor series for arctan (atantayl2 27183). (3) Although we cannot directly plug 𝑥 = 1 into atantayl2 27183, Abel's theorem (abelth2 26685) says that the limit along any sequence converging to 1, such as 1 − 1 / 𝑛, of the power series converges to the power series extended to 1, and then since arctan is continuous at 1 (atancn 27181) we get the desired result. This is Metamath 100 proof #26. (Contributed by Mario Carneiro, 7-Apr-2015.)
Hypothesis
Ref Expression
leibpi.1 𝐹 = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))
Assertion
Ref Expression
leibpi seq0( + , 𝐹) ⇝ (π / 4)

Proof of Theorem leibpi
Dummy variables 𝑗 𝑘 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nn0uz 12929 . . . . 5 0 = (ℤ‘0)
2 0zd 12631 . . . . 5 (⊤ → 0 ∈ ℤ)
3 eqidd 2763 . . . . 5 ((⊤ ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
4 0cnd 11227 . . . . . . . . 9 ((𝑘 ∈ ℕ0 ∧ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → 0 ∈ ℂ)
5 ioran 999 . . . . . . . . . 10 (¬ (𝑘 = 0 ∨ 2 ∥ 𝑘) ↔ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘))
6 neg1rr 12232 . . . . . . . . . . . . 13 -1 ∈ ℝ
7 leibpilem1 27185 . . . . . . . . . . . . . 14 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (𝑘 ∈ ℕ ∧ ((𝑘 − 1) / 2) ∈ ℕ0))
87simprd 501 . . . . . . . . . . . . 13 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((𝑘 − 1) / 2) ∈ ℕ0)
9 reexpcl 14146 . . . . . . . . . . . . 13 ((-1 ∈ ℝ ∧ ((𝑘 − 1) / 2) ∈ ℕ0) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
106, 8, 9sylancr 599 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
117simpld 500 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ)
1210, 11nndivred 12318 . . . . . . . . . . 11 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℝ)
1312recnd 11265 . . . . . . . . . 10 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
145, 13sylan2b 606 . . . . . . . . 9 ((𝑘 ∈ ℕ0 ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
154, 14ifclda 4521 . . . . . . . 8 (𝑘 ∈ ℕ0 → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ ℂ)
1615adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ ℂ)
1716fmpttd 7112 . . . . . 6 (⊤ → (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘))):ℕ0⟶ℂ)
1817ffvelcdmda 7081 . . . . 5 ((⊤ ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ ℂ)
19 2nn0 12549 . . . . . . . . . . . . . 14 2 ∈ ℕ0
2019a1i 11 . . . . . . . . . . . . 13 (⊤ → 2 ∈ ℕ0)
21 nn0mulcl 12568 . . . . . . . . . . . . 13 ((2 ∈ ℕ0𝑛 ∈ ℕ0) → (2 · 𝑛) ∈ ℕ0)
2220, 21sylan 592 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ0) → (2 · 𝑛) ∈ ℕ0)
23 nn0p1nn 12571 . . . . . . . . . . . 12 ((2 · 𝑛) ∈ ℕ0 → ((2 · 𝑛) + 1) ∈ ℕ)
2422, 23syl 18 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ0) → ((2 · 𝑛) + 1) ∈ ℕ)
2524nnrecred 12315 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ0) → (1 / ((2 · 𝑛) + 1)) ∈ ℝ)
2625fmpttd 7112 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))):ℕ0⟶ℝ)
27 nn0mulcl 12568 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
2820, 27sylan 592 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
2928nn0red 12594 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℝ)
30 peano2nn0 12572 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
3130adantl 487 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℕ0)
32 nn0mulcl 12568 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0 ∧ (𝑘 + 1) ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℕ0)
3319, 31, 32sylancr 599 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℕ0)
3433nn0red 12594 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℝ)
35 1red 11237 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 1 ∈ ℝ)
36 nn0re 12541 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
3736adantl 487 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
3837lep1d 12174 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → 𝑘 ≤ (𝑘 + 1))
39 peano2re 11411 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℝ → (𝑘 + 1) ∈ ℝ)
4037, 39syl 18 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℝ)
41 2re 12343 . . . . . . . . . . . . . . 15 2 ∈ ℝ
4241a1i 11 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 2 ∈ ℝ)
43 2pos 12373 . . . . . . . . . . . . . . 15 0 < 2
4443a1i 11 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < 2)
45 lemul2 12096 . . . . . . . . . . . . . 14 ((𝑘 ∈ ℝ ∧ (𝑘 + 1) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (𝑘 ≤ (𝑘 + 1) ↔ (2 · 𝑘) ≤ (2 · (𝑘 + 1))))
4637, 40, 42, 44, 45syl112anc 1401 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝑘 ≤ (𝑘 + 1) ↔ (2 · 𝑘) ≤ (2 · (𝑘 + 1))))
4738, 46mpbid 235 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · 𝑘) ≤ (2 · (𝑘 + 1)))
4829, 34, 35, 47leadd1dd 11856 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≤ ((2 · (𝑘 + 1)) + 1))
49 nn0p1nn 12571 . . . . . . . . . . . . . 14 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
5028, 49syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ)
5150nnred 12276 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℝ)
5250nngt0d 12313 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < ((2 · 𝑘) + 1))
53 nn0p1nn 12571 . . . . . . . . . . . . . 14 ((2 · (𝑘 + 1)) ∈ ℕ0 → ((2 · (𝑘 + 1)) + 1) ∈ ℕ)
5433, 53syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · (𝑘 + 1)) + 1) ∈ ℕ)
5554nnred 12276 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · (𝑘 + 1)) + 1) ∈ ℝ)
5654nngt0d 12313 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < ((2 · (𝑘 + 1)) + 1))
57 lerec 12126 . . . . . . . . . . . 12 (((((2 · 𝑘) + 1) ∈ ℝ ∧ 0 < ((2 · 𝑘) + 1)) ∧ (((2 · (𝑘 + 1)) + 1) ∈ ℝ ∧ 0 < ((2 · (𝑘 + 1)) + 1))) → (((2 · 𝑘) + 1) ≤ ((2 · (𝑘 + 1)) + 1) ↔ (1 / ((2 · (𝑘 + 1)) + 1)) ≤ (1 / ((2 · 𝑘) + 1))))
5851, 52, 55, 56, 57syl22anc 852 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → (((2 · 𝑘) + 1) ≤ ((2 · (𝑘 + 1)) + 1) ↔ (1 / ((2 · (𝑘 + 1)) + 1)) ≤ (1 / ((2 · 𝑘) + 1))))
5948, 58mpbid 235 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → (1 / ((2 · (𝑘 + 1)) + 1)) ≤ (1 / ((2 · 𝑘) + 1)))
60 oveq2 7425 . . . . . . . . . . . . . 14 (𝑛 = (𝑘 + 1) → (2 · 𝑛) = (2 · (𝑘 + 1)))
6160oveq1d 7432 . . . . . . . . . . . . 13 (𝑛 = (𝑘 + 1) → ((2 · 𝑛) + 1) = ((2 · (𝑘 + 1)) + 1))
6261oveq2d 7433 . . . . . . . . . . . 12 (𝑛 = (𝑘 + 1) → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · (𝑘 + 1)) + 1)))
63 eqid 2762 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))
64 ovex 7450 . . . . . . . . . . . 12 (1 / ((2 · (𝑘 + 1)) + 1)) ∈ V
6562, 63, 64fvmpt 6990 . . . . . . . . . . 11 ((𝑘 + 1) ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘(𝑘 + 1)) = (1 / ((2 · (𝑘 + 1)) + 1)))
6631, 65syl 18 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘(𝑘 + 1)) = (1 / ((2 · (𝑘 + 1)) + 1)))
67 oveq2 7425 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (2 · 𝑛) = (2 · 𝑘))
6867oveq1d 7432 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
6968oveq2d 7433 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · 𝑘) + 1)))
70 ovex 7450 . . . . . . . . . . . 12 (1 / ((2 · 𝑘) + 1)) ∈ V
7169, 63, 70fvmpt 6990 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
7271adantl 487 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
7359, 66, 723brtr4d 5141 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘(𝑘 + 1)) ≤ ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘))
74 nnuz 12930 . . . . . . . . . 10 ℕ = (ℤ‘1)
75 1zzd 12653 . . . . . . . . . 10 (⊤ → 1 ∈ ℤ)
76 ax-1cn 11186 . . . . . . . . . . 11 1 ∈ ℂ
77 divcnv 15946 . . . . . . . . . . 11 (1 ∈ ℂ → (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0)
7876, 77mp1i 14 . . . . . . . . . 10 (⊤ → (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0)
79 nn0ex 12538 . . . . . . . . . . . 12 0 ∈ V
8079mptex 7226 . . . . . . . . . . 11 (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ∈ V
8180a1i 11 . . . . . . . . . 10 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ∈ V)
82 oveq2 7425 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (1 / 𝑛) = (1 / 𝑘))
83 eqid 2762 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ ↦ (1 / 𝑛)) = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
84 ovex 7450 . . . . . . . . . . . . 13 (1 / 𝑘) ∈ V
8582, 83, 84fvmpt 6990 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) = (1 / 𝑘))
8685adantl 487 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) = (1 / 𝑘))
87 nnrecre 12306 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
8887adantl 487 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ)
8986, 88eqeltrd 2862 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) ∈ ℝ)
90 nnnn0 12539 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
9190adantl 487 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ0)
9291, 71syl 18 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
9390, 50sylan2 605 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℕ)
9493nnrecred 12315 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ∈ ℝ)
9592, 94eqeltrd 2862 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) ∈ ℝ)
96 nnre 12268 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
9796adantl 487 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℝ)
9819, 91, 27sylancr 599 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ∈ ℕ0)
9998nn0red 12594 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ∈ ℝ)
100 peano2re 11411 . . . . . . . . . . . . . 14 ((2 · 𝑘) ∈ ℝ → ((2 · 𝑘) + 1) ∈ ℝ)
10199, 100syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ)
102 nn0addge1 12578 . . . . . . . . . . . . . . 15 ((𝑘 ∈ ℝ ∧ 𝑘 ∈ ℕ0) → 𝑘 ≤ (𝑘 + 𝑘))
10397, 91, 102syl2anc 596 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ (𝑘 + 𝑘))
10497recnd 11265 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
1051042timesd 12515 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) = (𝑘 + 𝑘))
106103, 105breqtrrd 5137 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ (2 · 𝑘))
10799lep1d 12174 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ≤ ((2 · 𝑘) + 1))
10897, 99, 101, 106, 107letrd 11395 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ ((2 · 𝑘) + 1))
109 nngt0 12295 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 0 < 𝑘)
110109adantl 487 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 < 𝑘)
11193nnred 12276 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ)
11293nngt0d 12313 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 < ((2 · 𝑘) + 1))
113 lerec 12126 . . . . . . . . . . . . 13 (((𝑘 ∈ ℝ ∧ 0 < 𝑘) ∧ (((2 · 𝑘) + 1) ∈ ℝ ∧ 0 < ((2 · 𝑘) + 1))) → (𝑘 ≤ ((2 · 𝑘) + 1) ↔ (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘)))
11497, 110, 111, 112, 113syl22anc 852 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝑘 ≤ ((2 · 𝑘) + 1) ↔ (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘)))
115108, 114mpbid 235 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘))
116115, 92, 863brtr4d 5141 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) ≤ ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘))
11793nnrpd 13088 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ+)
118117rpreccld 13100 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ∈ ℝ+)
119118rpge0d 13094 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ (1 / ((2 · 𝑘) + 1)))
120119, 92breqtrrd 5137 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘))
12174, 75, 78, 81, 89, 95, 116, 120climsqz2 15733 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ⇝ 0)
122 neg1cn 12231 . . . . . . . . . . . . 13 -1 ∈ ℂ
123122a1i 11 . . . . . . . . . . . 12 (⊤ → -1 ∈ ℂ)
124 expcl 14147 . . . . . . . . . . . 12 ((-1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
125123, 124sylan 592 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
12650nncnd 12277 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℂ)
12750nnne0d 12314 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≠ 0)
128125, 126, 127divrecd 12022 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((-1↑𝑘) / ((2 · 𝑘) + 1)) = ((-1↑𝑘) · (1 / ((2 · 𝑘) + 1))))
129 oveq2 7425 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (-1↑𝑛) = (-1↑𝑘))
130129, 68oveq12d 7435 . . . . . . . . . . . 12 (𝑛 = 𝑘 → ((-1↑𝑛) / ((2 · 𝑛) + 1)) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
131 eqid 2762 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))
132 ovex 7450 . . . . . . . . . . . 12 ((-1↑𝑘) / ((2 · 𝑘) + 1)) ∈ V
133130, 131, 132fvmpt 6990 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
134133adantl 487 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
13572oveq2d 7433 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((-1↑𝑘) · ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘)) = ((-1↑𝑘) · (1 / ((2 · 𝑘) + 1))))
136128, 134, 1353eqtr4d 2807 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) · ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘)))
1371, 2, 26, 73, 121, 136iseralt 15776 . . . . . . . 8 (⊤ → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ∈ dom ⇝ )
138 climdm 15645 . . . . . . . 8 (seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ∈ dom ⇝ ↔ seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))))
139137, 138sylib 221 . . . . . . 7 (⊤ → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))))
140 eqid 2762 . . . . . . . 8 (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘))) = (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
141 fvex 6895 . . . . . . . 8 ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))) ∈ V
142131, 140, 141leibpilem2 27186 . . . . . . 7 (seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))) ↔ seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))))
143139, 142sylib 221 . . . . . 6 (⊤ → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))))
144 seqex 14071 . . . . . . 7 seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ∈ V
145144, 141breldm 5896 . . . . . 6 (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))) → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ∈ dom ⇝ )
146143, 145syl 18 . . . . 5 (⊤ → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ∈ dom ⇝ )
1471, 2, 3, 18, 146isumclim2 15848 . . . 4 (⊤ → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
148 eqid 2762 . . . . . . . 8 (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) = (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)))
14917, 146, 148abelth2 26685 . . . . . . 7 (⊤ → (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∈ ((0[,]1)–cn→ℂ))
150 nnrp 13058 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ+)
151150adantl 487 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ+)
152151rpreccld 13100 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ ℝ+)
153152rpred 13090 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ ℝ)
154152rpge0d 13094 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ≤ (1 / 𝑛))
155 nnge1 12292 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 1 ≤ 𝑛)
156155adantl 487 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ≤ 𝑛)
157 nnre 12268 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
158157adantl 487 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
159158recnd 11265 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
160159mulridd 11254 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → (𝑛 · 1) = 𝑛)
161156, 160breqtrrd 5137 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ≤ (𝑛 · 1))
162 1red 11237 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ∈ ℝ)
163 nngt0 12295 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 0 < 𝑛)
164163adantl 487 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 < 𝑛)
165 ledivmul 12119 . . . . . . . . . . . 12 ((1 ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) → ((1 / 𝑛) ≤ 1 ↔ 1 ≤ (𝑛 · 1)))
166162, 162, 158, 164, 165syl112anc 1401 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → ((1 / 𝑛) ≤ 1 ↔ 1 ≤ (𝑛 · 1)))
167161, 166mpbird 260 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ≤ 1)
168 elicc01 13523 . . . . . . . . . 10 ((1 / 𝑛) ∈ (0[,]1) ↔ ((1 / 𝑛) ∈ ℝ ∧ 0 ≤ (1 / 𝑛) ∧ (1 / 𝑛) ≤ 1))
169153, 154, 167, 168syl3anbrc 1362 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ (0[,]1))
170 iirev 25163 . . . . . . . . 9 ((1 / 𝑛) ∈ (0[,]1) → (1 − (1 / 𝑛)) ∈ (0[,]1))
171169, 170syl 18 . . . . . . . 8 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ (0[,]1))
172171fmpttd 7112 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶(0[,]1))
173 1cnd 11230 . . . . . . . . 9 (⊤ → 1 ∈ ℂ)
174 nnex 12267 . . . . . . . . . . 11 ℕ ∈ V
175174mptex 7226 . . . . . . . . . 10 (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ∈ V
176175a1i 11 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ∈ V)
17789recnd 11265 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) ∈ ℂ)
17882oveq2d 7433 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (1 − (1 / 𝑛)) = (1 − (1 / 𝑘)))
179 eqid 2762 . . . . . . . . . . . 12 (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) = (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))
180 ovex 7450 . . . . . . . . . . . 12 (1 − (1 / 𝑘)) ∈ V
181178, 179, 180fvmpt 6990 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − (1 / 𝑘)))
18285oveq2d 7433 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)) = (1 − (1 / 𝑘)))
183181, 182eqtr4d 2800 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)))
184183adantl 487 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)))
18574, 75, 78, 173, 176, 177, 184climsubc2 15730 . . . . . . . 8 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ⇝ (1 − 0))
186 1m0e1 12388 . . . . . . . 8 (1 − 0) = 1
187185, 186breqtrdi 5150 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ⇝ 1)
188 1elunit 13527 . . . . . . . 8 1 ∈ (0[,]1)
189188a1i 11 . . . . . . 7 (⊤ → 1 ∈ (0[,]1))
19074, 75, 149, 172, 187, 189climcncf 25134 . . . . . 6 (⊤ → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) ⇝ ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)))‘1))
191 eqidd 2763 . . . . . . . 8 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) = (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))))
192 eqidd 2763 . . . . . . . 8 (⊤ → (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) = (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))))
193 oveq1 7424 . . . . . . . . . 10 (𝑥 = (1 − (1 / 𝑛)) → (𝑥𝑗) = ((1 − (1 / 𝑛))↑𝑗))
194193oveq2d 7433 . . . . . . . . 9 (𝑥 = (1 − (1 / 𝑛)) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
195194sumeq2sdv 15794 . . . . . . . 8 (𝑥 = (1 − (1 / 𝑛)) → Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
196171, 191, 192, 195fmptco 7127 . . . . . . 7 (⊤ → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) = (𝑛 ∈ ℕ ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))))
197 0zd 12631 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ∈ ℤ)
1988adantll 727 . . . . . . . . . . . . . . . . . . . . . 22 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((𝑘 − 1) / 2) ∈ ℕ0)
1996, 198, 9sylancr 599 . . . . . . . . . . . . . . . . . . . . 21 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
200199recnd 11265 . . . . . . . . . . . . . . . . . . . 20 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℂ)
201200adantllr 732 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℂ)
202 1re 11236 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℝ
203 resubcl 11550 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℝ ∧ (1 / 𝑛) ∈ ℝ) → (1 − (1 / 𝑛)) ∈ ℝ)
204202, 153, 203sylancr 599 . . . . . . . . . . . . . . . . . . . . . 22 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ ℝ)
205204ad2antrr 739 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (1 − (1 / 𝑛)) ∈ ℝ)
206 simplr 781 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ0)
207205, 206reexpcld 14231 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℝ)
208207recnd 11265 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
209 nn0cn 12542 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
210209ad2antlr 740 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℂ)
21111adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ)
212211nnne0d 12314 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ≠ 0)
213201, 208, 210, 212div12d 12055 . . . . . . . . . . . . . . . . . 18 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((1 − (1 / 𝑛))↑𝑘) · ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
21413adantll 727 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
215208, 214mulcomd 11258 . . . . . . . . . . . . . . . . . 18 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) · ((-1↑((𝑘 − 1) / 2)) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
216213, 215eqtrd 2797 . . . . . . . . . . . . . . . . 17 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
2175, 216sylan2b 606 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
218217ifeq2da 4518 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
219204recnd 11265 . . . . . . . . . . . . . . . . . 18 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ ℂ)
220 expcl 14147 . . . . . . . . . . . . . . . . . 18 (((1 − (1 / 𝑛)) ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
221219, 220sylan 592 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
222221mul02d 11436 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (0 · ((1 − (1 / 𝑛))↑𝑘)) = 0)
223222ifeq1d 4505 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
224218, 223eqtr4d 2800 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
225 ovif 7515 . . . . . . . . . . . . . 14 (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
226224, 225eqtr4di 2815 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)))
227 simpr 490 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
228 c0ex 11228 . . . . . . . . . . . . . . 15 0 ∈ V
229 ovex 7450 . . . . . . . . . . . . . . 15 ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ V
230228, 229ifex 4536 . . . . . . . . . . . . . 14 if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V
231 eqid 2762 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))) = (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
232231fvmpt2 7002 . . . . . . . . . . . . . 14 ((𝑘 ∈ ℕ0 ∧ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
233227, 230, 232sylancl 598 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
234 ovex 7450 . . . . . . . . . . . . . . . 16 ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ V
235228, 234ifex 4536 . . . . . . . . . . . . . . 15 if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ V
236140fvmpt2 7002 . . . . . . . . . . . . . . 15 ((𝑘 ∈ ℕ0 ∧ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ V) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
237227, 235, 236sylancl 598 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
238237oveq1d 7432 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) = (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)))
239226, 233, 2383eqtr4d 2807 . . . . . . . . . . . 12 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
240239ralrimiva 3156 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → ∀𝑘 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
241 nfv 1947 . . . . . . . . . . . 12 𝑗((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘))
242 nffvmpt1 6893 . . . . . . . . . . . . 13 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
243 nffvmpt1 6893 . . . . . . . . . . . . . 14 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗)
244 nfcv 2924 . . . . . . . . . . . . . 14 𝑘 ·
245 nfcv 2924 . . . . . . . . . . . . . 14 𝑘((1 − (1 / 𝑛))↑𝑗)
246243, 244, 245nfov 7447 . . . . . . . . . . . . 13 𝑘(((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))
247242, 246nfeq 2937 . . . . . . . . . . . 12 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))
248 fveq2 6882 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
249 fveq2 6882 . . . . . . . . . . . . . 14 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
250 oveq2 7425 . . . . . . . . . . . . . 14 (𝑘 = 𝑗 → ((1 − (1 / 𝑛))↑𝑘) = ((1 − (1 / 𝑛))↑𝑗))
251249, 250oveq12d 7435 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
252248, 251eqeq12d 2778 . . . . . . . . . . . 12 (𝑘 = 𝑗 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) ↔ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))))
253241, 247, 252cbvralw 3306 . . . . . . . . . . 11 (∀𝑘 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) ↔ ∀𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
254240, 253sylib 221 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → ∀𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
255254r19.21bi 3256 . . . . . . . . 9 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
256 0cnd 11227 . . . . . . . . . . . . 13 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → 0 ∈ ℂ)
257207, 211nndivred 12318 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) / 𝑘) ∈ ℝ)
258257recnd 11265 . . . . . . . . . . . . . . 15 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) / 𝑘) ∈ ℂ)
259201, 258mulcld 11257 . . . . . . . . . . . . . 14 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ ℂ)
2605, 259sylan2b 606 . . . . . . . . . . . . 13 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ ℂ)
261256, 260ifclda 4521 . . . . . . . . . . . 12 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ ℂ)
262261fmpttd 7112 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))):ℕ0⟶ℂ)
263262ffvelcdmda 7081 . . . . . . . . . 10 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) ∈ ℂ)
264255, 263eqeltrrd 2863 . . . . . . . . 9 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)) ∈ ℂ)
265 0nn0 12547 . . . . . . . . . . . 12 0 ∈ ℕ0
266265a1i 11 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ∈ ℕ0)
267 0p1e1 12389 . . . . . . . . . . . . 13 (0 + 1) = 1
268 seqeq1 14072 . . . . . . . . . . . . 13 ((0 + 1) = 1 → seq(0 + 1)( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) = seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))))
269267, 268ax-mp 5 . . . . . . . . . . . 12 seq(0 + 1)( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) = seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))
270 1zzd 12653 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ∈ ℤ)
271 elnnuz 12931 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ ↔ 𝑗 ∈ (ℤ‘1))
272 nnne0 12298 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ ℕ → 𝑘 ≠ 0)
273272neneqd 2962 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℕ → ¬ 𝑘 = 0)
274 biorf 950 . . . . . . . . . . . . . . . . . . . . . . 23 𝑘 = 0 → (2 ∥ 𝑘 ↔ (𝑘 = 0 ∨ 2 ∥ 𝑘)))
275273, 274syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ → (2 ∥ 𝑘 ↔ (𝑘 = 0 ∨ 2 ∥ 𝑘)))
276275bicomd 226 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → ((𝑘 = 0 ∨ 2 ∥ 𝑘) ↔ 2 ∥ 𝑘))
277276ifbid 4509 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
27890, 230, 232sylancl 598 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
279228, 229ifex 4536 . . . . . . . . . . . . . . . . . . . . 21 if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V
280 eqid 2762 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))) = (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
281280fvmpt2 7002 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ ∧ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V) → ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
282279, 281mpan2 704 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
283277, 278, 2823eqtr4d 2807 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘))
284283rgen 3080 . . . . . . . . . . . . . . . . . 18 𝑘 ∈ ℕ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘)
285284a1i 11 . . . . . . . . . . . . . . . . 17 ((⊤ ∧ 𝑛 ∈ ℕ) → ∀𝑘 ∈ ℕ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘))
286 nfv 1947 . . . . . . . . . . . . . . . . . 18 𝑗((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘)
287 nffvmpt1 6893 . . . . . . . . . . . . . . . . . . 19 𝑘((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
288242, 287nfeq 2937 . . . . . . . . . . . . . . . . . 18 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
289 fveq2 6882 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
290248, 289eqeq12d 2778 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑗 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) ↔ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)))
291286, 288, 290cbvralw 3306 . . . . . . . . . . . . . . . . 17 (∀𝑘 ∈ ℕ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) ↔ ∀𝑗 ∈ ℕ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
292285, 291sylib 221 . . . . . . . . . . . . . . . 16 ((⊤ ∧ 𝑛 ∈ ℕ) → ∀𝑗 ∈ ℕ ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
293292r19.21bi 3256 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
294271, 293sylan2br 607 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ (ℤ‘1)) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
295270, 294seqfeq 14095 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) = seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))))
296153, 162, 167abssubge0d 15525 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑛 ∈ ℕ) → (abs‘(1 − (1 / 𝑛))) = (1 − (1 / 𝑛)))
297 ltsubrp 13084 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ ∧ (1 / 𝑛) ∈ ℝ+) → (1 − (1 / 𝑛)) < 1)
298202, 152, 297sylancr 599 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) < 1)
299296, 298eqbrtrd 5131 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → (abs‘(1 − (1 / 𝑛))) < 1)
300280atantayl2 27183 . . . . . . . . . . . . . 14 (((1 − (1 / 𝑛)) ∈ ℂ ∧ (abs‘(1 − (1 / 𝑛))) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
301219, 299, 300syl2anc 596 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
302295, 301eqbrtrd 5131 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
303269, 302eqbrtrid 5144 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → seq(0 + 1)( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
3041, 266, 263, 303clim2ser2 15747 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ ((arctan‘(1 − (1 / 𝑛))) + (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0)))
305 0z 12630 . . . . . . . . . . . . . 14 0 ∈ ℤ
306 seq1 14082 . . . . . . . . . . . . . 14 (0 ∈ ℤ → (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘0))
307305, 306ax-mp 5 . . . . . . . . . . . . 13 (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘0)
308 iftrue 4491 . . . . . . . . . . . . . . . 16 ((𝑘 = 0 ∨ 2 ∥ 𝑘) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = 0)
309308orcs 889 . . . . . . . . . . . . . . 15 (𝑘 = 0 → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = 0)
310309, 231, 228fvmpt 6990 . . . . . . . . . . . . . 14 (0 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘0) = 0)
311265, 310ax-mp 5 . . . . . . . . . . . . 13 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘0) = 0
312307, 311eqtri 2785 . . . . . . . . . . . 12 (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0) = 0
313312oveq2i 7428 . . . . . . . . . . 11 ((arctan‘(1 − (1 / 𝑛))) + (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0)) = ((arctan‘(1 − (1 / 𝑛))) + 0)
314 atanrecl 27156 . . . . . . . . . . . . . 14 ((1 − (1 / 𝑛)) ∈ ℝ → (arctan‘(1 − (1 / 𝑛))) ∈ ℝ)
315204, 314syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → (arctan‘(1 − (1 / 𝑛))) ∈ ℝ)
316315recnd 11265 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → (arctan‘(1 − (1 / 𝑛))) ∈ ℂ)
317316addridd 11438 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → ((arctan‘(1 − (1 / 𝑛))) + 0) = (arctan‘(1 − (1 / 𝑛))))
318313, 317eqtrid 2809 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → ((arctan‘(1 − (1 / 𝑛))) + (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0)) = (arctan‘(1 − (1 / 𝑛))))
319304, 318breqtrd 5135 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
3201, 197, 255, 264, 319isumclim 15847 . . . . . . . 8 ((⊤ ∧ 𝑛 ∈ ℕ) → Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)) = (arctan‘(1 − (1 / 𝑛))))
321320mpteq2dva 5202 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
322196, 321eqtrd 2797 . . . . . 6 (⊤ → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
323 oveq1 7424 . . . . . . . . . . . 12 (𝑥 = 1 → (𝑥𝑗) = (1↑𝑗))
324 nn0z 12643 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ0𝑗 ∈ ℤ)
325 1exp 14159 . . . . . . . . . . . . 13 (𝑗 ∈ ℤ → (1↑𝑗) = 1)
326324, 325syl 18 . . . . . . . . . . . 12 (𝑗 ∈ ℕ0 → (1↑𝑗) = 1)
327323, 326sylan9eq 2817 . . . . . . . . . . 11 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (𝑥𝑗) = 1)
328327oveq2d 7433 . . . . . . . . . 10 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · 1))
32917mptru 1577 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘))):ℕ0⟶ℂ
330329ffvelcdmi 7080 . . . . . . . . . . . 12 (𝑗 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ ℂ)
331330mulridd 11254 . . . . . . . . . . 11 (𝑗 ∈ ℕ0 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · 1) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
332331adantl 487 . . . . . . . . . 10 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · 1) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
333328, 332eqtrd 2797 . . . . . . . . 9 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
334333sumeq2dv 15793 . . . . . . . 8 (𝑥 = 1 → Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
335 sumex 15779 . . . . . . . 8 Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ V
336334, 148, 335fvmpt 6990 . . . . . . 7 (1 ∈ (0[,]1) → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)))‘1) = Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
337188, 336mp1i 14 . . . . . 6 (⊤ → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)))‘1) = Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
338190, 322, 3373brtr3d 5140 . . . . 5 (⊤ → (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
339 eqid 2762 . . . . . . . . 9 (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
340 eqid 2762 . . . . . . . . 9 {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} = {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
341339, 340atancn 27181 . . . . . . . 8 (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∈ ({𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}–cn→ℂ)
342341a1i 11 . . . . . . 7 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∈ ({𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}–cn→ℂ))
343 unitssre 13556 . . . . . . . . 9 (0[,]1) ⊆ ℝ
344339, 340ressatans 27179 . . . . . . . . 9 ℝ ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
345343, 344sstri 3943 . . . . . . . 8 (0[,]1) ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
346 fss 6723 . . . . . . . 8 (((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶(0[,]1) ∧ (0[,]1) ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
347172, 345, 346sylancl 598 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
348344, 202sselii 3931 . . . . . . . 8 1 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
349348a1i 11 . . . . . . 7 (⊤ → 1 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
35074, 75, 342, 347, 187, 349climcncf 25134 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) ⇝ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1))
351345, 171sselid 3932 . . . . . . 7 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
352 cncff 25127 . . . . . . . . . 10 ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∈ ({𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}–cn→ℂ) → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}):{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}⟶ℂ)
353341, 352mp1i 14 . . . . . . . . 9 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}):{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}⟶ℂ)
354353feqmptd 6950 . . . . . . . 8 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘)))
355 fvres 6901 . . . . . . . . 9 (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘) = (arctan‘𝑘))
356355mpteq2ia 5204 . . . . . . . 8 (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘)) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ (arctan‘𝑘))
357354, 356eqtrdi 2813 . . . . . . 7 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ (arctan‘𝑘)))
358 fveq2 6882 . . . . . . 7 (𝑘 = (1 − (1 / 𝑛)) → (arctan‘𝑘) = (arctan‘(1 − (1 / 𝑛))))
359351, 191, 357, 358fmptco 7127 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
360 fvres 6901 . . . . . . . 8 (1 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1) = (arctan‘1))
361348, 360mp1i 14 . . . . . . 7 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1) = (arctan‘1))
362 atan1 27173 . . . . . . 7 (arctan‘1) = (π / 4)
363361, 362eqtrdi 2813 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1) = (π / 4))
364350, 359, 3633brtr3d 5140 . . . . 5 (⊤ → (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ (π / 4))
365 climuni 15643 . . . . 5 (((𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∧ (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ (π / 4)) → Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) = (π / 4))
366338, 364, 365syl2anc 596 . . . 4 (⊤ → Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) = (π / 4))
367147, 366breqtrd 5135 . . 3 (⊤ → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ (π / 4))
368367mptru 1577 . 2 seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ (π / 4)
369 leibpi.1 . . 3 𝐹 = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))
370 ovex 7450 . . 3 (π / 4) ∈ V
371369, 140, 370leibpilem2 27186 . 2 (seq0( + , 𝐹) ⇝ (π / 4) ↔ seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ (π / 4))
372368, 371mpbir 234 1 seq0( + , 𝐹) ⇝ (π / 4)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wb 209  wa 401  wo 861   = wceq 1570  wtru 1571  wcel 2145  wral 3078  {crab 3414  Vcvv 3453  cdif 3899  wss 3902  ifcif 4485   class class class wbr 5107  cmpt 5190  dom cdm 5659  cres 5661  ccom 5663  wf 6533  cfv 6537  (class class class)co 7417  cc 11126  cr 11127  0cc0 11128  1c1 11129   + caddc 11131   · cmul 11133  -∞cmnf 11269   < clt 11271  cle 11272  cmin 11469  -cneg 11470   / cdiv 11899  cn 12261  2c2 12323  4c4 12325  0cn0 12532  cz 12619  cuz 12891  +crp 13046  (,]cioc 13403  [,]cicc 13405  seqcseq 14069  cexp 14129  abscabs 15325  cli 15575  Σcsu 15777  πcpi 16158  cdvds 16348  cnccncf 25110  arctancatan 27109
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7740  ax-inf2 9624  ax-cnex 11184  ax-resscn 11185  ax-1cn 11186  ax-icn 11187  ax-addcl 11188  ax-addrcl 11189  ax-mulcl 11190  ax-mulrcl 11191  ax-mulcom 11192  ax-addass 11193  ax-mulass 11194  ax-distr 11195  ax-i2m1 11196  ax-1ne0 11197  ax-1rid 11198  ax-rnegex 11199  ax-rrecex 11200  ax-cnre 11201  ax-pre-lttri 11202  ax-pre-lttrn 11203  ax-pre-ltadd 11204  ax-pre-mulgt0 11205  ax-pre-sup 11206  ax-addf 11207
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-tp 4592  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7374  df-ov 7420  df-oprab 7421  df-mpo 7422  df-of 7682  df-om 7867  df-1st 7990  df-2nd 7991  df-supp 8163  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-2o 8460  df-oadd 8463  df-er 8700  df-map 8832  df-pm 8833  df-ixp 8909  df-en 8957  df-dom 8958  df-sdom 8959  df-fin 8960  df-fsupp 9336  df-fi 9385  df-sup 9416  df-inf 9417  df-oi 9486  df-card 9948  df-pnf 11273  df-mnf 11274  df-xr 11275  df-ltxr 11276  df-le 11277  df-sub 11471  df-neg 11472  df-div 11900  df-nn 12262  df-2 12331  df-3 12332  df-4 12333  df-5 12334  df-6 12335  df-7 12336  df-8 12337  df-9 12338  df-n0 12533  df-xnn0 12606  df-z 12620  df-dec 12741  df-uz 12892  df-q 13002  df-rp 13047  df-xneg 13167  df-xadd 13168  df-xmul 13169  df-ioo 13406  df-ioc 13407  df-ico 13408  df-icc 13409  df-fz 13566  df-fzo 13714  df-fl 13857  df-mod 13935  df-seq 14070  df-exp 14130  df-fac 14342  df-bc 14371  df-hash 14399  df-shft 15144  df-cj 15190  df-re 15191  df-im 15192  df-sqrt 15326  df-abs 15327  df-limsup 15562  df-clim 15579  df-rlim 15580  df-sum 15778  df-ef 16159  df-sin 16161  df-cos 16162  df-tan 16163  df-pi 16164  df-dvds 16349  df-struct 17245  df-sets 17262  df-slot 17280  df-ndx 17292  df-base 17308  df-ress 17329  df-plusg 17361  df-mulr 17362  df-starv 17363  df-sca 17364  df-vsca 17365  df-ip 17366  df-tset 17367  df-ple 17368  df-ds 17370  df-unif 17371  df-hom 17372  df-cco 17373  df-rest 17513  df-topn 17514  df-0g 17532  df-gsum 17533  df-topgen 17534  df-pt 17535  df-prds 17538  df-xrs 17594  df-qtop 17599  df-imas 17600  df-xps 17602  df-mre 17676  df-mrc 17677  df-acs 17679  df-mgm 18736  df-sgrp 18827  df-mnd 18843  df-submnd 18898  df-mulg 19197  df-cntz 19450  df-cmn 19915  df-psmet 21583  df-xmet 21584  df-met 21585  df-bl 21586  df-mopn 21587  df-fbas 21588  df-fg 21589  df-cnfld 21592  df-top 23125  df-topon 23142  df-topsp 23164  df-bases 23177  df-cld 23250  df-ntr 23251  df-cls 23252  df-nei 23329  df-lp 23367  df-perf 23368  df-cn 23458  df-cnp 23459  df-t1 23545  df-haus 23546  df-cmp 23618  df-tx 23794  df-hmeo 23987  df-fil 24078  df-fm 24170  df-flim 24171  df-flf 24172  df-xms 24552  df-ms 24553  df-tms 24554  df-cncf 25112  df-limc 26100  df-dv 26101  df-ulm 26620  df-log 26801  df-atan 27112
This theorem is used by:  leibpisum  27188
  Copyright terms: Public domain W3C validator