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

Theorem leibpi 27116
Description: The Leibniz formula for π. This proof depends on three main facts: (1) the series 𝐹 is convergent, because it is an alternating series (iseralt 15741). (2) Using leibpilem2 27115 to rewrite the series as a power series, it is the 𝑥 = 1 special case of the Taylor series for arctan (atantayl2 27112). (3) Although we cannot directly plug 𝑥 = 1 into atantayl2 27112, Abel's theorem (abelth2 26614) 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 27110) 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 12904 . . . . 5 0 = (ℤ‘0)
2 0zd 12607 . . . . 5 (⊤ → 0 ∈ ℤ)
3 eqidd 2764 . . . . 5 ((⊤ ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
4 0cnd 11203 . . . . . . . . 9 ((𝑘 ∈ ℕ0 ∧ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → 0 ∈ ℂ)
5 ioran 999 . . . . . . . . . 10 (¬ (𝑘 = 0 ∨ 2 ∥ 𝑘) ↔ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘))
6 neg1rr 12208 . . . . . . . . . . . . 13 -1 ∈ ℝ
7 leibpilem1 27114 . . . . . . . . . . . . . 14 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (𝑘 ∈ ℕ ∧ ((𝑘 − 1) / 2) ∈ ℕ0))
87simprd 500 . . . . . . . . . . . . 13 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((𝑘 − 1) / 2) ∈ ℕ0)
9 reexpcl 14119 . . . . . . . . . . . . 13 ((-1 ∈ ℝ ∧ ((𝑘 − 1) / 2) ∈ ℕ0) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
106, 8, 9sylancr 598 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
117simpld 499 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ)
1210, 11nndivred 12294 . . . . . . . . . . 11 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℝ)
1312recnd 11241 . . . . . . . . . 10 ((𝑘 ∈ ℕ0 ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
145, 13sylan2b 605 . . . . . . . . 9 ((𝑘 ∈ ℕ0 ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
154, 14ifclda 4523 . . . . . . . 8 (𝑘 ∈ ℕ0 → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ ℂ)
1615adantl 486 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ ℂ)
1716fmpttd 7110 . . . . . 6 (⊤ → (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘))):ℕ0⟶ℂ)
1817ffvelcdmda 7079 . . . . 5 ((⊤ ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ ℂ)
19 2nn0 12525 . . . . . . . . . . . . . 14 2 ∈ ℕ0
2019a1i 11 . . . . . . . . . . . . 13 (⊤ → 2 ∈ ℕ0)
21 nn0mulcl 12544 . . . . . . . . . . . . 13 ((2 ∈ ℕ0𝑛 ∈ ℕ0) → (2 · 𝑛) ∈ ℕ0)
2220, 21sylan 591 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ0) → (2 · 𝑛) ∈ ℕ0)
23 nn0p1nn 12547 . . . . . . . . . . . 12 ((2 · 𝑛) ∈ ℕ0 → ((2 · 𝑛) + 1) ∈ ℕ)
2422, 23syl 18 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ0) → ((2 · 𝑛) + 1) ∈ ℕ)
2524nnrecred 12291 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ0) → (1 / ((2 · 𝑛) + 1)) ∈ ℝ)
2625fmpttd 7110 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))):ℕ0⟶ℝ)
27 nn0mulcl 12544 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
2820, 27sylan 591 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
2928nn0red 12570 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℝ)
30 peano2nn0 12548 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
3130adantl 486 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℕ0)
32 nn0mulcl 12544 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0 ∧ (𝑘 + 1) ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℕ0)
3319, 31, 32sylancr 598 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℕ0)
3433nn0red 12570 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → (2 · (𝑘 + 1)) ∈ ℝ)
35 1red 11213 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 1 ∈ ℝ)
36 nn0re 12517 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
3736adantl 486 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
3837lep1d 12150 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → 𝑘 ≤ (𝑘 + 1))
39 peano2re 11387 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℝ → (𝑘 + 1) ∈ ℝ)
4037, 39syl 18 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝑘 + 1) ∈ ℝ)
41 2re 12319 . . . . . . . . . . . . . . 15 2 ∈ ℝ
4241a1i 11 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 2 ∈ ℝ)
43 2pos 12349 . . . . . . . . . . . . . . 15 0 < 2
4443a1i 11 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < 2)
45 lemul2 12072 . . . . . . . . . . . . . 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 11832 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≤ ((2 · (𝑘 + 1)) + 1))
49 nn0p1nn 12547 . . . . . . . . . . . . . 14 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
5028, 49syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ)
5150nnred 12252 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℝ)
5250nngt0d 12289 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < ((2 · 𝑘) + 1))
53 nn0p1nn 12547 . . . . . . . . . . . . . 14 ((2 · (𝑘 + 1)) ∈ ℕ0 → ((2 · (𝑘 + 1)) + 1) ∈ ℕ)
5433, 53syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · (𝑘 + 1)) + 1) ∈ ℕ)
5554nnred 12252 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · (𝑘 + 1)) + 1) ∈ ℝ)
5654nngt0d 12289 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ0) → 0 < ((2 · (𝑘 + 1)) + 1))
57 lerec 12102 . . . . . . . . . . . 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 851 . . . . . . . . . . 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 7418 . . . . . . . . . . . . . 14 (𝑛 = (𝑘 + 1) → (2 · 𝑛) = (2 · (𝑘 + 1)))
6160oveq1d 7425 . . . . . . . . . . . . 13 (𝑛 = (𝑘 + 1) → ((2 · 𝑛) + 1) = ((2 · (𝑘 + 1)) + 1))
6261oveq2d 7426 . . . . . . . . . . . 12 (𝑛 = (𝑘 + 1) → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · (𝑘 + 1)) + 1)))
63 eqid 2763 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))
64 ovex 7443 . . . . . . . . . . . 12 (1 / ((2 · (𝑘 + 1)) + 1)) ∈ V
6562, 63, 64fvmpt 6989 . . . . . . . . . . 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 7418 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → (2 · 𝑛) = (2 · 𝑘))
6867oveq1d 7425 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
6968oveq2d 7426 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · 𝑘) + 1)))
70 ovex 7443 . . . . . . . . . . . 12 (1 / ((2 · 𝑘) + 1)) ∈ V
7169, 63, 70fvmpt 6989 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
7271adantl 486 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
7359, 66, 723brtr4d 5143 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘(𝑘 + 1)) ≤ ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘))
74 nnuz 12905 . . . . . . . . . 10 ℕ = (ℤ‘1)
75 1zzd 12629 . . . . . . . . . 10 (⊤ → 1 ∈ ℤ)
76 ax-1cn 11162 . . . . . . . . . . 11 1 ∈ ℂ
77 divcnv 15912 . . . . . . . . . . 11 (1 ∈ ℂ → (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0)
7876, 77mp1i 14 . . . . . . . . . 10 (⊤ → (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0)
79 nn0ex 12514 . . . . . . . . . . . 12 0 ∈ V
8079mptex 7221 . . . . . . . . . . 11 (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ∈ V
8180a1i 11 . . . . . . . . . 10 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ∈ V)
82 oveq2 7418 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (1 / 𝑛) = (1 / 𝑘))
83 eqid 2763 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ ↦ (1 / 𝑛)) = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
84 ovex 7443 . . . . . . . . . . . . 13 (1 / 𝑘) ∈ V
8582, 83, 84fvmpt 6989 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) = (1 / 𝑘))
8685adantl 486 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) = (1 / 𝑘))
87 nnrecre 12282 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
8887adantl 486 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ)
8986, 88eqeltrd 2863 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) ∈ ℝ)
90 nnnn0 12515 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
9190adantl 486 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ0)
9291, 71syl 18 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) = (1 / ((2 · 𝑘) + 1)))
9390, 50sylan2 604 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℕ)
9493nnrecred 12291 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ∈ ℝ)
9592, 94eqeltrd 2863 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) ∈ ℝ)
96 nnre 12244 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
9796adantl 486 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℝ)
9819, 91, 27sylancr 598 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ∈ ℕ0)
9998nn0red 12570 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ∈ ℝ)
100 peano2re 11387 . . . . . . . . . . . . . 14 ((2 · 𝑘) ∈ ℝ → ((2 · 𝑘) + 1) ∈ ℝ)
10199, 100syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ)
102 nn0addge1 12554 . . . . . . . . . . . . . . 15 ((𝑘 ∈ ℝ ∧ 𝑘 ∈ ℕ0) → 𝑘 ≤ (𝑘 + 𝑘))
10397, 91, 102syl2anc 595 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ (𝑘 + 𝑘))
10497recnd 11241 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℂ)
1051042timesd 12491 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) = (𝑘 + 𝑘))
106103, 105breqtrrd 5139 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ (2 · 𝑘))
10799lep1d 12150 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → (2 · 𝑘) ≤ ((2 · 𝑘) + 1))
10897, 99, 101, 106, 107letrd 11371 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ ((2 · 𝑘) + 1))
109 nngt0 12271 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 0 < 𝑘)
110109adantl 486 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 < 𝑘)
11193nnred 12252 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ)
11293nngt0d 12289 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 < ((2 · 𝑘) + 1))
113 lerec 12102 . . . . . . . . . . . . 13 (((𝑘 ∈ ℝ ∧ 0 < 𝑘) ∧ (((2 · 𝑘) + 1) ∈ ℝ ∧ 0 < ((2 · 𝑘) + 1))) → (𝑘 ≤ ((2 · 𝑘) + 1) ↔ (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘)))
11497, 110, 111, 112, 113syl22anc 851 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝑘 ≤ ((2 · 𝑘) + 1) ↔ (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘)))
115108, 114mpbid 235 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘))
116115, 92, 863brtr4d 5143 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘) ≤ ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘))
11793nnrpd 13062 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑘 ∈ ℕ) → ((2 · 𝑘) + 1) ∈ ℝ+)
118117rpreccld 13074 . . . . . . . . . . . 12 ((⊤ ∧ 𝑘 ∈ ℕ) → (1 / ((2 · 𝑘) + 1)) ∈ ℝ+)
119118rpge0d 13068 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ (1 / ((2 · 𝑘) + 1)))
120119, 92breqtrrd 5139 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘))
12174, 75, 78, 81, 89, 95, 116, 120climsqz2 15698 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1))) ⇝ 0)
122 neg1cn 12207 . . . . . . . . . . . . 13 -1 ∈ ℂ
123122a1i 11 . . . . . . . . . . . 12 (⊤ → -1 ∈ ℂ)
124 expcl 14120 . . . . . . . . . . . 12 ((-1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
125123, 124sylan 591 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
12650nncnd 12253 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℂ)
12750nnne0d 12290 . . . . . . . . . . 11 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≠ 0)
128125, 126, 127divrecd 11998 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((-1↑𝑘) / ((2 · 𝑘) + 1)) = ((-1↑𝑘) · (1 / ((2 · 𝑘) + 1))))
129 oveq2 7418 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (-1↑𝑛) = (-1↑𝑘))
130129, 68oveq12d 7428 . . . . . . . . . . . 12 (𝑛 = 𝑘 → ((-1↑𝑛) / ((2 · 𝑛) + 1)) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
131 eqid 2763 . . . . . . . . . . . 12 (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))
132 ovex 7443 . . . . . . . . . . . 12 ((-1↑𝑘) / ((2 · 𝑘) + 1)) ∈ V
133130, 131, 132fvmpt 6989 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
134133adantl 486 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) / ((2 · 𝑘) + 1)))
13572oveq2d 7426 . . . . . . . . . 10 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((-1↑𝑘) · ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘)) = ((-1↑𝑘) · (1 / ((2 · 𝑘) + 1))))
136128, 134, 1353eqtr4d 2808 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))‘𝑘) = ((-1↑𝑘) · ((𝑛 ∈ ℕ0 ↦ (1 / ((2 · 𝑛) + 1)))‘𝑘)))
1371, 2, 26, 73, 121, 136iseralt 15741 . . . . . . . 8 (⊤ → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1)))) ∈ dom ⇝ )
138 climdm 15610 . . . . . . . 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 2763 . . . . . . . 8 (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘))) = (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
141 fvex 6894 . . . . . . . 8 ( ⇝ ‘seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) / ((2 · 𝑛) + 1))))) ∈ V
142131, 140, 141leibpilem2 27115 . . . . . . 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 14044 . . . . . . 7 seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ∈ V
145144, 141breldm 5898 . . . . . 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 15814 . . . 4 (⊤ → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))) ⇝ Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
148 eqid 2763 . . . . . . . 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 26614 . . . . . . 7 (⊤ → (𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∈ ((0[,]1)–cn→ℂ))
150 nnrp 13032 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ+)
151150adantl 486 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ+)
152151rpreccld 13074 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ ℝ+)
153152rpred 13064 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ ℝ)
154152rpge0d 13068 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ≤ (1 / 𝑛))
155 nnge1 12268 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 1 ≤ 𝑛)
156155adantl 486 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ≤ 𝑛)
157 nnre 12244 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
158157adantl 486 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
159158recnd 11241 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
160159mulridd 11230 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → (𝑛 · 1) = 𝑛)
161156, 160breqtrrd 5139 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ≤ (𝑛 · 1))
162 1red 11213 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ∈ ℝ)
163 nngt0 12271 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 0 < 𝑛)
164163adantl 486 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 < 𝑛)
165 ledivmul 12095 . . . . . . . . . . . 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 13497 . . . . . . . . . 10 ((1 / 𝑛) ∈ (0[,]1) ↔ ((1 / 𝑛) ∈ ℝ ∧ 0 ≤ (1 / 𝑛) ∧ (1 / 𝑛) ≤ 1))
169153, 154, 167, 168syl3anbrc 1362 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 / 𝑛) ∈ (0[,]1))
170 iirev 25097 . . . . . . . . 9 ((1 / 𝑛) ∈ (0[,]1) → (1 − (1 / 𝑛)) ∈ (0[,]1))
171169, 170syl 18 . . . . . . . 8 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ (0[,]1))
172171fmpttd 7110 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶(0[,]1))
173 1cnd 11206 . . . . . . . . 9 (⊤ → 1 ∈ ℂ)
174 nnex 12243 . . . . . . . . . . 11 ℕ ∈ V
175174mptex 7221 . . . . . . . . . 10 (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ∈ V
176175a1i 11 . . . . . . . . 9 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ∈ V)
17789recnd 11241 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘) ∈ ℂ)
17882oveq2d 7426 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (1 − (1 / 𝑛)) = (1 − (1 / 𝑘)))
179 eqid 2763 . . . . . . . . . . . 12 (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) = (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))
180 ovex 7443 . . . . . . . . . . . 12 (1 − (1 / 𝑘)) ∈ V
181178, 179, 180fvmpt 6989 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − (1 / 𝑘)))
18285oveq2d 7426 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)) = (1 − (1 / 𝑘)))
183181, 182eqtr4d 2801 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)))
184183adantl 486 . . . . . . . . 9 ((⊤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))‘𝑘) = (1 − ((𝑛 ∈ ℕ ↦ (1 / 𝑛))‘𝑘)))
18574, 75, 78, 173, 176, 177, 184climsubc2 15695 . . . . . . . 8 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ⇝ (1 − 0))
186 1m0e1 12364 . . . . . . . 8 (1 − 0) = 1
187185, 186breqtrdi 5152 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) ⇝ 1)
188 1elunit 13501 . . . . . . . 8 1 ∈ (0[,]1)
189188a1i 11 . . . . . . 7 (⊤ → 1 ∈ (0[,]1))
19074, 75, 149, 172, 187, 189climcncf 25068 . . . . . 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 2764 . . . . . . . 8 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))) = (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))))
192 eqidd 2764 . . . . . . . 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 7417 . . . . . . . . . 10 (𝑥 = (1 − (1 / 𝑛)) → (𝑥𝑗) = ((1 − (1 / 𝑛))↑𝑗))
194193oveq2d 7426 . . . . . . . . 9 (𝑥 = (1 − (1 / 𝑛)) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
195194sumeq2sdv 15759 . . . . . . . 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 7125 . . . . . . 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 12607 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ∈ ℤ)
1988adantll 726 . . . . . . . . . . . . . . . . . . . . . 22 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((𝑘 − 1) / 2) ∈ ℕ0)
1996, 198, 9sylancr 598 . . . . . . . . . . . . . . . . . . . . 21 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℝ)
200199recnd 11241 . . . . . . . . . . . . . . . . . . . 20 (((⊤ ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℂ)
201200adantllr 731 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (-1↑((𝑘 − 1) / 2)) ∈ ℂ)
202 1re 11212 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℝ
203 resubcl 11526 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℝ ∧ (1 / 𝑛) ∈ ℝ) → (1 − (1 / 𝑛)) ∈ ℝ)
204202, 153, 203sylancr 598 . . . . . . . . . . . . . . . . . . . . . 22 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ ℝ)
205204ad2antrr 738 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (1 − (1 / 𝑛)) ∈ ℝ)
206 simplr 780 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ0)
207205, 206reexpcld 14204 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℝ)
208207recnd 11241 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
209 nn0cn 12518 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
210209ad2antlr 739 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℂ)
21111adantll 726 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ∈ ℕ)
212211nnne0d 12290 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → 𝑘 ≠ 0)
213201, 208, 210, 212div12d 12031 . . . . . . . . . . . . . . . . . 18 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((1 − (1 / 𝑛))↑𝑘) · ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
21413adantll 726 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ ℂ)
215208, 214mulcomd 11234 . . . . . . . . . . . . . . . . . 18 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) · ((-1↑((𝑘 − 1) / 2)) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
216213, 215eqtrd 2798 . . . . . . . . . . . . . . . . 17 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
2175, 216sylan2b 605 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) = (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
218217ifeq2da 4520 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
219204recnd 11241 . . . . . . . . . . . . . . . . . 18 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ ℂ)
220 expcl 14120 . . . . . . . . . . . . . . . . . 18 (((1 − (1 / 𝑛)) ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
221219, 220sylan 591 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((1 − (1 / 𝑛))↑𝑘) ∈ ℂ)
222221mul02d 11412 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (0 · ((1 − (1 / 𝑛))↑𝑘)) = 0)
223222ifeq1d 4507 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
224218, 223eqtr4d 2801 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘))))
225 ovif 7508 . . . . . . . . . . . . . 14 (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), (0 · ((1 − (1 / 𝑛))↑𝑘)), (((-1↑((𝑘 − 1) / 2)) / 𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
226224, 225eqtr4di 2816 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)))
227 simpr 489 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
228 c0ex 11204 . . . . . . . . . . . . . . 15 0 ∈ V
229 ovex 7443 . . . . . . . . . . . . . . 15 ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ V
230228, 229ifex 4538 . . . . . . . . . . . . . 14 if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V
231 eqid 2763 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))) = (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
232231fvmpt2 7001 . . . . . . . . . . . . . 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 597 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
234 ovex 7443 . . . . . . . . . . . . . . . 16 ((-1↑((𝑘 − 1) / 2)) / 𝑘) ∈ V
235228, 234ifex 4538 . . . . . . . . . . . . . . 15 if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) ∈ V
236140fvmpt2 7001 . . . . . . . . . . . . . . 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 597 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))
238237oveq1d 7425 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) = (if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)) · ((1 − (1 / 𝑛))↑𝑘)))
239226, 233, 2383eqtr4d 2808 . . . . . . . . . . . 12 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
240239ralrimiva 3157 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → ∀𝑘 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)))
241 nfv 1944 . . . . . . . . . . . 12 𝑗((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘))
242 nffvmpt1 6892 . . . . . . . . . . . . 13 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
243 nffvmpt1 6892 . . . . . . . . . . . . . 14 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗)
244 nfcv 2925 . . . . . . . . . . . . . 14 𝑘 ·
245 nfcv 2925 . . . . . . . . . . . . . 14 𝑘((1 − (1 / 𝑛))↑𝑗)
246243, 244, 245nfov 7440 . . . . . . . . . . . . 13 𝑘(((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))
247242, 246nfeq 2938 . . . . . . . . . . . 12 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))
248 fveq2 6881 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
249 fveq2 6881 . . . . . . . . . . . . . 14 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
250 oveq2 7418 . . . . . . . . . . . . . 14 (𝑘 = 𝑗 → ((1 − (1 / 𝑛))↑𝑘) = ((1 − (1 / 𝑛))↑𝑗))
251249, 250oveq12d 7428 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑘) · ((1 − (1 / 𝑛))↑𝑘)) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
252248, 251eqeq12d 2779 . . . . . . . . . . . 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 3307 . . . . . . . . . . 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 3257 . . . . . . . . 9 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)))
256 0cnd 11203 . . . . . . . . . . . . 13 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → 0 ∈ ℂ)
257207, 211nndivred 12294 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) / 𝑘) ∈ ℝ)
258257recnd 11241 . . . . . . . . . . . . . . 15 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → (((1 − (1 / 𝑛))↑𝑘) / 𝑘) ∈ ℂ)
259201, 258mulcld 11233 . . . . . . . . . . . . . 14 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ (¬ 𝑘 = 0 ∧ ¬ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ ℂ)
2605, 259sylan2b 605 . . . . . . . . . . . . 13 ((((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) ∧ ¬ (𝑘 = 0 ∨ 2 ∥ 𝑘)) → ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)) ∈ ℂ)
261256, 260ifclda 4523 . . . . . . . . . . . 12 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑘 ∈ ℕ0) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ ℂ)
262261fmpttd 7110 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))):ℕ0⟶ℂ)
263262ffvelcdmda 7079 . . . . . . . . . 10 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) ∈ ℂ)
264255, 263eqeltrrd 2864 . . . . . . . . 9 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)) ∈ ℂ)
265 0nn0 12523 . . . . . . . . . . . 12 0 ∈ ℕ0
266265a1i 11 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → 0 ∈ ℕ0)
267 0p1e1 12365 . . . . . . . . . . . . 13 (0 + 1) = 1
268 seqeq1 14045 . . . . . . . . . . . . 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 12629 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → 1 ∈ ℤ)
271 elnnuz 12906 . . . . . . . . . . . . . . 15 (𝑗 ∈ ℕ ↔ 𝑗 ∈ (ℤ‘1))
272 nnne0 12274 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ ℕ → 𝑘 ≠ 0)
273272neneqd 2963 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ ℕ → ¬ 𝑘 = 0)
274 biorf 949 . . . . . . . . . . . . . . . . . . . . . . 23 𝑘 = 0 → (2 ∥ 𝑘 ↔ (𝑘 = 0 ∨ 2 ∥ 𝑘)))
275273, 274syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ → (2 ∥ 𝑘 ↔ (𝑘 = 0 ∨ 2 ∥ 𝑘)))
276275bicomd 226 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ ℕ → ((𝑘 = 0 ∨ 2 ∥ 𝑘) ↔ 2 ∥ 𝑘))
277276ifbid 4511 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
27890, 230, 232sylancl 597 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
279228, 229ifex 4538 . . . . . . . . . . . . . . . . . . . . 21 if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) ∈ V
280 eqid 2763 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))) = (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
281280fvmpt2 7001 . . . . . . . . . . . . . . . . . . . . 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 703 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))
283277, 278, 2823eqtr4d 2808 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘))
284283rgen 3081 . . . . . . . . . . . . . . . . . 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 1944 . . . . . . . . . . . . . . . . . 18 𝑗((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘)
287 nffvmpt1 6892 . . . . . . . . . . . . . . . . . . 19 𝑘((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
288242, 287nfeq 2938 . . . . . . . . . . . . . . . . . 18 𝑘((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗)
289 fveq2 6881 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑗 → ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑘) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
290248, 289eqeq12d 2779 . . . . . . . . . . . . . . . . . 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 3307 . . . . . . . . . . . . . . . . 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 3257 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
294271, 293sylan2br 606 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑛 ∈ ℕ) ∧ 𝑗 ∈ (ℤ‘1)) → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗) = ((𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))‘𝑗))
295270, 294seqfeq 14068 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) = seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))))
296153, 162, 167abssubge0d 15490 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑛 ∈ ℕ) → (abs‘(1 − (1 / 𝑛))) = (1 − (1 / 𝑛)))
297 ltsubrp 13058 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ ∧ (1 / 𝑛) ∈ ℝ+) → (1 − (1 / 𝑛)) < 1)
298202, 152, 297sylancr 598 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) < 1)
299296, 298eqbrtrd 5133 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑛 ∈ ℕ) → (abs‘(1 − (1 / 𝑛))) < 1)
300280atantayl2 27112 . . . . . . . . . . . . . 14 (((1 − (1 / 𝑛)) ∈ ℂ ∧ (abs‘(1 − (1 / 𝑛))) < 1) → seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
301219, 299, 300syl2anc 595 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ ↦ if(2 ∥ 𝑘, 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
302295, 301eqbrtrd 5133 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → seq1( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
303269, 302eqbrtrid 5146 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → seq(0 + 1)( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
3041, 266, 263, 303clim2ser2 15712 . . . . . . . . . 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 12606 . . . . . . . . . . . . . 14 0 ∈ ℤ
306 seq1 14055 . . . . . . . . . . . . . 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 4493 . . . . . . . . . . . . . . . 16 ((𝑘 = 0 ∨ 2 ∥ 𝑘) → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = 0)
309308orcs 888 . . . . . . . . . . . . . . 15 (𝑘 = 0 → if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))) = 0)
310309, 231, 228fvmpt 6989 . . . . . . . . . . . . . 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 2786 . . . . . . . . . . . 12 (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0) = 0
313312oveq2i 7421 . . . . . . . . . . 11 ((arctan‘(1 − (1 / 𝑛))) + (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0)) = ((arctan‘(1 − (1 / 𝑛))) + 0)
314 atanrecl 27085 . . . . . . . . . . . . . 14 ((1 − (1 / 𝑛)) ∈ ℝ → (arctan‘(1 − (1 / 𝑛))) ∈ ℝ)
315204, 314syl 18 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑛 ∈ ℕ) → (arctan‘(1 − (1 / 𝑛))) ∈ ℝ)
316315recnd 11241 . . . . . . . . . . . 12 ((⊤ ∧ 𝑛 ∈ ℕ) → (arctan‘(1 − (1 / 𝑛))) ∈ ℂ)
317316addridd 11414 . . . . . . . . . . 11 ((⊤ ∧ 𝑛 ∈ ℕ) → ((arctan‘(1 − (1 / 𝑛))) + 0) = (arctan‘(1 − (1 / 𝑛))))
318313, 317eqtrid 2810 . . . . . . . . . 10 ((⊤ ∧ 𝑛 ∈ ℕ) → ((arctan‘(1 − (1 / 𝑛))) + (seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘)))))‘0)) = (arctan‘(1 − (1 / 𝑛))))
319304, 318breqtrd 5137 . . . . . . . . 9 ((⊤ ∧ 𝑛 ∈ ℕ) → seq0( + , (𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) · (((1 − (1 / 𝑛))↑𝑘) / 𝑘))))) ⇝ (arctan‘(1 − (1 / 𝑛))))
3201, 197, 255, 264, 319isumclim 15813 . . . . . . . 8 ((⊤ ∧ 𝑛 ∈ ℕ) → Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗)) = (arctan‘(1 − (1 / 𝑛))))
321320mpteq2dva 5204 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · ((1 − (1 / 𝑛))↑𝑗))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
322196, 321eqtrd 2798 . . . . . 6 (⊤ → ((𝑥 ∈ (0[,]1) ↦ Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗))) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
323 oveq1 7417 . . . . . . . . . . . 12 (𝑥 = 1 → (𝑥𝑗) = (1↑𝑗))
324 nn0z 12619 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ0𝑗 ∈ ℤ)
325 1exp 14132 . . . . . . . . . . . . 13 (𝑗 ∈ ℤ → (1↑𝑗) = 1)
326324, 325syl 18 . . . . . . . . . . . 12 (𝑗 ∈ ℕ0 → (1↑𝑗) = 1)
327323, 326sylan9eq 2818 . . . . . . . . . . 11 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (𝑥𝑗) = 1)
328327oveq2d 7426 . . . . . . . . . 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 7078 . . . . . . . . . . . 12 (𝑗 ∈ ℕ0 → ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ ℂ)
331330mulridd 11230 . . . . . . . . . . 11 (𝑗 ∈ ℕ0 → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · 1) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
332331adantl 486 . . . . . . . . . 10 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · 1) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
333328, 332eqtrd 2798 . . . . . . . . 9 ((𝑥 = 1 ∧ 𝑗 ∈ ℕ0) → (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
334333sumeq2dv 15758 . . . . . . . 8 (𝑥 = 1 → Σ𝑗 ∈ ℕ0 (((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) · (𝑥𝑗)) = Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
335 sumex 15744 . . . . . . . 8 Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) ∈ V
336334, 148, 335fvmpt 6989 . . . . . . 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 5142 . . . . 5 (⊤ → (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗))
339 eqid 2763 . . . . . . . . 9 (ℂ ∖ (-∞(,]0)) = (ℂ ∖ (-∞(,]0))
340 eqid 2763 . . . . . . . . 9 {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} = {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
341339, 340atancn 27110 . . . . . . . 8 (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∈ ({𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}–cn→ℂ)
342341a1i 11 . . . . . . 7 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∈ ({𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}–cn→ℂ))
343 unitssre 13530 . . . . . . . . 9 (0[,]1) ⊆ ℝ
344339, 340ressatans 27108 . . . . . . . . 9 ℝ ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
345343, 344sstri 3946 . . . . . . . 8 (0[,]1) ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
346 fss 6722 . . . . . . . 8 (((𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶(0[,]1) ∧ (0[,]1) ⊆ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
347172, 345, 346sylancl 597 . . . . . . 7 (⊤ → (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛))):ℕ⟶{𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
348344, 202sselii 3934 . . . . . . . 8 1 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}
349348a1i 11 . . . . . . 7 (⊤ → 1 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
35074, 75, 342, 347, 187, 349climcncf 25068 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) ⇝ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1))
351345, 171sselid 3935 . . . . . . 7 ((⊤ ∧ 𝑛 ∈ ℕ) → (1 − (1 / 𝑛)) ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})
352 cncff 25061 . . . . . . . . . 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 6949 . . . . . . . 8 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘)))
355 fvres 6900 . . . . . . . . 9 (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘) = (arctan‘𝑘))
356355mpteq2ia 5206 . . . . . . . 8 (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘𝑘)) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ (arctan‘𝑘))
357354, 356eqtrdi 2814 . . . . . . 7 (⊤ → (arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) = (𝑘 ∈ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))} ↦ (arctan‘𝑘)))
358 fveq2 6881 . . . . . . 7 (𝑘 = (1 − (1 / 𝑛)) → (arctan‘𝑘) = (arctan‘(1 − (1 / 𝑛))))
359351, 191, 357, 358fmptco 7125 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))}) ∘ (𝑛 ∈ ℕ ↦ (1 − (1 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))))
360 fvres 6900 . . . . . . . 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 27102 . . . . . . 7 (arctan‘1) = (π / 4)
363361, 362eqtrdi 2814 . . . . . 6 (⊤ → ((arctan ↾ {𝑥 ∈ ℂ ∣ (1 + (𝑥↑2)) ∈ (ℂ ∖ (-∞(,]0))})‘1) = (π / 4))
364350, 359, 3633brtr3d 5142 . . . . 5 (⊤ → (𝑛 ∈ ℕ ↦ (arctan‘(1 − (1 / 𝑛)))) ⇝ (π / 4))
365 climuni 15608 . . . . 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 595 . . . 4 (⊤ → Σ𝑗 ∈ ℕ0 ((𝑘 ∈ ℕ0 ↦ if((𝑘 = 0 ∨ 2 ∥ 𝑘), 0, ((-1↑((𝑘 − 1) / 2)) / 𝑘)))‘𝑗) = (π / 4))
367147, 366breqtrd 5137 . . 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 7443 . . 3 (π / 4) ∈ V
371369, 140, 370leibpilem2 27115 . 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 400  wo 860   = wceq 1570  wtru 1571  wcel 2143  wral 3079  {crab 3416  Vcvv 3455  cdif 3902  wss 3905  ifcif 4487   class class class wbr 5109  cmpt 5192  dom cdm 5661  cres 5663  ccom 5665  wf 6532  cfv 6536  (class class class)co 7410  cc 11102  cr 11103  0cc0 11104  1c1 11105   + caddc 11107   · cmul 11109  -∞cmnf 11245   < clt 11247  cle 11248  cmin 11445  -cneg 11446   / cdiv 11875  cn 12237  2c2 12299  4c4 12301  0cn0 12508  cz 12595  cuz 12866  +crp 13020  (,]cioc 13377  [,]cicc 13379  seqcseq 14042  cexp 14102  abscabs 15290  cli 15540  Σcsu 15742  πcpi 16124  cdvds 16314  cnccncf 25044  arctancatan 27038
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cnex 11160  ax-resscn 11161  ax-1cn 11162  ax-icn 11163  ax-addcl 11164  ax-addrcl 11165  ax-mulcl 11166  ax-mulrcl 11167  ax-mulcom 11168  ax-addass 11169  ax-mulass 11170  ax-distr 11171  ax-i2m1 11172  ax-1ne0 11173  ax-1rid 11174  ax-rnegex 11175  ax-rrecex 11176  ax-cnre 11177  ax-pre-lttri 11178  ax-pre-lttrn 11179  ax-pre-ltadd 11180  ax-pre-mulgt0 11181  ax-pre-sup 11182  ax-addf 11183
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-oadd 8453  df-er 8690  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-fi 9367  df-sup 9398  df-inf 9399  df-oi 9468  df-card 9930  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11447  df-neg 11448  df-div 11876  df-nn 12238  df-2 12307  df-3 12308  df-4 12309  df-5 12310  df-6 12311  df-7 12312  df-8 12313  df-9 12314  df-n0 12509  df-xnn0 12582  df-z 12596  df-dec 12716  df-uz 12867  df-q 12977  df-rp 13021  df-xneg 13141  df-xadd 13142  df-xmul 13143  df-ioo 13380  df-ioc 13381  df-ico 13382  df-icc 13383  df-fz 13540  df-fzo 13688  df-fl 13830  df-mod 13908  df-seq 14043  df-exp 14103  df-fac 14315  df-bc 14344  df-hash 14372  df-shft 15109  df-cj 15155  df-re 15156  df-im 15157  df-sqrt 15291  df-abs 15292  df-limsup 15527  df-clim 15544  df-rlim 15545  df-sum 15743  df-ef 16125  df-sin 16127  df-cos 16128  df-tan 16129  df-pi 16130  df-dvds 16315  df-struct 17211  df-sets 17228  df-slot 17246  df-ndx 17258  df-base 17274  df-ress 17295  df-plusg 17327  df-mulr 17328  df-starv 17329  df-sca 17330  df-vsca 17331  df-ip 17332  df-tset 17333  df-ple 17334  df-ds 17336  df-unif 17337  df-hom 17338  df-cco 17339  df-rest 17479  df-topn 17480  df-0g 17498  df-gsum 17499  df-topgen 17500  df-pt 17501  df-prds 17504  df-xrs 17560  df-qtop 17565  df-imas 17566  df-xps 17568  df-mre 17642  df-mrc 17643  df-acs 17645  df-mgm 18702  df-sgrp 18781  df-mnd 18797  df-submnd 18846  df-mulg 19138  df-cntz 19391  df-cmn 19856  df-psmet 21523  df-xmet 21524  df-met 21525  df-bl 21526  df-mopn 21527  df-fbas 21528  df-fg 21529  df-cnfld 21532  df-top 23060  df-topon 23077  df-topsp 23099  df-bases 23112  df-cld 23185  df-ntr 23186  df-cls 23187  df-nei 23264  df-lp 23302  df-perf 23303  df-cn 23393  df-cnp 23394  df-t1 23480  df-haus 23481  df-cmp 23553  df-tx 23728  df-hmeo 23921  df-fil 24012  df-fm 24104  df-flim 24105  df-flf 24106  df-xms 24486  df-ms 24487  df-tms 24488  df-cncf 25046  df-limc 26034  df-dv 26035  df-ulm 26549  df-log 26730  df-atan 27041
This theorem is used by:  leibpisum  27117
  Copyright terms: Public domain W3C validator