Metamath Proof Explorer


Theorem fourierdlem48

Description: The given periodic function F has a right limit at every point in the reals. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses fourierdlem48.a φ A
fourierdlem48.b φ B
fourierdlem48.altb φ A < B
fourierdlem48.p P = m p 0 m | p 0 = A p m = B i 0 ..^ m p i < p i + 1
fourierdlem48.t T = B A
fourierdlem48.m φ M
fourierdlem48.q φ Q P M
fourierdlem48.f φ F : D
fourierdlem48.dper φ x D k x + k T D
fourierdlem48.per φ x D k F x + k T = F x
fourierdlem48.cn φ i 0 ..^ M F Q i Q i + 1 : Q i Q i + 1 cn
fourierdlem48.r φ i 0 ..^ M R F Q i Q i + 1 lim Q i
fourierdlem48.x φ X
fourierdlem48.z Z = x B x T T
fourierdlem48.e E = x x + Z x
fourierdlem48.ch χ φ i 0 ..^ M y Q i Q i + 1 k y = X + k T
Assertion fourierdlem48 φ F X +∞ lim X

Proof

Step Hyp Ref Expression
1 fourierdlem48.a φ A
2 fourierdlem48.b φ B
3 fourierdlem48.altb φ A < B
4 fourierdlem48.p P = m p 0 m | p 0 = A p m = B i 0 ..^ m p i < p i + 1
5 fourierdlem48.t T = B A
6 fourierdlem48.m φ M
7 fourierdlem48.q φ Q P M
8 fourierdlem48.f φ F : D
9 fourierdlem48.dper φ x D k x + k T D
10 fourierdlem48.per φ x D k F x + k T = F x
11 fourierdlem48.cn φ i 0 ..^ M F Q i Q i + 1 : Q i Q i + 1 cn
12 fourierdlem48.r φ i 0 ..^ M R F Q i Q i + 1 lim Q i
13 fourierdlem48.x φ X
14 fourierdlem48.z Z = x B x T T
15 fourierdlem48.e E = x x + Z x
16 fourierdlem48.ch χ φ i 0 ..^ M y Q i Q i + 1 k y = X + k T
17 simpl φ E X = B φ
18 0zd φ 0
19 6 nnzd φ M
20 6 nngt0d φ 0 < M
21 fzolb 0 0 ..^ M 0 M 0 < M
22 18 19 20 21 syl3anbrc φ 0 0 ..^ M
23 22 adantr φ E X = B 0 0 ..^ M
24 2 13 resubcld φ B X
25 2 1 resubcld φ B A
26 5 25 eqeltrid φ T
27 1 2 posdifd φ A < B 0 < B A
28 3 27 mpbid φ 0 < B A
29 28 5 breqtrrdi φ 0 < T
30 29 gt0ne0d φ T 0
31 24 26 30 redivcld φ B X T
32 31 adantr φ E X = B B X T
33 32 flcld φ E X = B B X T
34 1zzd φ E X = B 1
35 33 34 zsubcld φ E X = B B X T 1
36 id E X = B E X = B
37 5 a1i E X = B T = B A
38 36 37 oveq12d E X = B E X T = B B A
39 2 recnd φ B
40 1 recnd φ A
41 39 40 nncand φ B B A = A
42 38 41 sylan9eqr φ E X = B E X T = A
43 4 fourierdlem2 M Q P M Q 0 M Q 0 = A Q M = B i 0 ..^ M Q i < Q i + 1
44 6 43 syl φ Q P M Q 0 M Q 0 = A Q M = B i 0 ..^ M Q i < Q i + 1
45 7 44 mpbid φ Q 0 M Q 0 = A Q M = B i 0 ..^ M Q i < Q i + 1
46 45 simpld φ Q 0 M
47 elmapi Q 0 M Q : 0 M
48 46 47 syl φ Q : 0 M
49 6 nnnn0d φ M 0
50 nn0uz 0 = 0
51 49 50 eleqtrdi φ M 0
52 eluzfz1 M 0 0 0 M
53 51 52 syl φ 0 0 M
54 48 53 ffvelrnd φ Q 0
55 54 rexrd φ Q 0 *
56 1zzd φ 1
57 18 19 56 3jca φ 0 M 1
58 0le1 0 1
59 58 a1i φ 0 1
60 6 nnge1d φ 1 M
61 57 59 60 jca32 φ 0 M 1 0 1 1 M
62 elfz2 1 0 M 0 M 1 0 1 1 M
63 61 62 sylibr φ 1 0 M
64 48 63 ffvelrnd φ Q 1
65 64 rexrd φ Q 1 *
66 1 rexrd φ A *
67 45 simprd φ Q 0 = A Q M = B i 0 ..^ M Q i < Q i + 1
68 67 simplld φ Q 0 = A
69 1 leidd φ A A
70 68 69 eqbrtrd φ Q 0 A
71 68 eqcomd φ A = Q 0
72 0re 0
73 eleq1 i = 0 i 0 ..^ M 0 0 ..^ M
74 73 anbi2d i = 0 φ i 0 ..^ M φ 0 0 ..^ M
75 fveq2 i = 0 Q i = Q 0
76 oveq1 i = 0 i + 1 = 0 + 1
77 76 fveq2d i = 0 Q i + 1 = Q 0 + 1
78 75 77 breq12d i = 0 Q i < Q i + 1 Q 0 < Q 0 + 1
79 74 78 imbi12d i = 0 φ i 0 ..^ M Q i < Q i + 1 φ 0 0 ..^ M Q 0 < Q 0 + 1
80 45 simprrd φ i 0 ..^ M Q i < Q i + 1
81 80 r19.21bi φ i 0 ..^ M Q i < Q i + 1
82 79 81 vtoclg 0 φ 0 0 ..^ M Q 0 < Q 0 + 1
83 72 82 ax-mp φ 0 0 ..^ M Q 0 < Q 0 + 1
84 22 83 mpdan φ Q 0 < Q 0 + 1
85 1e0p1 1 = 0 + 1
86 85 fveq2i Q 1 = Q 0 + 1
87 84 86 breqtrrdi φ Q 0 < Q 1
88 71 87 eqbrtrd φ A < Q 1
89 55 65 66 70 88 elicod φ A Q 0 Q 1
90 86 oveq2i Q 0 Q 1 = Q 0 Q 0 + 1
91 89 90 eleqtrdi φ A Q 0 Q 0 + 1
92 91 adantr φ E X = B A Q 0 Q 0 + 1
93 42 92 eqeltrd φ E X = B E X T Q 0 Q 0 + 1
94 15 a1i φ E = x x + Z x
95 id x = X x = X
96 fveq2 x = X Z x = Z X
97 95 96 oveq12d x = X x + Z x = X + Z X
98 97 adantl φ x = X x + Z x = X + Z X
99 14 a1i φ Z = x B x T T
100 oveq2 x = X B x = B X
101 100 oveq1d x = X B x T = B X T
102 101 fveq2d x = X B x T = B X T
103 102 oveq1d x = X B x T T = B X T T
104 103 adantl φ x = X B x T T = B X T T
105 31 flcld φ B X T
106 105 zred φ B X T
107 106 26 remulcld φ B X T T
108 99 104 13 107 fvmptd φ Z X = B X T T
109 108 107 eqeltrd φ Z X
110 13 109 readdcld φ X + Z X
111 94 98 13 110 fvmptd φ E X = X + Z X
112 108 oveq2d φ X + Z X = X + B X T T
113 111 112 eqtrd φ E X = X + B X T T
114 113 oveq1d φ E X T = X + B X T T - T
115 13 recnd φ X
116 107 recnd φ B X T T
117 26 recnd φ T
118 115 116 117 addsubassd φ X + B X T T - T = X + B X T T - T
119 105 zcnd φ B X T
120 119 117 mulsubfacd φ B X T T T = B X T 1 T
121 120 oveq2d φ X + B X T T - T = X + B X T 1 T
122 114 118 121 3eqtrd φ E X T = X + B X T 1 T
123 122 adantr φ E X = B E X T = X + B X T 1 T
124 oveq1 k = B X T 1 k T = B X T 1 T
125 124 oveq2d k = B X T 1 X + k T = X + B X T 1 T
126 125 eqeq2d k = B X T 1 E X T = X + k T E X T = X + B X T 1 T
127 126 anbi2d k = B X T 1 E X T Q 0 Q 0 + 1 E X T = X + k T E X T Q 0 Q 0 + 1 E X T = X + B X T 1 T
128 127 rspcev B X T 1 E X T Q 0 Q 0 + 1 E X T = X + B X T 1 T k E X T Q 0 Q 0 + 1 E X T = X + k T
129 35 93 123 128 syl12anc φ E X = B k E X T Q 0 Q 0 + 1 E X T = X + k T
130 75 77 oveq12d i = 0 Q i Q i + 1 = Q 0 Q 0 + 1
131 130 eleq2d i = 0 E X T Q i Q i + 1 E X T Q 0 Q 0 + 1
132 131 anbi1d i = 0 E X T Q i Q i + 1 E X T = X + k T E X T Q 0 Q 0 + 1 E X T = X + k T
133 132 rexbidv i = 0 k E X T Q i Q i + 1 E X T = X + k T k E X T Q 0 Q 0 + 1 E X T = X + k T
134 133 rspcev 0 0 ..^ M k E X T Q 0 Q 0 + 1 E X T = X + k T i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T
135 23 129 134 syl2anc φ E X = B i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T
136 ovex E X T V
137 eleq1 y = E X T y Q i Q i + 1 E X T Q i Q i + 1
138 eqeq1 y = E X T y = X + k T E X T = X + k T
139 137 138 anbi12d y = E X T y Q i Q i + 1 y = X + k T E X T Q i Q i + 1 E X T = X + k T
140 139 2rexbidv y = E X T i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T
141 140 anbi2d y = E X T φ i 0 ..^ M k y Q i Q i + 1 y = X + k T φ i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T
142 141 imbi1d y = E X T φ i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X φ i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T F X +∞ lim X
143 simpr φ i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M k y Q i Q i + 1 y = X + k T
144 nfv i φ
145 nfre1 i i 0 ..^ M k y Q i Q i + 1 y = X + k T
146 144 145 nfan i φ i 0 ..^ M k y Q i Q i + 1 y = X + k T
147 nfv k φ
148 nfcv _ k 0 ..^ M
149 nfre1 k k y Q i Q i + 1 y = X + k T
150 148 149 nfrex k i 0 ..^ M k y Q i Q i + 1 y = X + k T
151 147 150 nfan k φ i 0 ..^ M k y Q i Q i + 1 y = X + k T
152 simp1 φ i 0 ..^ M k y Q i Q i + 1 y = X + k T φ
153 simp2l φ i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M
154 simp3l φ i 0 ..^ M k y Q i Q i + 1 y = X + k T y Q i Q i + 1
155 152 153 154 jca31 φ i 0 ..^ M k y Q i Q i + 1 y = X + k T φ i 0 ..^ M y Q i Q i + 1
156 simp2r φ i 0 ..^ M k y Q i Q i + 1 y = X + k T k
157 simp3r φ i 0 ..^ M k y Q i Q i + 1 y = X + k T y = X + k T
158 16 biimpi χ φ i 0 ..^ M y Q i Q i + 1 k y = X + k T
159 158 simplld χ φ i 0 ..^ M y Q i Q i + 1
160 159 simplld χ φ
161 frel F : D Rel F
162 160 8 161 3syl χ Rel F
163 resindm Rel F F X +∞ dom F = F X +∞
164 163 eqcomd Rel F F X +∞ = F X +∞ dom F
165 162 164 syl χ F X +∞ = F X +∞ dom F
166 fdm F : D dom F = D
167 160 8 166 3syl χ dom F = D
168 167 ineq2d χ X +∞ dom F = X +∞ D
169 168 reseq2d χ F X +∞ dom F = F X +∞ D
170 165 169 eqtrd χ F X +∞ = F X +∞ D
171 170 oveq1d χ F X +∞ lim X = F X +∞ D lim X
172 160 8 syl χ F : D
173 ax-resscn
174 173 a1i χ
175 172 174 fssd χ F : D
176 inss2 X +∞ D D
177 176 a1i χ X +∞ D D
178 175 177 fssresd χ F X +∞ D : X +∞ D
179 pnfxr +∞ *
180 179 a1i χ +∞ *
181 159 simplrd χ i 0 ..^ M
182 48 adantr φ i 0 ..^ M Q : 0 M
183 fzofzp1 i 0 ..^ M i + 1 0 M
184 183 adantl φ i 0 ..^ M i + 1 0 M
185 182 184 ffvelrnd φ i 0 ..^ M Q i + 1
186 160 181 185 syl2anc χ Q i + 1
187 158 simplrd χ k
188 187 zred χ k
189 160 26 syl χ T
190 188 189 remulcld χ k T
191 186 190 resubcld χ Q i + 1 k T
192 191 rexrd χ Q i + 1 k T *
193 191 ltpnfd χ Q i + 1 k T < +∞
194 192 180 193 xrltled χ Q i + 1 k T +∞
195 iooss2 +∞ * Q i + 1 k T +∞ X Q i + 1 k T X +∞
196 180 194 195 syl2anc χ X Q i + 1 k T X +∞
197 187 adantr χ w X Q i + 1 k T k
198 197 zcnd χ w X Q i + 1 k T k
199 189 recnd χ T
200 199 adantr χ w X Q i + 1 k T T
201 198 200 mulneg1d χ w X Q i + 1 k T k T = k T
202 201 oveq2d χ w X Q i + 1 k T w + k T + k T = w + k T + k T
203 elioore w X Q i + 1 k T w
204 203 recnd w X Q i + 1 k T w
205 204 adantl χ w X Q i + 1 k T w
206 198 200 mulcld χ w X Q i + 1 k T k T
207 205 206 addcld χ w X Q i + 1 k T w + k T
208 207 206 negsubd χ w X Q i + 1 k T w + k T + k T = w + k T - k T
209 205 206 pncand χ w X Q i + 1 k T w + k T - k T = w
210 202 208 209 3eqtrrd χ w X Q i + 1 k T w = w + k T + k T
211 160 adantr χ w X Q i + 1 k T φ
212 159 simpld χ φ i 0 ..^ M
213 cncff F Q i Q i + 1 : Q i Q i + 1 cn F Q i Q i + 1 : Q i Q i + 1
214 fdm F Q i Q i + 1 : Q i Q i + 1 dom F Q i Q i + 1 = Q i Q i + 1
215 11 213 214 3syl φ i 0 ..^ M dom F Q i Q i + 1 = Q i Q i + 1
216 ssdmres Q i Q i + 1 dom F dom F Q i Q i + 1 = Q i Q i + 1
217 215 216 sylibr φ i 0 ..^ M Q i Q i + 1 dom F
218 8 166 syl φ dom F = D
219 218 adantr φ i 0 ..^ M dom F = D
220 217 219 sseqtrd φ i 0 ..^ M Q i Q i + 1 D
221 212 220 syl χ Q i Q i + 1 D
222 221 adantr χ w X Q i + 1 k T Q i Q i + 1 D
223 elfzofz i 0 ..^ M i 0 M
224 223 adantl φ i 0 ..^ M i 0 M
225 182 224 ffvelrnd φ i 0 ..^ M Q i
226 160 181 225 syl2anc χ Q i
227 226 rexrd χ Q i *
228 227 adantr χ w X Q i + 1 k T Q i *
229 186 rexrd χ Q i + 1 *
230 229 adantr χ w X Q i + 1 k T Q i + 1 *
231 203 adantl χ w X Q i + 1 k T w
232 197 zred χ w X Q i + 1 k T k
233 211 26 syl χ w X Q i + 1 k T T
234 232 233 remulcld χ w X Q i + 1 k T k T
235 231 234 readdcld χ w X Q i + 1 k T w + k T
236 226 adantr χ w X Q i + 1 k T Q i
237 160 13 syl χ X
238 237 190 readdcld χ X + k T
239 238 adantr χ w X Q i + 1 k T X + k T
240 16 simprbi χ y = X + k T
241 240 eqcomd χ X + k T = y
242 159 simprd χ y Q i Q i + 1
243 241 242 eqeltrd χ X + k T Q i Q i + 1
244 icogelb Q i * Q i + 1 * X + k T Q i Q i + 1 Q i X + k T
245 227 229 243 244 syl3anc χ Q i X + k T
246 245 adantr χ w X Q i + 1 k T Q i X + k T
247 211 13 syl χ w X Q i + 1 k T X
248 247 rexrd χ w X Q i + 1 k T X *
249 186 adantr χ w X Q i + 1 k T Q i + 1
250 249 234 resubcld χ w X Q i + 1 k T Q i + 1 k T
251 250 rexrd χ w X Q i + 1 k T Q i + 1 k T *
252 simpr χ w X Q i + 1 k T w X Q i + 1 k T
253 ioogtlb X * Q i + 1 k T * w X Q i + 1 k T X < w
254 248 251 252 253 syl3anc χ w X Q i + 1 k T X < w
255 247 231 234 254 ltadd1dd χ w X Q i + 1 k T X + k T < w + k T
256 236 239 235 246 255 lelttrd χ w X Q i + 1 k T Q i < w + k T
257 iooltub X * Q i + 1 k T * w X Q i + 1 k T w < Q i + 1 k T
258 248 251 252 257 syl3anc χ w X Q i + 1 k T w < Q i + 1 k T
259 231 250 234 258 ltadd1dd χ w X Q i + 1 k T w + k T < Q i + 1 - k T + k T
260 186 recnd χ Q i + 1
261 190 recnd χ k T
262 260 261 npcand χ Q i + 1 - k T + k T = Q i + 1
263 262 adantr χ w X Q i + 1 k T Q i + 1 - k T + k T = Q i + 1
264 259 263 breqtrd χ w X Q i + 1 k T w + k T < Q i + 1
265 228 230 235 256 264 eliood χ w X Q i + 1 k T w + k T Q i Q i + 1
266 222 265 sseldd χ w X Q i + 1 k T w + k T D
267 197 znegcld χ w X Q i + 1 k T k
268 ovex w + k T V
269 eleq1 x = w + k T x D w + k T D
270 269 3anbi2d x = w + k T φ x D k φ w + k T D k
271 oveq1 x = w + k T x + k T = w + k T + k T
272 271 eleq1d x = w + k T x + k T D w + k T + k T D
273 270 272 imbi12d x = w + k T φ x D k x + k T D φ w + k T D k w + k T + k T D
274 negex k V
275 eleq1 j = k j k
276 275 3anbi3d j = k φ x D j φ x D k
277 oveq1 j = k j T = k T
278 277 oveq2d j = k x + j T = x + k T
279 278 eleq1d j = k x + j T D x + k T D
280 276 279 imbi12d j = k φ x D j x + j T D φ x D k x + k T D
281 eleq1 k = j k j
282 281 3anbi3d k = j φ x D k φ x D j
283 oveq1 k = j k T = j T
284 283 oveq2d k = j x + k T = x + j T
285 284 eleq1d k = j x + k T D x + j T D
286 282 285 imbi12d k = j φ x D k x + k T D φ x D j x + j T D
287 286 9 chvarvv φ x D j x + j T D
288 274 280 287 vtocl φ x D k x + k T D
289 268 273 288 vtocl φ w + k T D k w + k T + k T D
290 211 266 267 289 syl3anc χ w X Q i + 1 k T w + k T + k T D
291 210 290 eqeltrd χ w X Q i + 1 k T w D
292 291 ralrimiva χ w X Q i + 1 k T w D
293 dfss3 X Q i + 1 k T D w X Q i + 1 k T w D
294 292 293 sylibr χ X Q i + 1 k T D
295 196 294 ssind χ X Q i + 1 k T X +∞ D
296 ioosscn X +∞
297 ssinss1 X +∞ X +∞ D
298 296 297 mp1i χ X +∞ D
299 eqid TopOpen fld = TopOpen fld
300 eqid TopOpen fld 𝑡 X +∞ D X = TopOpen fld 𝑡 X +∞ D X
301 237 rexrd χ X *
302 237 leidd χ X X
303 240 oveq1d χ y k T = X + k T - k T
304 237 recnd χ X
305 304 261 pncand χ X + k T - k T = X
306 303 305 eqtr2d χ X = y k T
307 icossre Q i Q i + 1 * Q i Q i + 1
308 226 229 307 syl2anc χ Q i Q i + 1
309 308 242 sseldd χ y
310 icoltub Q i * Q i + 1 * y Q i Q i + 1 y < Q i + 1
311 227 229 242 310 syl3anc χ y < Q i + 1
312 309 186 190 311 ltsub1dd χ y k T < Q i + 1 k T
313 306 312 eqbrtrd χ X < Q i + 1 k T
314 301 192 301 302 313 elicod χ X X Q i + 1 k T
315 snunioo1 X * Q i + 1 k T * X < Q i + 1 k T X Q i + 1 k T X = X Q i + 1 k T
316 301 192 313 315 syl3anc χ X Q i + 1 k T X = X Q i + 1 k T
317 316 fveq2d χ int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T X = int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T
318 299 cnfldtop TopOpen fld Top
319 ovex X +∞ V
320 319 inex1 X +∞ D V
321 snex X V
322 320 321 unex X +∞ D X V
323 resttop TopOpen fld Top X +∞ D X V TopOpen fld 𝑡 X +∞ D X Top
324 318 322 323 mp2an TopOpen fld 𝑡 X +∞ D X Top
325 324 a1i χ TopOpen fld 𝑡 X +∞ D X Top
326 retop topGen ran . Top
327 326 a1i χ topGen ran . Top
328 322 a1i χ X +∞ D X V
329 iooretop −∞ Q i + 1 k T topGen ran .
330 329 a1i χ −∞ Q i + 1 k T topGen ran .
331 elrestr topGen ran . Top X +∞ D X V −∞ Q i + 1 k T topGen ran . −∞ Q i + 1 k T X +∞ D X topGen ran . 𝑡 X +∞ D X
332 327 328 330 331 syl3anc χ −∞ Q i + 1 k T X +∞ D X topGen ran . 𝑡 X +∞ D X
333 mnfxr −∞ *
334 333 a1i χ x X Q i + 1 k T −∞ *
335 192 adantr χ x X Q i + 1 k T Q i + 1 k T *
336 icossre X Q i + 1 k T * X Q i + 1 k T
337 237 192 336 syl2anc χ X Q i + 1 k T
338 337 sselda χ x X Q i + 1 k T x
339 338 mnfltd χ x X Q i + 1 k T −∞ < x
340 301 adantr χ x X Q i + 1 k T X *
341 simpr χ x X Q i + 1 k T x X Q i + 1 k T
342 icoltub X * Q i + 1 k T * x X Q i + 1 k T x < Q i + 1 k T
343 340 335 341 342 syl3anc χ x X Q i + 1 k T x < Q i + 1 k T
344 334 335 338 339 343 eliood χ x X Q i + 1 k T x −∞ Q i + 1 k T
345 vsnid x x
346 345 a1i x = X x x
347 sneq x = X x = X
348 346 347 eleqtrd x = X x X
349 elun2 x X x X +∞ D X
350 348 349 syl x = X x X +∞ D X
351 350 adantl χ x X Q i + 1 k T x = X x X +∞ D X
352 301 ad2antrr χ x X Q i + 1 k T ¬ x = X X *
353 179 a1i χ x X Q i + 1 k T ¬ x = X +∞ *
354 338 adantr χ x X Q i + 1 k T ¬ x = X x
355 237 ad2antrr χ x X Q i + 1 k T ¬ x = X X
356 icogelb X * Q i + 1 k T * x X Q i + 1 k T X x
357 340 335 341 356 syl3anc χ x X Q i + 1 k T X x
358 357 adantr χ x X Q i + 1 k T ¬ x = X X x
359 neqne ¬ x = X x X
360 359 adantl χ x X Q i + 1 k T ¬ x = X x X
361 355 354 358 360 leneltd χ x X Q i + 1 k T ¬ x = X X < x
362 354 ltpnfd χ x X Q i + 1 k T ¬ x = X x < +∞
363 352 353 354 361 362 eliood χ x X Q i + 1 k T ¬ x = X x X +∞
364 187 zcnd χ k
365 364 199 mulneg1d χ k T = k T
366 365 oveq2d χ w + k T + k T = w + k T + k T
367 366 adantr χ w X Q i + 1 k T w + k T + k T = w + k T + k T
368 ioosscn X Q i + 1 k T
369 368 sseli w X Q i + 1 k T w
370 369 adantl χ w X Q i + 1 k T w
371 261 adantr χ w X Q i + 1 k T k T
372 370 371 addcld χ w X Q i + 1 k T w + k T
373 372 371 negsubd χ w X Q i + 1 k T w + k T + k T = w + k T - k T
374 370 371 pncand χ w X Q i + 1 k T w + k T - k T = w
375 367 373 374 3eqtrrd χ w X Q i + 1 k T w = w + k T + k T
376 190 adantr χ w X Q i + 1 k T k T
377 231 376 readdcld χ w X Q i + 1 k T w + k T
378 228 230 377 256 264 eliood χ w X Q i + 1 k T w + k T Q i Q i + 1
379 222 378 sseldd χ w X Q i + 1 k T w + k T D
380 275 3anbi3d j = k φ w + k T D j φ w + k T D k
381 277 oveq2d j = k w + k T + j T = w + k T + k T
382 381 eleq1d j = k w + k T + j T D w + k T + k T D
383 380 382 imbi12d j = k φ w + k T D j w + k T + j T D φ w + k T D k w + k T + k T D
384 269 3anbi2d x = w + k T φ x D j φ w + k T D j
385 oveq1 x = w + k T x + j T = w + k T + j T
386 385 eleq1d x = w + k T x + j T D w + k T + j T D
387 384 386 imbi12d x = w + k T φ x D j x + j T D φ w + k T D j w + k T + j T D
388 268 387 287 vtocl φ w + k T D j w + k T + j T D
389 274 383 388 vtocl φ w + k T D k w + k T + k T D
390 211 379 267 389 syl3anc χ w X Q i + 1 k T w + k T + k T D
391 375 390 eqeltrd χ w X Q i + 1 k T w D
392 391 ralrimiva χ w X Q i + 1 k T w D
393 392 293 sylibr χ X Q i + 1 k T D
394 393 ad2antrr χ x X Q i + 1 k T ¬ x = X X Q i + 1 k T D
395 192 ad2antrr χ x X Q i + 1 k T ¬ x = X Q i + 1 k T *
396 343 adantr χ x X Q i + 1 k T ¬ x = X x < Q i + 1 k T
397 352 395 354 361 396 eliood χ x X Q i + 1 k T ¬ x = X x X Q i + 1 k T
398 394 397 sseldd χ x X Q i + 1 k T ¬ x = X x D
399 363 398 elind χ x X Q i + 1 k T ¬ x = X x X +∞ D
400 elun1 x X +∞ D x X +∞ D X
401 399 400 syl χ x X Q i + 1 k T ¬ x = X x X +∞ D X
402 351 401 pm2.61dan χ x X Q i + 1 k T x X +∞ D X
403 344 402 elind χ x X Q i + 1 k T x −∞ Q i + 1 k T X +∞ D X
404 301 adantr χ x −∞ Q i + 1 k T X +∞ D X X *
405 192 adantr χ x −∞ Q i + 1 k T X +∞ D X Q i + 1 k T *
406 elinel1 x −∞ Q i + 1 k T X +∞ D X x −∞ Q i + 1 k T
407 elioore x −∞ Q i + 1 k T x
408 406 407 syl x −∞ Q i + 1 k T X +∞ D X x
409 408 rexrd x −∞ Q i + 1 k T X +∞ D X x *
410 409 adantl χ x −∞ Q i + 1 k T X +∞ D X x *
411 elinel2 x −∞ Q i + 1 k T X +∞ D X x X +∞ D X
412 237 adantr χ x = X X
413 95 eqcomd x = X X = x
414 413 adantl χ x = X X = x
415 412 414 eqled χ x = X X x
416 415 adantlr χ x X +∞ D X x = X X x
417 simpll χ x X +∞ D X ¬ x = X χ
418 simplr χ x X +∞ D X ¬ x = X x X +∞ D X
419 id ¬ x = X ¬ x = X
420 velsn x X x = X
421 419 420 sylnibr ¬ x = X ¬ x X
422 421 adantl χ x X +∞ D X ¬ x = X ¬ x X
423 elunnel2 x X +∞ D X ¬ x X x X +∞ D
424 418 422 423 syl2anc χ x X +∞ D X ¬ x = X x X +∞ D
425 elinel1 x X +∞ D x X +∞
426 424 425 syl χ x X +∞ D X ¬ x = X x X +∞
427 237 adantr χ x X +∞ X
428 elioore x X +∞ x
429 428 adantl χ x X +∞ x
430 301 adantr χ x X +∞ X *
431 179 a1i χ x X +∞ +∞ *
432 simpr χ x X +∞ x X +∞
433 ioogtlb X * +∞ * x X +∞ X < x
434 430 431 432 433 syl3anc χ x X +∞ X < x
435 427 429 434 ltled χ x X +∞ X x
436 417 426 435 syl2anc χ x X +∞ D X ¬ x = X X x
437 416 436 pm2.61dan χ x X +∞ D X X x
438 411 437 sylan2 χ x −∞ Q i + 1 k T X +∞ D X X x
439 333 a1i χ x −∞ Q i + 1 k T −∞ *
440 192 adantr χ x −∞ Q i + 1 k T Q i + 1 k T *
441 simpr χ x −∞ Q i + 1 k T x −∞ Q i + 1 k T
442 iooltub −∞ * Q i + 1 k T * x −∞ Q i + 1 k T x < Q i + 1 k T
443 439 440 441 442 syl3anc χ x −∞ Q i + 1 k T x < Q i + 1 k T
444 406 443 sylan2 χ x −∞ Q i + 1 k T X +∞ D X x < Q i + 1 k T
445 404 405 410 438 444 elicod χ x −∞ Q i + 1 k T X +∞ D X x X Q i + 1 k T
446 403 445 impbida χ x X Q i + 1 k T x −∞ Q i + 1 k T X +∞ D X
447 446 eqrdv χ X Q i + 1 k T = −∞ Q i + 1 k T X +∞ D X
448 ioossre X +∞
449 ssinss1 X +∞ X +∞ D
450 448 449 mp1i χ X +∞ D
451 237 snssd χ X
452 450 451 unssd χ X +∞ D X
453 eqid topGen ran . = topGen ran .
454 299 453 rerest X +∞ D X TopOpen fld 𝑡 X +∞ D X = topGen ran . 𝑡 X +∞ D X
455 452 454 syl χ TopOpen fld 𝑡 X +∞ D X = topGen ran . 𝑡 X +∞ D X
456 332 447 455 3eltr4d χ X Q i + 1 k T TopOpen fld 𝑡 X +∞ D X
457 isopn3i TopOpen fld 𝑡 X +∞ D X Top X Q i + 1 k T TopOpen fld 𝑡 X +∞ D X int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T = X Q i + 1 k T
458 325 456 457 syl2anc χ int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T = X Q i + 1 k T
459 317 458 eqtr2d χ X Q i + 1 k T = int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T X
460 314 459 eleqtrd χ X int TopOpen fld 𝑡 X +∞ D X X Q i + 1 k T X
461 178 295 298 299 300 460 limcres χ F X +∞ D X Q i + 1 k T lim X = F X +∞ D lim X
462 295 resabs1d χ F X +∞ D X Q i + 1 k T = F X Q i + 1 k T
463 462 oveq1d χ F X +∞ D X Q i + 1 k T lim X = F X Q i + 1 k T lim X
464 173 a1i φ
465 8 464 fssd φ F : D
466 218 feq2d φ F : dom F F : D
467 465 466 mpbird φ F : dom F
468 160 467 syl χ F : dom F
469 468 adantr χ w F X Q i + 1 k T lim X F : dom F
470 368 a1i χ w F X Q i + 1 k T lim X X Q i + 1 k T
471 393 167 sseqtrrd χ X Q i + 1 k T dom F
472 471 adantr χ w F X Q i + 1 k T lim X X Q i + 1 k T dom F
473 261 adantr χ w F X Q i + 1 k T lim X k T
474 eqid z | x X Q i + 1 k T z = x + k T = z | x X Q i + 1 k T z = x + k T
475 eqeq1 z = w z = x + k T w = x + k T
476 475 rexbidv z = w x X Q i + 1 k T z = x + k T x X Q i + 1 k T w = x + k T
477 476 elrab w z | x X Q i + 1 k T z = x + k T w x X Q i + 1 k T w = x + k T
478 477 simprbi w z | x X Q i + 1 k T z = x + k T x X Q i + 1 k T w = x + k T
479 478 adantl χ w z | x X Q i + 1 k T z = x + k T x X Q i + 1 k T w = x + k T
480 nfv x χ
481 nfre1 x x X Q i + 1 k T z = x + k T
482 nfcv _ x
483 481 482 nfrabw _ x z | x X Q i + 1 k T z = x + k T
484 483 nfcri x w z | x X Q i + 1 k T z = x + k T
485 480 484 nfan x χ w z | x X Q i + 1 k T z = x + k T
486 nfv x w D
487 simp3 χ x X Q i + 1 k T w = x + k T w = x + k T
488 eleq1 w = x w X Q i + 1 k T x X Q i + 1 k T
489 488 anbi2d w = x χ w X Q i + 1 k T χ x X Q i + 1 k T
490 oveq1 w = x w + k T = x + k T
491 490 eleq1d w = x w + k T D x + k T D
492 489 491 imbi12d w = x χ w X Q i + 1 k T w + k T D χ x X Q i + 1 k T x + k T D
493 492 266 chvarvv χ x X Q i + 1 k T x + k T D
494 493 3adant3 χ x X Q i + 1 k T w = x + k T x + k T D
495 487 494 eqeltrd χ x X Q i + 1 k T w = x + k T w D
496 495 3exp χ x X Q i + 1 k T w = x + k T w D
497 496 adantr χ w z | x X Q i + 1 k T z = x + k T x X Q i + 1 k T w = x + k T w D
498 485 486 497 rexlimd χ w z | x X Q i + 1 k T z = x + k T x X Q i + 1 k T w = x + k T w D
499 479 498 mpd χ w z | x X Q i + 1 k T z = x + k T w D
500 499 ralrimiva χ w z | x X Q i + 1 k T z = x + k T w D
501 dfss3 z | x X Q i + 1 k T z = x + k T D w z | x X Q i + 1 k T z = x + k T w D
502 500 501 sylibr χ z | x X Q i + 1 k T z = x + k T D
503 502 167 sseqtrrd χ z | x X Q i + 1 k T z = x + k T dom F
504 503 adantr χ w F X Q i + 1 k T lim X z | x X Q i + 1 k T z = x + k T dom F
505 160 adantr χ x X Q i + 1 k T φ
506 393 sselda χ x X Q i + 1 k T x D
507 187 adantr χ x X Q i + 1 k T k
508 505 506 507 10 syl3anc χ x X Q i + 1 k T F x + k T = F x
509 508 adantlr χ w F X Q i + 1 k T lim X x X Q i + 1 k T F x + k T = F x
510 simpr χ w F X Q i + 1 k T lim X w F X Q i + 1 k T lim X
511 469 470 472 473 474 504 509 510 limcperiod χ w F X Q i + 1 k T lim X w F z | x X Q i + 1 k T z = x + k T lim X + k T
512 262 eqcomd χ Q i + 1 = Q i + 1 - k T + k T
513 240 512 oveq12d χ y Q i + 1 = X + k T Q i + 1 - k T + k T
514 237 191 190 iooshift χ X + k T Q i + 1 - k T + k T = z | x X Q i + 1 k T z = x + k T
515 513 514 eqtr2d χ z | x X Q i + 1 k T z = x + k T = y Q i + 1
516 515 reseq2d χ F z | x X Q i + 1 k T z = x + k T = F y Q i + 1
517 516 241 oveq12d χ F z | x X Q i + 1 k T z = x + k T lim X + k T = F y Q i + 1 lim y
518 517 adantr χ w F X Q i + 1 k T lim X F z | x X Q i + 1 k T z = x + k T lim X + k T = F y Q i + 1 lim y
519 511 518 eleqtrd χ w F X Q i + 1 k T lim X w F y Q i + 1 lim y
520 468 adantr χ w F y Q i + 1 lim y F : dom F
521 ioosscn y Q i + 1
522 521 a1i χ w F y Q i + 1 lim y y Q i + 1
523 icogelb Q i * Q i + 1 * y Q i Q i + 1 Q i y
524 227 229 242 523 syl3anc χ Q i y
525 iooss1 Q i * Q i y y Q i + 1 Q i Q i + 1
526 227 524 525 syl2anc χ y Q i + 1 Q i Q i + 1
527 526 221 sstrd χ y Q i + 1 D
528 527 167 sseqtrrd χ y Q i + 1 dom F
529 528 adantr χ w F y Q i + 1 lim y y Q i + 1 dom F
530 364 negcld χ k
531 530 199 mulcld χ k T
532 531 adantr χ w F y Q i + 1 lim y k T
533 eqid z | x y Q i + 1 z = x + k T = z | x y Q i + 1 z = x + k T
534 eqeq1 z = w z = x + k T w = x + k T
535 534 rexbidv z = w x y Q i + 1 z = x + k T x y Q i + 1 w = x + k T
536 535 elrab w z | x y Q i + 1 z = x + k T w x y Q i + 1 w = x + k T
537 536 simprbi w z | x y Q i + 1 z = x + k T x y Q i + 1 w = x + k T
538 537 adantl χ w z | x y Q i + 1 z = x + k T x y Q i + 1 w = x + k T
539 nfre1 x x y Q i + 1 z = x + k T
540 539 482 nfrabw _ x z | x y Q i + 1 z = x + k T
541 540 nfcri x w z | x y Q i + 1 z = x + k T
542 480 541 nfan x χ w z | x y Q i + 1 z = x + k T
543 simp3 χ x y Q i + 1 w = x + k T w = x + k T
544 160 adantr χ x y Q i + 1 φ
545 527 sselda χ x y Q i + 1 x D
546 187 adantr χ x y Q i + 1 k
547 546 znegcld χ x y Q i + 1 k
548 544 545 547 288 syl3anc χ x y Q i + 1 x + k T D
549 548 3adant3 χ x y Q i + 1 w = x + k T x + k T D
550 543 549 eqeltrd χ x y Q i + 1 w = x + k T w D
551 550 3exp χ x y Q i + 1 w = x + k T w D
552 551 adantr χ w z | x y Q i + 1 z = x + k T x y Q i + 1 w = x + k T w D
553 542 486 552 rexlimd χ w z | x y Q i + 1 z = x + k T x y Q i + 1 w = x + k T w D
554 538 553 mpd χ w z | x y Q i + 1 z = x + k T w D
555 554 ralrimiva χ w z | x y Q i + 1 z = x + k T w D
556 dfss3 z | x y Q i + 1 z = x + k T D w z | x y Q i + 1 z = x + k T w D
557 555 556 sylibr χ z | x y Q i + 1 z = x + k T D
558 557 167 sseqtrrd χ z | x y Q i + 1 z = x + k T dom F
559 558 adantr χ w F y Q i + 1 lim y z | x y Q i + 1 z = x + k T dom F
560 160 ad2antrr χ w F y Q i + 1 lim y x y Q i + 1 φ
561 545 adantlr χ w F y Q i + 1 lim y x y Q i + 1 x D
562 547 adantlr χ w F y Q i + 1 lim y x y Q i + 1 k
563 278 fveq2d j = k F x + j T = F x + k T
564 563 eqeq1d j = k F x + j T = F x F x + k T = F x
565 276 564 imbi12d j = k φ x D j F x + j T = F x φ x D k F x + k T = F x
566 284 fveq2d k = j F x + k T = F x + j T
567 566 eqeq1d k = j F x + k T = F x F x + j T = F x
568 282 567 imbi12d k = j φ x D k F x + k T = F x φ x D j F x + j T = F x
569 568 10 chvarvv φ x D j F x + j T = F x
570 274 565 569 vtocl φ x D k F x + k T = F x
571 560 561 562 570 syl3anc χ w F y Q i + 1 lim y x y Q i + 1 F x + k T = F x
572 simpr χ w F y Q i + 1 lim y w F y Q i + 1 lim y
573 520 522 529 532 533 559 571 572 limcperiod χ w F y Q i + 1 lim y w F z | x y Q i + 1 z = x + k T lim y + k T
574 365 oveq2d χ y + k T = y + k T
575 309 recnd χ y
576 575 261 negsubd χ y + k T = y k T
577 306 eqcomd χ y k T = X
578 574 576 577 3eqtrd χ y + k T = X
579 578 eqcomd χ X = y + k T
580 365 oveq2d χ Q i + 1 + k T = Q i + 1 + k T
581 260 261 negsubd χ Q i + 1 + k T = Q i + 1 k T
582 580 581 eqtr2d χ Q i + 1 k T = Q i + 1 + k T
583 579 582 oveq12d χ X Q i + 1 k T = y + k T Q i + 1 + k T
584 188 renegcld χ k
585 584 189 remulcld χ k T
586 309 186 585 iooshift χ y + k T Q i + 1 + k T = z | x y Q i + 1 z = x + k T
587 583 586 eqtr2d χ z | x y Q i + 1 z = x + k T = X Q i + 1 k T
588 587 adantr χ w F y Q i + 1 lim y z | x y Q i + 1 z = x + k T = X Q i + 1 k T
589 588 reseq2d χ w F y Q i + 1 lim y F z | x y Q i + 1 z = x + k T = F X Q i + 1 k T
590 578 adantr χ w F y Q i + 1 lim y y + k T = X
591 589 590 oveq12d χ w F y Q i + 1 lim y F z | x y Q i + 1 z = x + k T lim y + k T = F X Q i + 1 k T lim X
592 573 591 eleqtrd χ w F y Q i + 1 lim y w F X Q i + 1 k T lim X
593 519 592 impbida χ w F X Q i + 1 k T lim X w F y Q i + 1 lim y
594 593 eqrdv χ F X Q i + 1 k T lim X = F y Q i + 1 lim y
595 463 594 eqtrd χ F X +∞ D X Q i + 1 k T lim X = F y Q i + 1 lim y
596 171 461 595 3eqtr2d χ F X +∞ lim X = F y Q i + 1 lim y
597 160 181 81 syl2anc χ Q i < Q i + 1
598 160 181 11 syl2anc χ F Q i Q i + 1 : Q i Q i + 1 cn
599 160 181 12 syl2anc χ R F Q i Q i + 1 lim Q i
600 eqid if y = Q i R F Q i Q i + 1 y = if y = Q i R F Q i Q i + 1 y
601 eqid TopOpen fld 𝑡 Q i Q i + 1 = TopOpen fld 𝑡 Q i Q i + 1
602 226 186 597 598 599 309 186 311 526 600 601 fourierdlem32 χ if y = Q i R F Q i Q i + 1 y F Q i Q i + 1 y Q i + 1 lim y
603 526 resabs1d χ F Q i Q i + 1 y Q i + 1 = F y Q i + 1
604 603 oveq1d χ F Q i Q i + 1 y Q i + 1 lim y = F y Q i + 1 lim y
605 602 604 eleqtrd χ if y = Q i R F Q i Q i + 1 y F y Q i + 1 lim y
606 ne0i if y = Q i R F Q i Q i + 1 y F y Q i + 1 lim y F y Q i + 1 lim y
607 605 606 syl χ F y Q i + 1 lim y
608 596 607 eqnetrd χ F X +∞ lim X
609 16 608 sylbir φ i 0 ..^ M y Q i Q i + 1 k y = X + k T F X +∞ lim X
610 155 156 157 609 syl21anc φ i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X
611 610 3exp φ i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X
612 611 adantr φ i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X
613 146 151 612 rexlim2d φ i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X
614 143 613 mpd φ i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X
615 136 142 614 vtocl φ i 0 ..^ M k E X T Q i Q i + 1 E X T = X + k T F X +∞ lim X
616 17 135 615 syl2anc φ E X = B F X +∞ lim X
617 iocssre A * B A B
618 66 2 617 syl2anc φ A B
619 ovex B x T T V
620 14 fvmpt2 x B x T T V Z x = B x T T
621 619 620 mpan2 x Z x = B x T T
622 621 oveq2d x x + Z x = x + B x T T
623 622 mpteq2ia x x + Z x = x x + B x T T
624 15 623 eqtri E = x x + B x T T
625 1 2 3 5 624 fourierdlem4 φ E : A B
626 625 13 ffvelrnd φ E X A B
627 618 626 sseldd φ E X
628 627 adantr φ E X B E X
629 simpl φ E X B φ
630 simpr φ E X A B E X ran Q E X ran Q
631 ffn Q : 0 M Q Fn 0 M
632 48 631 syl φ Q Fn 0 M
633 632 ad2antrr φ E X A B E X ran Q Q Fn 0 M
634 fvelrnb Q Fn 0 M E X ran Q j 0 M Q j = E X
635 633 634 syl φ E X A B E X ran Q E X ran Q j 0 M Q j = E X
636 630 635 mpbid φ E X A B E X ran Q j 0 M Q j = E X
637 1zzd φ E X A B j 0 M Q j = E X 1
638 elfzelz j 0 M j
639 638 ad2antlr φ E X A B j 0 M Q j = E X j
640 639 zred φ E X A B j 0 M Q j = E X j
641 elfzle1 j 0 M 0 j
642 641 ad2antlr φ E X A B j 0 M Q j = E X 0 j
643 id Q j = E X Q j = E X
644 643 eqcomd Q j = E X E X = Q j
645 644 ad2antlr φ Q j = E X j = 0 E X = Q j
646 fveq2 j = 0 Q j = Q 0
647 646 adantl φ Q j = E X j = 0 Q j = Q 0
648 45 simprld φ Q 0 = A Q M = B
649 648 simpld φ Q 0 = A
650 649 ad2antrr φ Q j = E X j = 0 Q 0 = A
651 645 647 650 3eqtrd φ Q j = E X j = 0 E X = A
652 651 adantllr φ E X A B Q j = E X j = 0 E X = A
653 652 adantllr φ E X A B j 0 M Q j = E X j = 0 E X = A
654 1 adantr φ E X A B A
655 66 adantr φ E X A B A *
656 2 rexrd φ B *
657 656 adantr φ E X A B B *
658 simpr φ E X A B E X A B
659 iocgtlb A * B * E X A B A < E X
660 655 657 658 659 syl3anc φ E X A B A < E X
661 654 660 gtned φ E X A B E X A
662 661 neneqd φ E X A B ¬ E X = A
663 662 ad3antrrr φ E X A B j 0 M Q j = E X j = 0 ¬ E X = A
664 653 663 pm2.65da φ E X A B j 0 M Q j = E X ¬ j = 0
665 664 neqned φ E X A B j 0 M Q j = E X j 0
666 640 642 665 ne0gt0d φ E X A B j 0 M Q j = E X 0 < j
667 0zd φ E X A B j 0 M Q j = E X 0
668 zltp1le 0 j 0 < j 0 + 1 j
669 667 639 668 syl2anc φ E X A B j 0 M Q j = E X 0 < j 0 + 1 j
670 666 669 mpbid φ E X A B j 0 M Q j = E X 0 + 1 j
671 85 670 eqbrtrid φ E X A B j 0 M Q j = E X 1 j
672 eluz2 j 1 1 j 1 j
673 637 639 671 672 syl3anbrc φ E X A B j 0 M Q j = E X j 1
674 nnuz = 1
675 673 674 eleqtrrdi φ E X A B j 0 M Q j = E X j
676 nnm1nn0 j j 1 0
677 675 676 syl φ E X A B j 0 M Q j = E X j 1 0
678 677 50 eleqtrdi φ E X A B j 0 M Q j = E X j 1 0
679 19 ad3antrrr φ E X A B j 0 M Q j = E X M
680 peano2zm j j 1
681 638 680 syl j 0 M j 1
682 681 zred j 0 M j 1
683 638 zred j 0 M j
684 elfzel2 j 0 M M
685 684 zred j 0 M M
686 683 ltm1d j 0 M j 1 < j
687 elfzle2 j 0 M j M
688 682 683 685 686 687 ltletrd j 0 M j 1 < M
689 688 ad2antlr φ E X A B j 0 M Q j = E X j 1 < M
690 elfzo2 j 1 0 ..^ M j 1 0 M j 1 < M
691 678 679 689 690 syl3anbrc φ E X A B j 0 M Q j = E X j 1 0 ..^ M
692 48 ad3antrrr φ E X A B j 0 M Q j = E X Q : 0 M
693 639 680 syl φ E X A B j 0 M Q j = E X j 1
694 667 679 693 3jca φ E X A B j 0 M Q j = E X 0 M j 1
695 677 nn0ge0d φ E X A B j 0 M Q j = E X 0 j 1
696 682 685 688 ltled j 0 M j 1 M
697 696 ad2antlr φ E X A B j 0 M Q j = E X j 1 M
698 694 695 697 jca32 φ E X A B j 0 M Q j = E X 0 M j 1 0 j 1 j 1 M
699 elfz2 j 1 0 M 0 M j 1 0 j 1 j 1 M
700 698 699 sylibr φ E X A B j 0 M Q j = E X j 1 0 M
701 692 700 ffvelrnd φ E X A B j 0 M Q j = E X Q j 1
702 701 rexrd φ E X A B j 0 M Q j = E X Q j 1 *
703 48 ffvelrnda φ j 0 M Q j
704 703 rexrd φ j 0 M Q j *
705 704 adantlr φ E X A B j 0 M Q j *
706 705 adantr φ E X A B j 0 M Q j = E X Q j *
707 618 sselda φ E X A B E X
708 707 rexrd φ E X A B E X *
709 708 ad2antrr φ E X A B j 0 M Q j = E X E X *
710 simplll φ E X A B j 0 M Q j = E X φ
711 ovex j 1 V
712 eleq1 i = j 1 i 0 ..^ M j 1 0 ..^ M
713 712 anbi2d i = j 1 φ i 0 ..^ M φ j 1 0 ..^ M
714 fveq2 i = j 1 Q i = Q j 1
715 oveq1 i = j 1 i + 1 = j - 1 + 1
716 715 fveq2d i = j 1 Q i + 1 = Q j - 1 + 1
717 714 716 breq12d i = j 1 Q i < Q i + 1 Q j 1 < Q j - 1 + 1
718 713 717 imbi12d i = j 1 φ i 0 ..^ M Q i < Q i + 1 φ j 1 0 ..^ M Q j 1 < Q j - 1 + 1
719 711 718 81 vtocl φ j 1 0 ..^ M Q j 1 < Q j - 1 + 1
720 710 691 719 syl2anc φ E X A B j 0 M Q j = E X Q j 1 < Q j - 1 + 1
721 638 zcnd j 0 M j
722 1cnd j 0 M 1
723 721 722 npcand j 0 M j - 1 + 1 = j
724 723 eqcomd j 0 M j = j - 1 + 1
725 724 fveq2d j 0 M Q j = Q j - 1 + 1
726 725 eqcomd j 0 M Q j - 1 + 1 = Q j
727 726 ad2antlr φ E X A B j 0 M Q j = E X Q j - 1 + 1 = Q j
728 720 727 breqtrd φ E X A B j 0 M Q j = E X Q j 1 < Q j
729 simpr φ E X A B j 0 M Q j = E X Q j = E X
730 728 729 breqtrd φ E X A B j 0 M Q j = E X Q j 1 < E X
731 627 leidd φ E X E X
732 731 ad2antrr φ j 0 M Q j = E X E X E X
733 644 adantl φ j 0 M Q j = E X E X = Q j
734 732 733 breqtrd φ j 0 M Q j = E X E X Q j
735 734 adantllr φ E X A B j 0 M Q j = E X E X Q j
736 702 706 709 730 735 eliocd φ E X A B j 0 M Q j = E X E X Q j 1 Q j
737 725 oveq2d j 0 M Q j 1 Q j = Q j 1 Q j - 1 + 1
738 737 ad2antlr φ E X A B j 0 M Q j = E X Q j 1 Q j = Q j 1 Q j - 1 + 1
739 736 738 eleqtrd φ E X A B j 0 M Q j = E X E X Q j 1 Q j - 1 + 1
740 714 716 oveq12d i = j 1 Q i Q i + 1 = Q j 1 Q j - 1 + 1
741 740 eleq2d i = j 1 E X Q i Q i + 1 E X Q j 1 Q j - 1 + 1
742 741 rspcev j 1 0 ..^ M E X Q j 1 Q j - 1 + 1 i 0 ..^ M E X Q i Q i + 1
743 691 739 742 syl2anc φ E X A B j 0 M Q j = E X i 0 ..^ M E X Q i Q i + 1
744 743 ex φ E X A B j 0 M Q j = E X i 0 ..^ M E X Q i Q i + 1
745 744 adantlr φ E X A B E X ran Q j 0 M Q j = E X i 0 ..^ M E X Q i Q i + 1
746 745 rexlimdva φ E X A B E X ran Q j 0 M Q j = E X i 0 ..^ M E X Q i Q i + 1
747 636 746 mpd φ E X A B E X ran Q i 0 ..^ M E X Q i Q i + 1
748 6 ad2antrr φ E X A B ¬ E X ran Q M
749 48 ad2antrr φ E X A B ¬ E X ran Q Q : 0 M
750 iocssicc A B A B
751 649 eqcomd φ A = Q 0
752 648 simprd φ Q M = B
753 752 eqcomd φ B = Q M
754 751 753 oveq12d φ A B = Q 0 Q M
755 750 754 sseqtrid φ A B Q 0 Q M
756 755 sselda φ E X A B E X Q 0 Q M
757 756 adantr φ E X A B ¬ E X ran Q E X Q 0 Q M
758 simpr φ E X A B ¬ E X ran Q ¬ E X ran Q
759 fveq2 k = j Q k = Q j
760 759 breq1d k = j Q k < E X Q j < E X
761 760 cbvrabv k 0 ..^ M | Q k < E X = j 0 ..^ M | Q j < E X
762 761 supeq1i sup k 0 ..^ M | Q k < E X < = sup j 0 ..^ M | Q j < E X <
763 748 749 757 758 762 fourierdlem25 φ E X A B ¬ E X ran Q i 0 ..^ M E X Q i Q i + 1
764 ioossioc Q i Q i + 1 Q i Q i + 1
765 764 sseli E X Q i Q i + 1 E X Q i Q i + 1
766 765 a1i φ E X A B ¬ E X ran Q i 0 ..^ M E X Q i Q i + 1 E X Q i Q i + 1
767 766 reximdva φ E X A B ¬ E X ran Q i 0 ..^ M E X Q i Q i + 1 i 0 ..^ M E X Q i Q i + 1
768 763 767 mpd φ E X A B ¬ E X ran Q i 0 ..^ M E X Q i Q i + 1
769 747 768 pm2.61dan φ E X A B i 0 ..^ M E X Q i Q i + 1
770 626 769 mpdan φ i 0 ..^ M E X Q i Q i + 1
771 fveq2 i = j Q i = Q j
772 oveq1 i = j i + 1 = j + 1
773 772 fveq2d i = j Q i + 1 = Q j + 1
774 771 773 oveq12d i = j Q i Q i + 1 = Q j Q j + 1
775 774 eleq2d i = j E X Q i Q i + 1 E X Q j Q j + 1
776 775 cbvrexvw i 0 ..^ M E X Q i Q i + 1 j 0 ..^ M E X Q j Q j + 1
777 770 776 sylib φ j 0 ..^ M E X Q j Q j + 1
778 777 adantr φ E X B j 0 ..^ M E X Q j Q j + 1
779 elfzonn0 j 0 ..^ M j 0
780 1nn0 1 0
781 780 a1i j 0 ..^ M 1 0
782 779 781 nn0addcld j 0 ..^ M j + 1 0
783 782 50 eleqtrdi j 0 ..^ M j + 1 0
784 783 adantr j 0 ..^ M E X = Q j + 1 j + 1 0
785 784 3ad2antl2 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1 0
786 19 ad2antrr φ E X B E X = Q j + 1 M
787 786 3ad2antl1 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 M
788 779 nn0red j 0 ..^ M j
789 788 adantr j 0 ..^ M E X = Q j + 1 j
790 789 3ad2antl2 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j
791 1red φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 1
792 790 791 readdcld φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1
793 787 zred φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 M
794 elfzop1le2 j 0 ..^ M j + 1 M
795 794 adantr j 0 ..^ M E X = Q j + 1 j + 1 M
796 795 3ad2antl2 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1 M
797 simplr φ E X = Q j + 1 M = j + 1 E X = Q j + 1
798 fveq2 M = j + 1 Q M = Q j + 1
799 798 eqcomd M = j + 1 Q j + 1 = Q M
800 799 adantl φ E X = Q j + 1 M = j + 1 Q j + 1 = Q M
801 752 ad2antrr φ E X = Q j + 1 M = j + 1 Q M = B
802 797 800 801 3eqtrd φ E X = Q j + 1 M = j + 1 E X = B
803 802 adantllr φ E X B E X = Q j + 1 M = j + 1 E X = B
804 simpllr φ E X B E X = Q j + 1 M = j + 1 E X B
805 804 neneqd φ E X B E X = Q j + 1 M = j + 1 ¬ E X = B
806 803 805 pm2.65da φ E X B E X = Q j + 1 ¬ M = j + 1
807 806 neqned φ E X B E X = Q j + 1 M j + 1
808 807 3ad2antl1 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 M j + 1
809 792 793 796 808 leneltd φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1 < M
810 elfzo2 j + 1 0 ..^ M j + 1 0 M j + 1 < M
811 785 787 809 810 syl3anbrc φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1 0 ..^ M
812 48 adantr φ j 0 ..^ M Q : 0 M
813 fzofzp1 j 0 ..^ M j + 1 0 M
814 813 adantl φ j 0 ..^ M j + 1 0 M
815 812 814 ffvelrnd φ j 0 ..^ M Q j + 1
816 815 rexrd φ j 0 ..^ M Q j + 1 *
817 816 adantlr φ E X B j 0 ..^ M Q j + 1 *
818 817 3adant3 φ E X B j 0 ..^ M E X Q j Q j + 1 Q j + 1 *
819 818 adantr φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 Q j + 1 *
820 simpl1l φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 φ
821 820 48 syl φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 Q : 0 M
822 fzofzp1 j + 1 0 ..^ M j + 1 + 1 0 M
823 811 822 syl φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 j + 1 + 1 0 M
824 821 823 ffvelrnd φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 Q j + 1 + 1
825 824 rexrd φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 Q j + 1 + 1 *
826 627 rexrd φ E X *
827 826 ad2antrr φ E X B E X = Q j + 1 E X *
828 827 3ad2antl1 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 E X *
829 815 leidd φ j 0 ..^ M Q j + 1 Q j + 1
830 829 adantr φ j 0 ..^ M E X = Q j + 1 Q j + 1 Q j + 1
831 id E X = Q j + 1 E X = Q j + 1
832 831 eqcomd E X = Q j + 1 Q j + 1 = E X
833 832 adantl φ j 0 ..^ M E X = Q j + 1 Q j + 1 = E X
834 830 833 breqtrd φ j 0 ..^ M E X = Q j + 1 Q j + 1 E X
835 834 adantllr φ E X B j 0 ..^ M E X = Q j + 1 Q j + 1 E X
836 835 3adantl3 φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 Q j + 1 E X
837 simpr φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 E X = Q j + 1
838 simpr φ j + 1 0 ..^ M E X = Q j + 1 E X = Q j + 1
839 ovex j + 1 V
840 eleq1 i = j + 1 i 0 ..^ M j + 1 0 ..^ M
841 840 anbi2d i = j + 1 φ i 0 ..^ M φ j + 1 0 ..^ M
842 fveq2 i = j + 1 Q i = Q j + 1
843 oveq1 i = j + 1 i + 1 = j + 1 + 1
844 843 fveq2d i = j + 1 Q i + 1 = Q j + 1 + 1
845 842 844 breq12d i = j + 1 Q i < Q i + 1 Q j + 1 < Q j + 1 + 1
846 841 845 imbi12d i = j + 1 φ i 0 ..^ M Q i < Q i + 1 φ j + 1 0 ..^ M Q j + 1 < Q j + 1 + 1
847 839 846 81 vtocl φ j + 1 0 ..^ M Q j + 1 < Q j + 1 + 1
848 847 adantr φ j + 1 0 ..^ M E X = Q j + 1 Q j + 1 < Q j + 1 + 1
849 838 848 eqbrtrd φ j + 1 0 ..^ M E X = Q j + 1 E X < Q j + 1 + 1
850 820 811 837 849 syl21anc φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 E X < Q j + 1 + 1
851 819 825 828 836 850 elicod φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 E X Q j + 1 Q j + 1 + 1
852 842 844 oveq12d i = j + 1 Q i Q i + 1 = Q j + 1 Q j + 1 + 1
853 852 eleq2d i = j + 1 E X Q i Q i + 1 E X Q j + 1 Q j + 1 + 1
854 853 rspcev j + 1 0 ..^ M E X Q j + 1 Q j + 1 + 1 i 0 ..^ M E X Q i Q i + 1
855 811 851 854 syl2anc φ E X B j 0 ..^ M E X Q j Q j + 1 E X = Q j + 1 i 0 ..^ M E X Q i Q i + 1
856 simpl2 φ E X B j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 j 0 ..^ M
857 id φ j 0 ..^ M E X Q j Q j + 1 φ j 0 ..^ M E X Q j Q j + 1
858 857 3adant1r φ E X B j 0 ..^ M E X Q j Q j + 1 φ j 0 ..^ M E X Q j Q j + 1
859 elfzofz j 0 ..^ M j 0 M
860 859 adantl φ j 0 ..^ M j 0 M
861 812 860 ffvelrnd φ j 0 ..^ M Q j
862 861 rexrd φ j 0 ..^ M Q j *
863 862 adantr φ j 0 ..^ M ¬ E X = Q j + 1 Q j *
864 863 3adantl3 φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 Q j *
865 816 adantr φ j 0 ..^ M ¬ E X = Q j + 1 Q j + 1 *
866 865 3adantl3 φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 Q j + 1 *
867 826 adantr φ ¬ E X = Q j + 1 E X *
868 867 3ad2antl1 φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X *
869 861 3adant3 φ j 0 ..^ M E X Q j Q j + 1 Q j
870 627 3ad2ant1 φ j 0 ..^ M E X Q j Q j + 1 E X
871 862 3adant3 φ j 0 ..^ M E X Q j Q j + 1 Q j *
872 816 3adant3 φ j 0 ..^ M E X Q j Q j + 1 Q j + 1 *
873 simp3 φ j 0 ..^ M E X Q j Q j + 1 E X Q j Q j + 1
874 iocgtlb Q j * Q j + 1 * E X Q j Q j + 1 Q j < E X
875 871 872 873 874 syl3anc φ j 0 ..^ M E X Q j Q j + 1 Q j < E X
876 869 870 875 ltled φ j 0 ..^ M E X Q j Q j + 1 Q j E X
877 876 adantr φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 Q j E X
878 870 adantr φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X
879 815 adantr φ j 0 ..^ M ¬ E X = Q j + 1 Q j + 1
880 879 3adantl3 φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 Q j + 1
881 iocleub Q j * Q j + 1 * E X Q j Q j + 1 E X Q j + 1
882 871 872 873 881 syl3anc φ j 0 ..^ M E X Q j Q j + 1 E X Q j + 1
883 882 adantr φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X Q j + 1
884 neqne ¬ E X = Q j + 1 E X Q j + 1
885 884 necomd ¬ E X = Q j + 1 Q j + 1 E X
886 885 adantl φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 Q j + 1 E X
887 878 880 883 886 leneltd φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X < Q j + 1
888 864 866 868 877 887 elicod φ j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X Q j Q j + 1
889 858 888 sylan φ E X B j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 E X Q j Q j + 1
890 771 773 oveq12d i = j Q i Q i + 1 = Q j Q j + 1
891 890 eleq2d i = j E X Q i Q i + 1 E X Q j Q j + 1
892 891 rspcev j 0 ..^ M E X Q j Q j + 1 i 0 ..^ M E X Q i Q i + 1
893 856 889 892 syl2anc φ E X B j 0 ..^ M E X Q j Q j + 1 ¬ E X = Q j + 1 i 0 ..^ M E X Q i Q i + 1
894 855 893 pm2.61dan φ E X B j 0 ..^ M E X Q j Q j + 1 i 0 ..^ M E X Q i Q i + 1
895 894 rexlimdv3a φ E X B j 0 ..^ M E X Q j Q j + 1 i 0 ..^ M E X Q i Q i + 1
896 778 895 mpd φ E X B i 0 ..^ M E X Q i Q i + 1
897 simpr φ E X B E X Q i Q i + 1 E X Q i Q i + 1
898 oveq1 k = B X T k T = B X T T
899 898 oveq2d k = B X T X + k T = X + B X T T
900 899 eqeq2d k = B X T E X = X + k T E X = X + B X T T
901 900 rspcev B X T E X = X + B X T T k E X = X + k T
902 105 113 901 syl2anc φ k E X = X + k T
903 902 ad2antrr φ E X B E X Q i Q i + 1 k E X = X + k T
904 r19.42v k E X Q i Q i + 1 E X = X + k T E X Q i Q i + 1 k E X = X + k T
905 897 903 904 sylanbrc φ E X B E X Q i Q i + 1 k E X Q i Q i + 1 E X = X + k T
906 905 ex φ E X B E X Q i Q i + 1 k E X Q i Q i + 1 E X = X + k T
907 906 reximdv φ E X B i 0 ..^ M E X Q i Q i + 1 i 0 ..^ M k E X Q i Q i + 1 E X = X + k T
908 896 907 mpd φ E X B i 0 ..^ M k E X Q i Q i + 1 E X = X + k T
909 629 908 jca φ E X B φ i 0 ..^ M k E X Q i Q i + 1 E X = X + k T
910 eleq1 y = E X y Q i Q i + 1 E X Q i Q i + 1
911 eqeq1 y = E X y = X + k T E X = X + k T
912 910 911 anbi12d y = E X y Q i Q i + 1 y = X + k T E X Q i Q i + 1 E X = X + k T
913 912 2rexbidv y = E X i 0 ..^ M k y Q i Q i + 1 y = X + k T i 0 ..^ M k E X Q i Q i + 1 E X = X + k T
914 913 anbi2d y = E X φ i 0 ..^ M k y Q i Q i + 1 y = X + k T φ i 0 ..^ M k E X Q i Q i + 1 E X = X + k T
915 914 imbi1d y = E X φ i 0 ..^ M k y Q i Q i + 1 y = X + k T F X +∞ lim X φ i 0 ..^ M k E X Q i Q i + 1 E X = X + k T F X +∞ lim X
916 915 614 vtoclg E X φ i 0 ..^ M k E X Q i Q i + 1 E X = X + k T F X +∞ lim X
917 628 909 916 sylc φ E X B F X +∞ lim X
918 616 917 pm2.61dane φ F X +∞ lim X