Metamath Proof Explorer


Theorem fourierdlem62

Description: The function K is continuous. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypothesis fourierdlem62.k K=yππify=01y2siny2
Assertion fourierdlem62 K:ππcn

Proof

Step Hyp Ref Expression
1 fourierdlem62.k K=yππify=01y2siny2
2 eqeq1 y=sy=0s=0
3 id y=sy=s
4 oveq1 y=sy2=s2
5 4 fveq2d y=ssiny2=sins2
6 5 oveq2d y=s2siny2=2sins2
7 3 6 oveq12d y=sy2siny2=s2sins2
8 2 7 ifbieq2d y=sify=01y2siny2=ifs=01s2sins2
9 8 cbvmptv yππify=01y2siny2=sππifs=01s2sins2
10 1 9 eqtri K=sππifs=01s2sins2
11 10 fourierdlem43 K:ππ
12 ax-resscn
13 fss K:ππK:ππ
14 11 12 13 mp2an K:ππ
15 14 a1i s=0K:ππ
16 difss ππ0ππ
17 elioore sππs
18 17 ssriv ππ
19 16 18 sstri ππ0
20 19 a1i ππ0
21 eqid xππ0x=xππ0x
22 19 sseli xππ0x
23 21 22 fmpti xππ0x:ππ0
24 23 a1i xππ0x:ππ0
25 eqid xππ02sinx2=xππ02sinx2
26 2re 2
27 26 a1i xππ02
28 22 rehalfcld xππ0x2
29 28 resincld xππ0sinx2
30 27 29 remulcld xππ02sinx2
31 25 30 fmpti xππ02sinx2:ππ0
32 31 a1i xππ02sinx2:ππ0
33 iooretop ππtopGenran.
34 33 a1i ππtopGenran.
35 0re 0
36 negpilt0 π<0
37 pipos 0<π
38 pire π
39 38 renegcli π
40 39 rexri π*
41 38 rexri π*
42 elioo2 π*π*0ππ0π<00<π
43 40 41 42 mp2an 0ππ0π<00<π
44 35 36 37 43 mpbir3an 0ππ
45 44 a1i 0ππ
46 eqid ππ0=ππ0
47 1ex 1V
48 eqid xππ01=xππ01
49 47 48 dmmpti domxππ01=ππ0
50 reelprrecn
51 50 a1i
52 12 sseli xx
53 52 adantl xx
54 1red x1
55 51 dvmptid dxxdx=x1
56 eqid TopOpenfld=TopOpenfld
57 56 tgioo2 topGenran.=TopOpenfld𝑡
58 sncldre 00ClsdtopGenran.
59 35 58 ax-mp 0ClsdtopGenran.
60 retopon topGenran.TopOn
61 60 toponunii =topGenran.
62 61 difopn ππtopGenran.0ClsdtopGenran.ππ0topGenran.
63 33 59 62 mp2an ππ0topGenran.
64 63 a1i ππ0topGenran.
65 51 53 54 55 20 57 56 64 dvmptres dxππ0xdx=xππ01
66 65 mptru dxππ0xdx=xππ01
67 66 eqcomi xππ01=dxππ0xdx
68 67 dmeqi domxππ01=domdxππ0xdx
69 49 68 eqtr3i ππ0=domdxππ0xdx
70 69 eqimssi ππ0domdxππ0xdx
71 70 a1i ππ0domdxππ0xdx
72 fvex cosx2V
73 eqid xππ0cosx2=xππ0cosx2
74 72 73 dmmpti domxππ0cosx2=ππ0
75 2cnd x2
76 53 halfcld xx2
77 76 sincld xsinx2
78 75 77 mulcld x2sinx2
79 76 coscld xcosx2
80 2cnd x2
81 2ne0 20
82 81 a1i x20
83 52 80 82 divrec2d xx2=12x
84 83 fveq2d xsinx2=sin12x
85 84 oveq2d x2sinx2=2sin12x
86 85 mpteq2ia x2sinx2=x2sin12x
87 86 oveq2i dx2sinx2dx=dx2sin12xdx
88 resmpt x2sin12x=x2sin12x
89 12 88 ax-mp x2sin12x=x2sin12x
90 89 eqcomi x2sin12x=x2sin12x
91 90 oveq2i dx2sin12xdx=Dx2sin12x
92 eqid x2sin12x=x2sin12x
93 2cnd x2
94 halfcn 12
95 94 a1i x12
96 id xx
97 95 96 mulcld x12x
98 97 sincld xsin12x
99 93 98 mulcld x2sin12x
100 92 99 fmpti x2sin12x:
101 eqid x212cos12x=x212cos12x
102 2cn 2
103 102 94 mulcli 212
104 103 a1i x212
105 97 coscld xcos12x
106 104 105 mulcld x212cos12x
107 106 adantl x212cos12x
108 101 107 dmmptd domx212cos12x=
109 108 mptru domx212cos12x=
110 12 109 sseqtrri domx212cos12x
111 dvasinbx 212dx2sin12xdx=x212cos12x
112 102 94 111 mp2an dx2sin12xdx=x212cos12x
113 112 dmeqi domdx2sin12xdx=domx212cos12x
114 110 113 sseqtrri domdx2sin12xdx
115 dvcnre x2sin12x:domdx2sin12xdxDx2sin12x=dx2sin12xdx
116 100 114 115 mp2an Dx2sin12x=dx2sin12xdx
117 112 reseq1i dx2sin12xdx=x212cos12x
118 resmpt x212cos12x=x212cos12x
119 12 118 ax-mp x212cos12x=x212cos12x
120 102 81 recidi 212=1
121 120 a1i x212=1
122 83 eqcomd x12x=x2
123 122 fveq2d xcos12x=cosx2
124 121 123 oveq12d x212cos12x=1cosx2
125 52 halfcld xx2
126 125 coscld xcosx2
127 126 mullidd x1cosx2=cosx2
128 124 127 eqtrd x212cos12x=cosx2
129 128 mpteq2ia x212cos12x=xcosx2
130 117 119 129 3eqtri dx2sin12xdx=xcosx2
131 91 116 130 3eqtri dx2sin12xdx=xcosx2
132 87 131 eqtri dx2sinx2dx=xcosx2
133 132 a1i dx2sinx2dx=xcosx2
134 51 78 79 133 20 57 56 64 dvmptres dxππ02sinx2dx=xππ0cosx2
135 134 mptru dxππ02sinx2dx=xππ0cosx2
136 135 eqcomi xππ0cosx2=dxππ02sinx2dx
137 136 dmeqi domxππ0cosx2=domdxππ02sinx2dx
138 74 137 eqtr3i ππ0=domdxππ02sinx2dx
139 138 eqimssi ππ0domdxππ02sinx2dx
140 139 a1i ππ0domdxππ02sinx2dx
141 17 recnd sππs
142 141 ssriv ππ
143 142 a1i ππ
144 ssid
145 144 a1i
146 143 145 idcncfg xππx:ππcn
147 146 mptru xππx:ππcn
148 cnlimc ππxππx:ππcnxππx:ππyππxππxyxππxlimy
149 142 148 ax-mp xππx:ππcnxππx:ππyππxππxyxππxlimy
150 147 149 mpbi xππx:ππyππxππxyxππxlimy
151 150 simpri yππxππxyxππxlimy
152 fveq2 y=0xππxy=xππx0
153 oveq2 y=0xππxlimy=xππxlim0
154 152 153 eleq12d y=0xππxyxππxlimyxππx0xππxlim0
155 154 rspccva yππxππxyxππxlimy0ππxππx0xππxlim0
156 151 44 155 mp2an xππx0xππxlim0
157 id x=0x=0
158 eqid xππx=xππx
159 c0ex 0V
160 157 158 159 fvmpt 0ππxππx0=0
161 44 160 ax-mp xππx0=0
162 elioore xππx
163 162 recnd xππx
164 158 163 fmpti xππx:ππ
165 164 a1i xππx:ππ
166 165 limcdif xππxlim0=xππxππ0lim0
167 166 mptru xππxlim0=xππxππ0lim0
168 resmpt ππ0ππxππxππ0=xππ0x
169 16 168 ax-mp xππxππ0=xππ0x
170 169 oveq1i xππxππ0lim0=xππ0xlim0
171 167 170 eqtri xππxlim0=xππ0xlim0
172 156 161 171 3eltr3i 0xππ0xlim0
173 172 a1i 0xππ0xlim0
174 eqid x2=x2
175 144 a1i 2
176 2cnd 22
177 175 176 175 constcncfg 2x2:cn
178 102 177 mp1i x2:cn
179 2cnd xππ2
180 174 178 143 145 179 cncfmptssg xππ2:ππcn
181 sincn sin:cn
182 181 a1i sin:cn
183 eqid xx2=xx2
184 183 divccncf 220xx2:cn
185 102 81 184 mp2an xx2:cn
186 185 a1i xx2:cn
187 163 adantl xππx
188 187 halfcld xππx2
189 183 186 143 145 188 cncfmptssg xππx2:ππcn
190 182 189 cncfmpt1f xππsinx2:ππcn
191 180 190 mulcncf xππ2sinx2:ππcn
192 191 mptru xππ2sinx2:ππcn
193 cnlimc ππxππ2sinx2:ππcnxππ2sinx2:ππyππxππ2sinx2yxππ2sinx2limy
194 142 193 ax-mp xππ2sinx2:ππcnxππ2sinx2:ππyππxππ2sinx2yxππ2sinx2limy
195 192 194 mpbi xππ2sinx2:ππyππxππ2sinx2yxππ2sinx2limy
196 195 simpri yππxππ2sinx2yxππ2sinx2limy
197 fveq2 y=0xππ2sinx2y=xππ2sinx20
198 oveq2 y=0xππ2sinx2limy=xππ2sinx2lim0
199 197 198 eleq12d y=0xππ2sinx2yxππ2sinx2limyxππ2sinx20xππ2sinx2lim0
200 199 rspccva yππxππ2sinx2yxππ2sinx2limy0ππxππ2sinx20xππ2sinx2lim0
201 196 44 200 mp2an xππ2sinx20xππ2sinx2lim0
202 oveq1 x=0x2=02
203 102 81 div0i 02=0
204 202 203 eqtrdi x=0x2=0
205 204 fveq2d x=0sinx2=sin0
206 sin0 sin0=0
207 205 206 eqtrdi x=0sinx2=0
208 207 oveq2d x=02sinx2=20
209 2t0e0 20=0
210 208 209 eqtrdi x=02sinx2=0
211 eqid xππ2sinx2=xππ2sinx2
212 210 211 159 fvmpt 0ππxππ2sinx20=0
213 44 212 ax-mp xππ2sinx20=0
214 2cnd xππ2
215 163 halfcld xππx2
216 215 sincld xππsinx2
217 214 216 mulcld xππ2sinx2
218 211 217 fmpti xππ2sinx2:ππ
219 218 a1i xππ2sinx2:ππ
220 219 limcdif xππ2sinx2lim0=xππ2sinx2ππ0lim0
221 220 mptru xππ2sinx2lim0=xππ2sinx2ππ0lim0
222 resmpt ππ0ππxππ2sinx2ππ0=xππ02sinx2
223 16 222 ax-mp xππ2sinx2ππ0=xππ02sinx2
224 223 oveq1i xππ2sinx2ππ0lim0=xππ02sinx2lim0
225 221 224 eqtri xππ2sinx2lim0=xππ02sinx2lim0
226 201 213 225 3eltr3i 0xππ02sinx2lim0
227 226 a1i 0xππ02sinx2lim0
228 eqidd yππ0xππ02sinx2=xππ02sinx2
229 oveq1 x=yx2=y2
230 229 fveq2d x=ysinx2=siny2
231 230 oveq2d x=y2sinx2=2siny2
232 231 adantl yππ0x=y2sinx2=2siny2
233 id yππ0yππ0
234 26 a1i yππ02
235 19 sseli yππ0y
236 235 rehalfcld yππ0y2
237 236 resincld yππ0siny2
238 234 237 remulcld yππ02siny2
239 228 232 233 238 fvmptd yππ0xππ02sinx2y=2siny2
240 2cnd yππ02
241 237 recnd yππ0siny2
242 81 a1i yππ020
243 ioossicc ππππ
244 eldifi yππ0yππ
245 243 244 sselid yππ0yππ
246 eldifsni yππ0y0
247 fourierdlem44 yππy0siny20
248 245 246 247 syl2anc yππ0siny20
249 240 241 242 248 mulne0d yππ02siny20
250 239 249 eqnetrd yππ0xππ02sinx2y0
251 250 neneqd yππ0¬xππ02sinx2y=0
252 251 nrex ¬yππ0xππ02sinx2y=0
253 25 fnmpt xππ02sinx2xππ02sinx2Fnππ0
254 253 30 mprg xππ02sinx2Fnππ0
255 ssid ππ0ππ0
256 fvelimab xππ02sinx2Fnππ0ππ0ππ00xππ02sinx2ππ0yππ0xππ02sinx2y=0
257 254 255 256 mp2an 0xππ02sinx2ππ0yππ0xππ02sinx2y=0
258 252 257 mtbir ¬0xππ02sinx2ππ0
259 258 a1i ¬0xππ02sinx2ππ0
260 eqidd yππ0xππ0cosx2=xππ0cosx2
261 229 fveq2d x=ycosx2=cosy2
262 261 adantl yππ0x=ycosx2=cosy2
263 235 recnd yππ0y
264 263 halfcld yππ0y2
265 264 coscld yππ0cosy2
266 260 262 233 265 fvmptd yππ0xππ0cosx2y=cosy2
267 236 rered yππ0y2=y2
268 halfpire π2
269 268 renegcli π2
270 269 a1i yππ0π2
271 270 rexrd yππ0π2*
272 268 a1i yππ0π2
273 272 rexrd yππ0π2*
274 picn π
275 divneg π220π2=π2
276 274 102 81 275 mp3an π2=π2
277 39 a1i yππ0π
278 2rp 2+
279 278 a1i yππ02+
280 40 a1i yππ0π*
281 41 a1i yππ0π*
282 ioogtlb π*π*yπππ<y
283 280 281 244 282 syl3anc yππ0π<y
284 277 235 279 283 ltdiv1dd yππ0π2<y2
285 276 284 eqbrtrid yππ0π2<y2
286 38 a1i yππ0π
287 iooltub π*π*yππy<π
288 280 281 244 287 syl3anc yππ0y<π
289 235 286 279 288 ltdiv1dd yππ0y2<π2
290 271 273 236 285 289 eliood yππ0y2π2π2
291 267 290 eqeltrd yππ0y2π2π2
292 cosne0 y2y2π2π2cosy20
293 264 291 292 syl2anc yππ0cosy20
294 266 293 eqnetrd yππ0xππ0cosx2y0
295 294 neneqd yππ0¬xππ0cosx2y=0
296 295 nrex ¬yππ0xππ0cosx2y=0
297 72 73 fnmpti xππ0cosx2Fnππ0
298 fvelimab xππ0cosx2Fnππ0ππ0ππ00xππ0cosx2ππ0yππ0xππ0cosx2y=0
299 297 255 298 mp2an 0xππ0cosx2ππ0yππ0xππ0cosx2y=0
300 296 299 mtbir ¬0xππ0cosx2ππ0
301 135 imaeq1i dxππ02sinx2dxππ0=xππ0cosx2ππ0
302 301 eleq2i 0dxππ02sinx2dxππ00xππ0cosx2ππ0
303 300 302 mtbir ¬0dxππ02sinx2dxππ0
304 303 a1i ¬0dxππ02sinx2dxππ0
305 eqid sππ0coss2=sππ0coss2
306 eqid sππ01coss2=sππ01coss2
307 19 sseli sππ0s
308 307 recnd sππ0s
309 308 halfcld sππ0s2
310 309 coscld sππ0coss2
311 307 rehalfcld sππ0s2
312 311 rered sππ0s2=s2
313 269 a1i sππ0π2
314 313 rexrd sππ0π2*
315 268 a1i sππ0π2
316 315 rexrd sππ0π2*
317 38 a1i sππ0π
318 317 renegcld sππ0π
319 278 a1i sππ02+
320 40 a1i sππ0π*
321 41 a1i sππ0π*
322 eldifi sππ0sππ
323 ioogtlb π*π*sπππ<s
324 320 321 322 323 syl3anc sππ0π<s
325 318 307 319 324 ltdiv1dd sππ0π2<s2
326 276 325 eqbrtrid sππ0π2<s2
327 iooltub π*π*sππs<π
328 320 321 322 327 syl3anc sππ0s<π
329 307 317 319 328 ltdiv1dd sππ0s2<π2
330 314 316 311 326 329 eliood sππ0s2π2π2
331 312 330 eqeltrd sππ0s2π2π2
332 cosne0 s2s2π2π2coss20
333 309 331 332 syl2anc sππ0coss20
334 333 neneqd sππ0¬coss2=0
335 311 recoscld sππ0coss2
336 elsng coss2coss20coss2=0
337 335 336 syl sππ0coss20coss2=0
338 334 337 mtbird sππ0¬coss20
339 310 338 eldifd sππ0coss20
340 339 adantl sππ0coss20
341 309 ad2antrl sππ0s20s2
342 cosf cos:
343 342 a1i cos:
344 343 ffvelcdmda xcosx
345 eqid ss2=ss2
346 345 divccncf 220ss2:cn
347 102 81 346 mp2an ss2:cn
348 347 a1i ss2:cn
349 141 adantl sππs
350 349 halfcld sππs2
351 345 348 143 145 350 cncfmptssg sππs2:ππcn
352 oveq1 s=0s2=02
353 352 203 eqtrdi s=0s2=0
354 351 45 353 cnmptlimc 0sππs2lim0
355 eqid sππs2=sππs2
356 141 halfcld sππs2
357 355 356 fmpti sππs2:ππ
358 357 a1i sππs2:ππ
359 358 limcdif sππs2lim0=sππs2ππ0lim0
360 359 mptru sππs2lim0=sππs2ππ0lim0
361 resmpt ππ0ππsππs2ππ0=sππ0s2
362 16 361 ax-mp sππs2ππ0=sππ0s2
363 362 oveq1i sππs2ππ0lim0=sππ0s2lim0
364 360 363 eqtri sππs2lim0=sππ0s2lim0
365 354 364 eleqtrdi 0sππ0s2lim0
366 ffn cos:cosFn
367 342 366 ax-mp cosFn
368 dffn5 cosFncos=xcosx
369 367 368 mpbi cos=xcosx
370 coscn cos:cn
371 369 370 eqeltrri xcosx:cn
372 371 a1i xcosx:cn
373 0cnd 0
374 fveq2 x=0cosx=cos0
375 cos0 cos0=1
376 374 375 eqtrdi x=0cosx=1
377 372 373 376 cnmptlimc 1xcosxlim0
378 fveq2 x=s2cosx=coss2
379 fveq2 s2=0coss2=cos0
380 379 375 eqtrdi s2=0coss2=1
381 380 ad2antll sππ0s2=0coss2=1
382 341 344 365 377 378 381 limcco 1sππ0coss2lim0
383 ax-1ne0 10
384 383 a1i 10
385 305 306 340 382 384 reclimc 11sππ01coss2lim0
386 1div1e1 11=1
387 66 fveq1i dxππ0xdxs=xππ01s
388 eqidd sππ0xππ01=xππ01
389 eqidd sππ0x=s1=1
390 id sππ0sππ0
391 1red sππ01
392 388 389 390 391 fvmptd sππ0xππ01s=1
393 387 392 eqtr2id sππ01=dxππ0xdxs
394 135 a1i sππ0dxππ02sinx2dx=xππ0cosx2
395 oveq1 x=sx2=s2
396 395 fveq2d x=scosx2=coss2
397 396 adantl sππ0x=scosx2=coss2
398 394 397 390 335 fvmptd sππ0dxππ02sinx2dxs=coss2
399 398 eqcomd sππ0coss2=dxππ02sinx2dxs
400 393 399 oveq12d sππ01coss2=dxππ0xdxsdxππ02sinx2dxs
401 400 mpteq2ia sππ01coss2=sππ0dxππ0xdxsdxππ02sinx2dxs
402 401 oveq1i sππ01coss2lim0=sππ0dxππ0xdxsdxππ02sinx2dxslim0
403 385 386 402 3eltr3g 1sππ0dxππ0xdxsdxππ02sinx2dxslim0
404 20 24 32 34 45 46 71 140 173 227 259 304 403 lhop 1sππ0xππ0xsxππ02sinx2slim0
405 404 mptru 1sππ0xππ0xsxππ02sinx2slim0
406 eqidd sππ0xππ0x=xππ0x
407 simpr sππ0x=sx=s
408 406 407 390 307 fvmptd sππ0xππ0xs=s
409 eqidd sππ0xππ02sinx2=xππ02sinx2
410 407 oveq1d sππ0x=sx2=s2
411 410 fveq2d sππ0x=ssinx2=sins2
412 411 oveq2d sππ0x=s2sinx2=2sins2
413 26 a1i sππ02
414 311 resincld sππ0sins2
415 413 414 remulcld sππ02sins2
416 409 412 390 415 fvmptd sππ0xππ02sinx2s=2sins2
417 408 416 oveq12d sππ0xππ0xsxππ02sinx2s=s2sins2
418 417 mpteq2ia sππ0xππ0xsxππ02sinx2s=sππ0s2sins2
419 418 oveq1i sππ0xππ0xsxππ02sinx2slim0=sππ0s2sins2lim0
420 405 419 eleqtri 1sππ0s2sins2lim0
421 10 oveq1i Klim0=sππifs=01s2sins2lim0
422 10 feq1i K:ππsππifs=01s2sins2:ππ
423 14 422 mpbi sππifs=01s2sins2:ππ
424 423 a1i sππifs=01s2sins2:ππ
425 243 a1i ππππ
426 iccssre ππππ
427 39 38 426 mp2an ππ
428 427 a1i ππ
429 428 12 sstrdi ππ
430 eqid TopOpenfld𝑡ππ0=TopOpenfld𝑡ππ0
431 39 35 36 ltleii π0
432 35 38 37 ltleii 0π
433 39 38 elicc2i 0ππ0π00π
434 35 431 432 433 mpbir3an 0ππ
435 159 snss 0ππ0ππ
436 434 435 mpbi 0ππ
437 ssequn2 0ππππ0=ππ
438 436 437 mpbi ππ0=ππ
439 438 oveq2i TopOpenfld𝑡ππ0=TopOpenfld𝑡ππ
440 eqid topGenran.=topGenran.
441 56 440 rerest ππTopOpenfld𝑡ππ=topGenran.𝑡ππ
442 427 441 ax-mp TopOpenfld𝑡ππ=topGenran.𝑡ππ
443 439 442 eqtri TopOpenfld𝑡ππ0=topGenran.𝑡ππ
444 443 fveq2i intTopOpenfld𝑡ππ0=inttopGenran.𝑡ππ
445 159 snss 0ππ0ππ
446 44 445 mpbi 0ππ
447 ssequn2 0ππππ0=ππ
448 446 447 mpbi ππ0=ππ
449 444 448 fveq12i intTopOpenfld𝑡ππ0ππ0=inttopGenran.𝑡ππππ
450 resttopon topGenran.TopOnππtopGenran.𝑡ππTopOnππ
451 60 427 450 mp2an topGenran.𝑡ππTopOnππ
452 451 topontopi topGenran.𝑡ππTop
453 retop topGenran.Top
454 ovex ππV
455 453 454 pm3.2i topGenran.TopππV
456 ssid ππππ
457 33 243 456 3pm3.2i ππtopGenran.ππππππππ
458 restopnb topGenran.TopππVππtopGenran.ππππππππππtopGenran.ππtopGenran.𝑡ππ
459 455 457 458 mp2an ππtopGenran.ππtopGenran.𝑡ππ
460 33 459 mpbi ππtopGenran.𝑡ππ
461 isopn3i topGenran.𝑡ππTopππtopGenran.𝑡ππinttopGenran.𝑡ππππ=ππ
462 452 460 461 mp2an inttopGenran.𝑡ππππ=ππ
463 eqid ππ=ππ
464 449 462 463 3eqtrri ππ=intTopOpenfld𝑡ππ0ππ0
465 44 464 eleqtri 0intTopOpenfld𝑡ππ0ππ0
466 465 a1i 0intTopOpenfld𝑡ππ0ππ0
467 424 425 429 56 430 466 limcres sππifs=01s2sins2ππlim0=sππifs=01s2sins2lim0
468 467 mptru sππifs=01s2sins2ππlim0=sππifs=01s2sins2lim0
469 468 eqcomi sππifs=01s2sins2lim0=sππifs=01s2sins2ππlim0
470 resmpt ππππsππifs=01s2sins2ππ=sππifs=01s2sins2
471 243 470 ax-mp sππifs=01s2sins2ππ=sππifs=01s2sins2
472 471 oveq1i sππifs=01s2sins2ππlim0=sππifs=01s2sins2lim0
473 421 469 472 3eqtri Klim0=sππifs=01s2sins2lim0
474 eqid sππifs=01s2sins2=sππifs=01s2sins2
475 iftrue s=0ifs=01s2sins2=1
476 1cnd s=01
477 475 476 eqeltrd s=0ifs=01s2sins2
478 477 adantl sππs=0ifs=01s2sins2
479 iffalse ¬s=0ifs=01s2sins2=s2sins2
480 479 adantl sππ¬s=0ifs=01s2sins2=s2sins2
481 141 adantr sππ¬s=0s
482 2cnd sππ¬s=02
483 481 halfcld sππ¬s=0s2
484 483 sincld sππ¬s=0sins2
485 482 484 mulcld sππ¬s=02sins2
486 81 a1i sππ¬s=020
487 243 sseli sππsππ
488 neqne ¬s=0s0
489 fourierdlem44 sππs0sins20
490 487 488 489 syl2an sππ¬s=0sins20
491 482 484 486 490 mulne0d sππ¬s=02sins20
492 481 485 491 divcld sππ¬s=0s2sins2
493 480 492 eqeltrd sππ¬s=0ifs=01s2sins2
494 478 493 pm2.61dan sππifs=01s2sins2
495 474 494 fmpti sππifs=01s2sins2:ππ
496 495 a1i sππifs=01s2sins2:ππ
497 496 limcdif sππifs=01s2sins2lim0=sππifs=01s2sins2ππ0lim0
498 497 mptru sππifs=01s2sins2lim0=sππifs=01s2sins2ππ0lim0
499 resmpt ππ0ππsππifs=01s2sins2ππ0=sππ0ifs=01s2sins2
500 16 499 ax-mp sππifs=01s2sins2ππ0=sππ0ifs=01s2sins2
501 eldifn sππ0¬s0
502 velsn s0s=0
503 501 502 sylnib sππ0¬s=0
504 503 479 syl sππ0ifs=01s2sins2=s2sins2
505 504 mpteq2ia sππ0ifs=01s2sins2=sππ0s2sins2
506 500 505 eqtri sππifs=01s2sins2ππ0=sππ0s2sins2
507 506 oveq1i sππifs=01s2sins2ππ0lim0=sππ0s2sins2lim0
508 473 498 507 3eqtrri sππ0s2sins2lim0=Klim0
509 420 508 eleqtri 1Klim0
510 509 a1i s=01Klim0
511 fveq2 s=0Ks=K0
512 475 10 47 fvmpt 0ππK0=1
513 434 512 ax-mp K0=1
514 511 513 eqtrdi s=0Ks=1
515 oveq2 s=0Klims=Klim0
516 510 514 515 3eltr4d s=0KsKlims
517 427 12 sstri ππ
518 517 a1i s=0ππ
519 38 a1i s=0π
520 519 renegcld s=0π
521 id s=0s=0
522 35 a1i s=00
523 521 522 eqeltrd s=0s
524 431 521 breqtrrid s=0πs
525 521 432 eqbrtrdi s=0sπ
526 520 519 523 524 525 eliccd s=0sππ
527 57 oveq1i topGenran.𝑡ππ=TopOpenfld𝑡𝑡ππ
528 56 cnfldtop TopOpenfldTop
529 reex V
530 restabs TopOpenfldTopππVTopOpenfld𝑡𝑡ππ=TopOpenfld𝑡ππ
531 528 427 529 530 mp3an TopOpenfld𝑡𝑡ππ=TopOpenfld𝑡ππ
532 527 531 eqtri topGenran.𝑡ππ=TopOpenfld𝑡ππ
533 56 532 cnplimc ππsππKtopGenran.𝑡ππCnPTopOpenfldsK:ππKsKlims
534 518 526 533 syl2anc s=0KtopGenran.𝑡ππCnPTopOpenfldsK:ππKsKlims
535 15 516 534 mpbir2and s=0KtopGenran.𝑡ππCnPTopOpenflds
536 535 adantl sππs=0KtopGenran.𝑡ππCnPTopOpenflds
537 simpl sππ¬s=0sππ
538 502 notbii ¬s0¬s=0
539 538 biimpri ¬s=0¬s0
540 539 adantl sππ¬s=0¬s0
541 537 540 eldifd sππ¬s=0sππ0
542 fveq2 x=stopGenran.𝑡ππ0CnPTopOpenfldx=topGenran.𝑡ππ0CnPTopOpenflds
543 542 eleq2d x=ssππ0s2sins2topGenran.𝑡ππ0CnPTopOpenfldxsππ0s2sins2topGenran.𝑡ππ0CnPTopOpenflds
544 429 ssdifssd ππ0
545 544 145 idcncfg sππ0s:ππ0cn
546 eqid sππ02sins2=sππ02sins2
547 2cnd sππ02
548 eldifi sππ0sππ
549 517 548 sselid sππ0s
550 549 halfcld sππ0s2
551 550 sincld sππ0sins2
552 547 551 mulcld sππ02sins2
553 81 a1i sππ020
554 eldifsni sππ0s0
555 548 554 489 syl2anc sππ0sins20
556 547 551 553 555 mulne0d sππ02sins20
557 556 neneqd sππ0¬2sins2=0
558 elsng 2sins22sins202sins2=0
559 552 558 syl sππ02sins202sins2=0
560 557 559 mtbird sππ0¬2sins20
561 552 560 eldifd sππ02sins20
562 546 561 fmpti sππ02sins2:ππ00
563 difss 0
564 eqid s2=s2
565 175 176 175 constcncfg 2s2:cn
566 102 565 mp1i s2:cn
567 2cnd sππ02
568 564 566 544 145 567 cncfmptssg sππ02:ππ0cn
569 549 547 553 divrecd sππ0s2=s12
570 569 mpteq2ia sππ0s2=sππ0s12
571 eqid s12=s12
572 144 a1i 12
573 id 1212
574 572 573 572 constcncfg 12s12:cn
575 94 574 mp1i s12:cn
576 94 a1i sππ012
577 571 575 544 145 576 cncfmptssg sππ012:ππ0cn
578 545 577 mulcncf sππ0s12:ππ0cn
579 570 578 eqeltrid sππ0s2:ππ0cn
580 182 579 cncfmpt1f sππ0sins2:ππ0cn
581 568 580 mulcncf sππ02sins2:ππ0cn
582 581 mptru sππ02sins2:ππ0cn
583 cncfcdm 0sππ02sins2:ππ0cnsππ02sins2:ππ0cn0sππ02sins2:ππ00
584 563 582 583 mp2an sππ02sins2:ππ0cn0sππ02sins2:ππ00
585 562 584 mpbir sππ02sins2:ππ0cn0
586 585 a1i sππ02sins2:ππ0cn0
587 545 586 divcncf sππ0s2sins2:ππ0cn
588 587 mptru sππ0s2sins2:ππ0cn
589 428 ssdifssd ππ0
590 589 mptru ππ0
591 590 12 sstri ππ0
592 57 oveq1i topGenran.𝑡ππ0=TopOpenfld𝑡𝑡ππ0
593 restabs TopOpenfldTopππ0VTopOpenfld𝑡𝑡ππ0=TopOpenfld𝑡ππ0
594 528 590 529 593 mp3an TopOpenfld𝑡𝑡ππ0=TopOpenfld𝑡ππ0
595 592 594 eqtri topGenran.𝑡ππ0=TopOpenfld𝑡ππ0
596 unicntop =TopOpenfld
597 596 restid TopOpenfldTopTopOpenfld𝑡=TopOpenfld
598 528 597 ax-mp TopOpenfld𝑡=TopOpenfld
599 598 eqcomi TopOpenfld=TopOpenfld𝑡
600 56 595 599 cncfcn ππ0ππ0cn=topGenran.𝑡ππ0CnTopOpenfld
601 591 144 600 mp2an ππ0cn=topGenran.𝑡ππ0CnTopOpenfld
602 588 601 eleqtri sππ0s2sins2topGenran.𝑡ππ0CnTopOpenfld
603 resttopon topGenran.TopOnππ0topGenran.𝑡ππ0TopOnππ0
604 60 590 603 mp2an topGenran.𝑡ππ0TopOnππ0
605 56 cnfldtopon TopOpenfldTopOn
606 cncnp topGenran.𝑡ππ0TopOnππ0TopOpenfldTopOnsππ0s2sins2topGenran.𝑡ππ0CnTopOpenfldsππ0s2sins2:ππ0xππ0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenfldx
607 604 605 606 mp2an sππ0s2sins2topGenran.𝑡ππ0CnTopOpenfldsππ0s2sins2:ππ0xππ0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenfldx
608 602 607 mpbi sππ0s2sins2:ππ0xππ0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenfldx
609 608 simpri xππ0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenfldx
610 543 609 vtoclri sππ0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenflds
611 541 610 syl sππ¬s=0sππ0s2sins2topGenran.𝑡ππ0CnPTopOpenflds
612 10 reseq1i Kππ0=sππifs=01s2sins2ππ0
613 difss ππ0ππ
614 resmpt ππ0ππsππifs=01s2sins2ππ0=sππ0ifs=01s2sins2
615 613 614 ax-mp sππifs=01s2sins2ππ0=sππ0ifs=01s2sins2
616 eldifn sππ0¬s0
617 616 502 sylnib sππ0¬s=0
618 617 479 syl sππ0ifs=01s2sins2=s2sins2
619 618 mpteq2ia sππ0ifs=01s2sins2=sππ0s2sins2
620 612 615 619 3eqtri Kππ0=sππ0s2sins2
621 restabs topGenran.Topππ0ππππVtopGenran.𝑡ππ𝑡ππ0=topGenran.𝑡ππ0
622 453 613 454 621 mp3an topGenran.𝑡ππ𝑡ππ0=topGenran.𝑡ππ0
623 622 oveq1i topGenran.𝑡ππ𝑡ππ0CnPTopOpenfld=topGenran.𝑡ππ0CnPTopOpenfld
624 623 fveq1i topGenran.𝑡ππ𝑡ππ0CnPTopOpenflds=topGenran.𝑡ππ0CnPTopOpenflds
625 611 620 624 3eltr4g sππ¬s=0Kππ0topGenran.𝑡ππ𝑡ππ0CnPTopOpenflds
626 452 613 pm3.2i topGenran.𝑡ππTopππ0ππ
627 626 a1i sππ¬s=0topGenran.𝑡ππTopππ0ππ
628 ssdif ππππ00
629 427 628 ax-mp ππ00
630 629 541 sselid sππ¬s=0s0
631 sscon 0ππππ0
632 436 631 ax-mp ππ0
633 629 632 unssi ππ0ππ0
634 simpr s0sππsππ
635 eldifn s0¬s0
636 635 adantr s0sππ¬s0
637 634 636 eldifd s0sππsππ0
638 elun1 sππ0sππ0ππ
639 637 638 syl s0sππsππ0ππ
640 eldifi s0s
641 640 adantr s0¬sππs
642 simpr s0¬sππ¬sππ
643 641 642 eldifd s0¬sππsππ
644 elun2 sππsππ0ππ
645 643 644 syl s0¬sππsππ0ππ
646 639 645 pm2.61dan s0sππ0ππ
647 646 ssriv 0ππ0ππ
648 633 647 eqssi ππ0ππ=0
649 648 fveq2i inttopGenran.ππ0ππ=inttopGenran.0
650 61 cldopn 0ClsdtopGenran.0topGenran.
651 59 650 ax-mp 0topGenran.
652 isopn3i topGenran.Top0topGenran.inttopGenran.0=0
653 453 651 652 mp2an inttopGenran.0=0
654 649 653 eqtri inttopGenran.ππ0ππ=0
655 630 654 eleqtrrdi sππ¬s=0sinttopGenran.ππ0ππ
656 655 537 elind sππ¬s=0sinttopGenran.ππ0ππππ
657 eqid topGenran.𝑡ππ=topGenran.𝑡ππ
658 61 657 restntr topGenran.Topππππ0ππinttopGenran.𝑡ππππ0=inttopGenran.ππ0ππππ
659 453 427 613 658 mp3an inttopGenran.𝑡ππππ0=inttopGenran.ππ0ππππ
660 656 659 eleqtrrdi sππ¬s=0sinttopGenran.𝑡ππππ0
661 14 a1i sππ¬s=0K:ππ
662 451 toponunii ππ=topGenran.𝑡ππ
663 662 596 cnprest topGenran.𝑡ππTopππ0ππsinttopGenran.𝑡ππππ0K:ππKtopGenran.𝑡ππCnPTopOpenfldsKππ0topGenran.𝑡ππ𝑡ππ0CnPTopOpenflds
664 627 660 661 663 syl12anc sππ¬s=0KtopGenran.𝑡ππCnPTopOpenfldsKππ0topGenran.𝑡ππ𝑡ππ0CnPTopOpenflds
665 625 664 mpbird sππ¬s=0KtopGenran.𝑡ππCnPTopOpenflds
666 536 665 pm2.61dan sππKtopGenran.𝑡ππCnPTopOpenflds
667 666 rgen sππKtopGenran.𝑡ππCnPTopOpenflds
668 cncnp topGenran.𝑡ππTopOnππTopOpenfldTopOnKtopGenran.𝑡ππCnTopOpenfldK:ππsππKtopGenran.𝑡ππCnPTopOpenflds
669 451 605 668 mp2an KtopGenran.𝑡ππCnTopOpenfldK:ππsππKtopGenran.𝑡ππCnPTopOpenflds
670 14 667 669 mpbir2an KtopGenran.𝑡ππCnTopOpenfld
671 56 532 599 cncfcn ππππcn=topGenran.𝑡ππCnTopOpenfld
672 517 144 671 mp2an ππcn=topGenran.𝑡ππCnTopOpenfld
673 672 eqcomi topGenran.𝑡ππCnTopOpenfld=ππcn
674 670 673 eleqtri K:ππcn
675 cncfcdm K:ππcnK:ππcnK:ππ
676 12 674 675 mp2an K:ππcnK:ππ
677 11 676 mpbir K:ππcn