Metamath Proof Explorer


Theorem zetacvg

Description: The zeta series is convergent. (Contributed by Mario Carneiro, 18-Jul-2014)

Ref Expression
Hypotheses zetacvg.1 ⊢ φ → S ∈ ℂ
zetacvg.2 ⊢ φ → 1 < ℜ ⁡ S
zetacvg.3 ⊢ φ ∧ k ∈ ℕ → F ⁡ k = k − S
Assertion zetacvg ⊢ φ → seq 1 + F ∈ dom ⁡ ⇝

Proof

Step Hyp Ref Expression
1 zetacvg.1 ⊢ φ → S ∈ ℂ
2 zetacvg.2 ⊢ φ → 1 < ℜ ⁡ S
3 zetacvg.3 ⊢ φ ∧ k ∈ ℕ → F ⁡ k = k − S
4 nnuz ⊢ ℕ = ℤ ≥ 1
5 1zzd ⊢ φ → 1 ∈ ℤ
6 oveq1 ⊢ n = k → n − ℜ ⁡ S = k − ℜ ⁡ S
7 eqid ⊢ n ∈ ℕ ⟼ n − ℜ ⁡ S = n ∈ ℕ ⟼ n − ℜ ⁡ S
8 ovex ⊢ k − ℜ ⁡ S ∈ V
9 6 7 8 fvmpt ⊢ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k = k − ℜ ⁡ S
10 9 adantl ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k = k − ℜ ⁡ S
11 nncn ⊢ k ∈ ℕ → k ∈ ℂ
12 11 adantl ⊢ φ ∧ k ∈ ℕ → k ∈ ℂ
13 nnne0 ⊢ k ∈ ℕ → k ≠ 0
14 13 adantl ⊢ φ ∧ k ∈ ℕ → k ≠ 0
15 1 negcld ⊢ φ → − S ∈ ℂ
16 15 adantr ⊢ φ ∧ k ∈ ℕ → − S ∈ ℂ
17 12 14 16 cxpefd ⊢ φ ∧ k ∈ ℕ → k − S = e − S ⁢ log ⁡ k
18 3 17 eqtrd ⊢ φ ∧ k ∈ ℕ → F ⁡ k = e − S ⁢ log ⁡ k
19 18 fveq2d ⊢ φ ∧ k ∈ ℕ → F ⁡ k = e − S ⁢ log ⁡ k
20 nnrp ⊢ k ∈ ℕ → k ∈ ℝ +
21 20 relogcld ⊢ k ∈ ℕ → log ⁡ k ∈ ℝ
22 21 recnd ⊢ k ∈ ℕ → log ⁡ k ∈ ℂ
23 mulcl ⊢ − S ∈ ℂ ∧ log ⁡ k ∈ ℂ → − S ⁢ log ⁡ k ∈ ℂ
24 15 22 23 syl2an ⊢ φ ∧ k ∈ ℕ → − S ⁢ log ⁡ k ∈ ℂ
25 absef ⊢ − S ⁢ log ⁡ k ∈ ℂ → e − S ⁢ log ⁡ k = e ℜ ⁡ − S ⁢ log ⁡ k
26 24 25 syl ⊢ φ ∧ k ∈ ℕ → e − S ⁢ log ⁡ k = e ℜ ⁡ − S ⁢ log ⁡ k
27 remul ⊢ − S ∈ ℂ ∧ log ⁡ k ∈ ℂ → ℜ ⁡ − S ⁢ log ⁡ k = ℜ ⁡ − S ⁢ ℜ ⁡ log ⁡ k − ℑ ⁡ − S ⁢ ℑ ⁡ log ⁡ k
28 15 22 27 syl2an ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ − S ⁢ log ⁡ k = ℜ ⁡ − S ⁢ ℜ ⁡ log ⁡ k − ℑ ⁡ − S ⁢ ℑ ⁡ log ⁡ k
29 1 renegd ⊢ φ → ℜ ⁡ − S = − ℜ ⁡ S
30 21 rered ⊢ k ∈ ℕ → ℜ ⁡ log ⁡ k = log ⁡ k
31 29 30 oveqan12d ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ − S ⁢ ℜ ⁡ log ⁡ k = − ℜ ⁡ S ⁢ log ⁡ k
32 21 reim0d ⊢ k ∈ ℕ → ℑ ⁡ log ⁡ k = 0
33 32 oveq2d ⊢ k ∈ ℕ → ℑ ⁡ − S ⁢ ℑ ⁡ log ⁡ k = ℑ ⁡ − S ⋅ 0
34 imcl ⊢ − S ∈ ℂ → ℑ ⁡ − S ∈ ℝ
35 34 recnd ⊢ − S ∈ ℂ → ℑ ⁡ − S ∈ ℂ
36 15 35 syl ⊢ φ → ℑ ⁡ − S ∈ ℂ
37 36 mul01d ⊢ φ → ℑ ⁡ − S ⋅ 0 = 0
38 33 37 sylan9eqr ⊢ φ ∧ k ∈ ℕ → ℑ ⁡ − S ⁢ ℑ ⁡ log ⁡ k = 0
39 31 38 oveq12d ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ − S ⁢ ℜ ⁡ log ⁡ k − ℑ ⁡ − S ⁢ ℑ ⁡ log ⁡ k = − ℜ ⁡ S ⁢ log ⁡ k − 0
40 1 recld ⊢ φ → ℜ ⁡ S ∈ ℝ
41 40 renegcld ⊢ φ → − ℜ ⁡ S ∈ ℝ
42 41 recnd ⊢ φ → − ℜ ⁡ S ∈ ℂ
43 mulcl ⊢ − ℜ ⁡ S ∈ ℂ ∧ log ⁡ k ∈ ℂ → − ℜ ⁡ S ⁢ log ⁡ k ∈ ℂ
44 42 22 43 syl2an ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k ∈ ℂ
45 44 subid1d ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k − 0 = − ℜ ⁡ S ⁢ log ⁡ k
46 28 39 45 3eqtrd ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ − S ⁢ log ⁡ k = − ℜ ⁡ S ⁢ log ⁡ k
47 46 fveq2d ⊢ φ ∧ k ∈ ℕ → e ℜ ⁡ − S ⁢ log ⁡ k = e − ℜ ⁡ S ⁢ log ⁡ k
48 42 adantr ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ∈ ℂ
49 12 14 48 cxpefd ⊢ φ ∧ k ∈ ℕ → k − ℜ ⁡ S = e − ℜ ⁡ S ⁢ log ⁡ k
50 47 49 eqtr4d ⊢ φ ∧ k ∈ ℕ → e ℜ ⁡ − S ⁢ log ⁡ k = k − ℜ ⁡ S
51 19 26 50 3eqtrd ⊢ φ ∧ k ∈ ℕ → F ⁡ k = k − ℜ ⁡ S
52 10 51 eqtr4d ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k = F ⁡ k
53 12 16 cxpcld ⊢ φ ∧ k ∈ ℕ → k − S ∈ ℂ
54 3 53 eqeltrd ⊢ φ ∧ k ∈ ℕ → F ⁡ k ∈ ℂ
55 2rp ⊢ 2 ∈ ℝ +
56 1re ⊢ 1 ∈ ℝ
57 resubcl ⊢ 1 ∈ ℝ ∧ ℜ ⁡ S ∈ ℝ → 1 − ℜ ⁡ S ∈ ℝ
58 56 40 57 sylancr ⊢ φ → 1 − ℜ ⁡ S ∈ ℝ
59 rpcxpcl ⊢ 2 ∈ ℝ + ∧ 1 − ℜ ⁡ S ∈ ℝ → 2 1 − ℜ ⁡ S ∈ ℝ +
60 55 58 59 sylancr ⊢ φ → 2 1 − ℜ ⁡ S ∈ ℝ +
61 60 rpcnd ⊢ φ → 2 1 − ℜ ⁡ S ∈ ℂ
62 recl ⊢ S ∈ ℂ → ℜ ⁡ S ∈ ℝ
63 62 recnd ⊢ S ∈ ℂ → ℜ ⁡ S ∈ ℂ
64 1 63 syl ⊢ φ → ℜ ⁡ S ∈ ℂ
65 64 addlidd ⊢ φ → 0 + ℜ ⁡ S = ℜ ⁡ S
66 2 65 breqtrrd ⊢ φ → 1 < 0 + ℜ ⁡ S
67 0re ⊢ 0 ∈ ℝ
68 ltsubadd ⊢ 1 ∈ ℝ ∧ ℜ ⁡ S ∈ ℝ ∧ 0 ∈ ℝ → 1 − ℜ ⁡ S < 0 ↔ 1 < 0 + ℜ ⁡ S
69 56 67 68 mp3an13 ⊢ ℜ ⁡ S ∈ ℝ → 1 − ℜ ⁡ S < 0 ↔ 1 < 0 + ℜ ⁡ S
70 40 69 syl ⊢ φ → 1 − ℜ ⁡ S < 0 ↔ 1 < 0 + ℜ ⁡ S
71 66 70 mpbird ⊢ φ → 1 − ℜ ⁡ S < 0
72 2re ⊢ 2 ∈ ℝ
73 1lt2 ⊢ 1 < 2
74 cxplt ⊢ 2 ∈ ℝ ∧ 1 < 2 ∧ 1 − ℜ ⁡ S ∈ ℝ ∧ 0 ∈ ℝ → 1 − ℜ ⁡ S < 0 ↔ 2 1 − ℜ ⁡ S < 2 0
75 72 73 74 mpanl12 ⊢ 1 − ℜ ⁡ S ∈ ℝ ∧ 0 ∈ ℝ → 1 − ℜ ⁡ S < 0 ↔ 2 1 − ℜ ⁡ S < 2 0
76 58 67 75 sylancl ⊢ φ → 1 − ℜ ⁡ S < 0 ↔ 2 1 − ℜ ⁡ S < 2 0
77 71 76 mpbid ⊢ φ → 2 1 − ℜ ⁡ S < 2 0
78 60 rprege0d ⊢ φ → 2 1 − ℜ ⁡ S ∈ ℝ ∧ 0 ≤ 2 1 − ℜ ⁡ S
79 absid ⊢ 2 1 − ℜ ⁡ S ∈ ℝ ∧ 0 ≤ 2 1 − ℜ ⁡ S → 2 1 − ℜ ⁡ S = 2 1 − ℜ ⁡ S
80 78 79 syl ⊢ φ → 2 1 − ℜ ⁡ S = 2 1 − ℜ ⁡ S
81 2cn ⊢ 2 ∈ ℂ
82 cxp0 ⊢ 2 ∈ ℂ → 2 0 = 1
83 81 82 ax-mp ⊢ 2 0 = 1
84 83 eqcomi ⊢ 1 = 2 0
85 84 a1i ⊢ φ → 1 = 2 0
86 77 80 85 3brtr4d ⊢ φ → 2 1 − ℜ ⁡ S < 1
87 oveq2 ⊢ n = m → 2 1 − ℜ ⁡ S n = 2 1 − ℜ ⁡ S m
88 eqid ⊢ n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n = n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n
89 ovex ⊢ 2 1 − ℜ ⁡ S m ∈ V
90 87 88 89 fvmpt ⊢ m ∈ ℕ 0 → n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ⁡ m = 2 1 − ℜ ⁡ S m
91 90 adantl ⊢ φ ∧ m ∈ ℕ 0 → n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ⁡ m = 2 1 − ℜ ⁡ S m
92 61 86 91 geolim ⊢ φ → seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ⇝ 1 1 − 2 1 − ℜ ⁡ S
93 seqex ⊢ seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ∈ V
94 ovex ⊢ 1 1 − 2 1 − ℜ ⁡ S ∈ V
95 93 94 breldm ⊢ seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ⇝ 1 1 − 2 1 − ℜ ⁡ S → seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ∈ dom ⁡ ⇝
96 92 95 syl ⊢ φ → seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ∈ dom ⁡ ⇝
97 rpcxpcl ⊢ k ∈ ℝ + ∧ − ℜ ⁡ S ∈ ℝ → k − ℜ ⁡ S ∈ ℝ +
98 20 41 97 syl2anr ⊢ φ ∧ k ∈ ℕ → k − ℜ ⁡ S ∈ ℝ +
99 98 rpred ⊢ φ ∧ k ∈ ℕ → k − ℜ ⁡ S ∈ ℝ
100 10 99 eqeltrd ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k ∈ ℝ
101 98 rpge0d ⊢ φ ∧ k ∈ ℕ → 0 ≤ k − ℜ ⁡ S
102 101 10 breqtrrd ⊢ φ ∧ k ∈ ℕ → 0 ≤ n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k
103 nnre ⊢ k ∈ ℕ → k ∈ ℝ
104 103 lep1d ⊢ k ∈ ℕ → k ≤ k + 1
105 20 reeflogd ⊢ k ∈ ℕ → e log ⁡ k = k
106 peano2nn ⊢ k ∈ ℕ → k + 1 ∈ ℕ
107 106 nnrpd ⊢ k ∈ ℕ → k + 1 ∈ ℝ +
108 107 reeflogd ⊢ k ∈ ℕ → e log ⁡ k + 1 = k + 1
109 104 105 108 3brtr4d ⊢ k ∈ ℕ → e log ⁡ k ≤ e log ⁡ k + 1
110 107 relogcld ⊢ k ∈ ℕ → log ⁡ k + 1 ∈ ℝ
111 efle ⊢ log ⁡ k ∈ ℝ ∧ log ⁡ k + 1 ∈ ℝ → log ⁡ k ≤ log ⁡ k + 1 ↔ e log ⁡ k ≤ e log ⁡ k + 1
112 21 110 111 syl2anc ⊢ k ∈ ℕ → log ⁡ k ≤ log ⁡ k + 1 ↔ e log ⁡ k ≤ e log ⁡ k + 1
113 109 112 mpbird ⊢ k ∈ ℕ → log ⁡ k ≤ log ⁡ k + 1
114 113 adantl ⊢ φ ∧ k ∈ ℕ → log ⁡ k ≤ log ⁡ k + 1
115 21 adantl ⊢ φ ∧ k ∈ ℕ → log ⁡ k ∈ ℝ
116 106 adantl ⊢ φ ∧ k ∈ ℕ → k + 1 ∈ ℕ
117 116 nnrpd ⊢ φ ∧ k ∈ ℕ → k + 1 ∈ ℝ +
118 117 relogcld ⊢ φ ∧ k ∈ ℕ → log ⁡ k + 1 ∈ ℝ
119 40 adantr ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ S ∈ ℝ
120 67 a1i ⊢ φ → 0 ∈ ℝ
121 56 a1i ⊢ φ → 1 ∈ ℝ
122 0lt1 ⊢ 0 < 1
123 122 a1i ⊢ φ → 0 < 1
124 120 121 40 123 2 lttrd ⊢ φ → 0 < ℜ ⁡ S
125 124 adantr ⊢ φ ∧ k ∈ ℕ → 0 < ℜ ⁡ S
126 lemul2 ⊢ log ⁡ k ∈ ℝ ∧ log ⁡ k + 1 ∈ ℝ ∧ ℜ ⁡ S ∈ ℝ ∧ 0 < ℜ ⁡ S → log ⁡ k ≤ log ⁡ k + 1 ↔ ℜ ⁡ S ⁢ log ⁡ k ≤ ℜ ⁡ S ⁢ log ⁡ k + 1
127 115 118 119 125 126 syl112anc ⊢ φ ∧ k ∈ ℕ → log ⁡ k ≤ log ⁡ k + 1 ↔ ℜ ⁡ S ⁢ log ⁡ k ≤ ℜ ⁡ S ⁢ log ⁡ k + 1
128 114 127 mpbid ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ S ⁢ log ⁡ k ≤ ℜ ⁡ S ⁢ log ⁡ k + 1
129 remulcl ⊢ ℜ ⁡ S ∈ ℝ ∧ log ⁡ k ∈ ℝ → ℜ ⁡ S ⁢ log ⁡ k ∈ ℝ
130 40 21 129 syl2an ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ S ⁢ log ⁡ k ∈ ℝ
131 remulcl ⊢ ℜ ⁡ S ∈ ℝ ∧ log ⁡ k + 1 ∈ ℝ → ℜ ⁡ S ⁢ log ⁡ k + 1 ∈ ℝ
132 40 110 131 syl2an ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ S ⁢ log ⁡ k + 1 ∈ ℝ
133 130 132 lenegd ⊢ φ ∧ k ∈ ℕ → ℜ ⁡ S ⁢ log ⁡ k ≤ ℜ ⁡ S ⁢ log ⁡ k + 1 ↔ − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ − ℜ ⁡ S ⁢ log ⁡ k
134 128 133 mpbid ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ − ℜ ⁡ S ⁢ log ⁡ k
135 110 recnd ⊢ k ∈ ℕ → log ⁡ k + 1 ∈ ℂ
136 mulneg1 ⊢ ℜ ⁡ S ∈ ℂ ∧ log ⁡ k + 1 ∈ ℂ → − ℜ ⁡ S ⁢ log ⁡ k + 1 = − ℜ ⁡ S ⁢ log ⁡ k + 1
137 64 135 136 syl2an ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k + 1 = − ℜ ⁡ S ⁢ log ⁡ k + 1
138 mulneg1 ⊢ ℜ ⁡ S ∈ ℂ ∧ log ⁡ k ∈ ℂ → − ℜ ⁡ S ⁢ log ⁡ k = − ℜ ⁡ S ⁢ log ⁡ k
139 64 22 138 syl2an ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k = − ℜ ⁡ S ⁢ log ⁡ k
140 134 137 139 3brtr4d ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ − ℜ ⁡ S ⁢ log ⁡ k
141 remulcl ⊢ − ℜ ⁡ S ∈ ℝ ∧ log ⁡ k + 1 ∈ ℝ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ∈ ℝ
142 41 110 141 syl2an ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ∈ ℝ
143 remulcl ⊢ − ℜ ⁡ S ∈ ℝ ∧ log ⁡ k ∈ ℝ → − ℜ ⁡ S ⁢ log ⁡ k ∈ ℝ
144 41 21 143 syl2an ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k ∈ ℝ
145 efle ⊢ − ℜ ⁡ S ⁢ log ⁡ k + 1 ∈ ℝ ∧ − ℜ ⁡ S ⁢ log ⁡ k ∈ ℝ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ − ℜ ⁡ S ⁢ log ⁡ k ↔ e − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ e − ℜ ⁡ S ⁢ log ⁡ k
146 142 144 145 syl2anc ⊢ φ ∧ k ∈ ℕ → − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ − ℜ ⁡ S ⁢ log ⁡ k ↔ e − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ e − ℜ ⁡ S ⁢ log ⁡ k
147 140 146 mpbid ⊢ φ ∧ k ∈ ℕ → e − ℜ ⁡ S ⁢ log ⁡ k + 1 ≤ e − ℜ ⁡ S ⁢ log ⁡ k
148 oveq1 ⊢ n = k + 1 → n − ℜ ⁡ S = k + 1 − ℜ ⁡ S
149 ovex ⊢ k + 1 − ℜ ⁡ S ∈ V
150 148 7 149 fvmpt ⊢ k + 1 ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k + 1 = k + 1 − ℜ ⁡ S
151 116 150 syl ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k + 1 = k + 1 − ℜ ⁡ S
152 116 nncnd ⊢ φ ∧ k ∈ ℕ → k + 1 ∈ ℂ
153 116 nnne0d ⊢ φ ∧ k ∈ ℕ → k + 1 ≠ 0
154 152 153 48 cxpefd ⊢ φ ∧ k ∈ ℕ → k + 1 − ℜ ⁡ S = e − ℜ ⁡ S ⁢ log ⁡ k + 1
155 151 154 eqtrd ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k + 1 = e − ℜ ⁡ S ⁢ log ⁡ k + 1
156 10 49 eqtrd ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k = e − ℜ ⁡ S ⁢ log ⁡ k
157 147 155 156 3brtr4d ⊢ φ ∧ k ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k + 1 ≤ n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ k
158 58 recnd ⊢ φ → 1 − ℜ ⁡ S ∈ ℂ
159 158 adantr ⊢ φ ∧ m ∈ ℕ 0 → 1 − ℜ ⁡ S ∈ ℂ
160 nn0re ⊢ m ∈ ℕ 0 → m ∈ ℝ
161 160 adantl ⊢ φ ∧ m ∈ ℕ 0 → m ∈ ℝ
162 161 recnd ⊢ φ ∧ m ∈ ℕ 0 → m ∈ ℂ
163 159 162 mulcomd ⊢ φ ∧ m ∈ ℕ 0 → 1 − ℜ ⁡ S ⁢ m = m ⁢ 1 − ℜ ⁡ S
164 163 oveq2d ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S ⁢ m = 2 m ⁢ 1 − ℜ ⁡ S
165 55 a1i ⊢ φ ∧ m ∈ ℕ 0 → 2 ∈ ℝ +
166 165 161 159 cxpmuld ⊢ φ ∧ m ∈ ℕ 0 → 2 m ⁢ 1 − ℜ ⁡ S = 2 m 1 − ℜ ⁡ S
167 simpr ⊢ φ ∧ m ∈ ℕ 0 → m ∈ ℕ 0
168 cxpexp ⊢ 2 ∈ ℂ ∧ m ∈ ℕ 0 → 2 m = 2 m
169 81 167 168 sylancr ⊢ φ ∧ m ∈ ℕ 0 → 2 m = 2 m
170 ax-1cn ⊢ 1 ∈ ℂ
171 64 adantr ⊢ φ ∧ m ∈ ℕ 0 → ℜ ⁡ S ∈ ℂ
172 negsub ⊢ 1 ∈ ℂ ∧ ℜ ⁡ S ∈ ℂ → 1 + − ℜ ⁡ S = 1 − ℜ ⁡ S
173 170 171 172 sylancr ⊢ φ ∧ m ∈ ℕ 0 → 1 + − ℜ ⁡ S = 1 − ℜ ⁡ S
174 173 eqcomd ⊢ φ ∧ m ∈ ℕ 0 → 1 − ℜ ⁡ S = 1 + − ℜ ⁡ S
175 169 174 oveq12d ⊢ φ ∧ m ∈ ℕ 0 → 2 m 1 − ℜ ⁡ S = 2 m 1 + − ℜ ⁡ S
176 164 166 175 3eqtrd ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S ⁢ m = 2 m 1 + − ℜ ⁡ S
177 58 adantr ⊢ φ ∧ m ∈ ℕ 0 → 1 − ℜ ⁡ S ∈ ℝ
178 165 177 162 cxpmuld ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S ⁢ m = 2 1 − ℜ ⁡ S m
179 2nn ⊢ 2 ∈ ℕ
180 nnexpcl ⊢ 2 ∈ ℕ ∧ m ∈ ℕ 0 → 2 m ∈ ℕ
181 179 180 mpan ⊢ m ∈ ℕ 0 → 2 m ∈ ℕ
182 181 adantl ⊢ φ ∧ m ∈ ℕ 0 → 2 m ∈ ℕ
183 182 nncnd ⊢ φ ∧ m ∈ ℕ 0 → 2 m ∈ ℂ
184 182 nnne0d ⊢ φ ∧ m ∈ ℕ 0 → 2 m ≠ 0
185 1cnd ⊢ φ ∧ m ∈ ℕ 0 → 1 ∈ ℂ
186 42 adantr ⊢ φ ∧ m ∈ ℕ 0 → − ℜ ⁡ S ∈ ℂ
187 183 184 185 186 cxpaddd ⊢ φ ∧ m ∈ ℕ 0 → 2 m 1 + − ℜ ⁡ S = 2 m 1 ⁢ 2 m − ℜ ⁡ S
188 176 178 187 3eqtr3d ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S m = 2 m 1 ⁢ 2 m − ℜ ⁡ S
189 cxpexp ⊢ 2 1 − ℜ ⁡ S ∈ ℂ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S m = 2 1 − ℜ ⁡ S m
190 61 189 sylan ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S m = 2 1 − ℜ ⁡ S m
191 183 cxp1d ⊢ φ ∧ m ∈ ℕ 0 → 2 m 1 = 2 m
192 191 oveq1d ⊢ φ ∧ m ∈ ℕ 0 → 2 m 1 ⁢ 2 m − ℜ ⁡ S = 2 m ⁢ 2 m − ℜ ⁡ S
193 188 190 192 3eqtr3d ⊢ φ ∧ m ∈ ℕ 0 → 2 1 − ℜ ⁡ S m = 2 m ⁢ 2 m − ℜ ⁡ S
194 179 167 180 sylancr ⊢ φ ∧ m ∈ ℕ 0 → 2 m ∈ ℕ
195 oveq1 ⊢ n = 2 m → n − ℜ ⁡ S = 2 m − ℜ ⁡ S
196 ovex ⊢ 2 m − ℜ ⁡ S ∈ V
197 195 7 196 fvmpt ⊢ 2 m ∈ ℕ → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ 2 m = 2 m − ℜ ⁡ S
198 194 197 syl ⊢ φ ∧ m ∈ ℕ 0 → n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ 2 m = 2 m − ℜ ⁡ S
199 198 oveq2d ⊢ φ ∧ m ∈ ℕ 0 → 2 m ⁢ n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ 2 m = 2 m ⁢ 2 m − ℜ ⁡ S
200 193 91 199 3eqtr4d ⊢ φ ∧ m ∈ ℕ 0 → n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ⁡ m = 2 m ⁢ n ∈ ℕ ⟼ n − ℜ ⁡ S ⁡ 2 m
201 100 102 157 200 climcnds ⊢ φ → seq 1 + n ∈ ℕ ⟼ n − ℜ ⁡ S ∈ dom ⁡ ⇝ ↔ seq 0 + n ∈ ℕ 0 ⟼ 2 1 − ℜ ⁡ S n ∈ dom ⁡ ⇝
202 96 201 mpbird ⊢ φ → seq 1 + n ∈ ℕ ⟼ n − ℜ ⁡ S ∈ dom ⁡ ⇝
203 4 5 52 54 202 abscvgcvg ⊢ φ → seq 1 + F ∈ dom ⁡ ⇝