Metamath Proof Explorer


Theorem dirkercncf

Description: For any natural number N , the Dirichlet Kernel ( DN ) is continuous. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypothesis dirkercncf.d D = n y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2
Assertion dirkercncf N D N : cn

Proof

Step Hyp Ref Expression
1 dirkercncf.d D = n y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2
2 1 dirkerf N D N :
3 ax-resscn
4 3 a1i N
5 2 4 fssd N D N :
6 5 ad2antrr N y y mod 2 π = 0 D N :
7 oveq1 y = w y mod 2 π = w mod 2 π
8 7 eqeq1d y = w y mod 2 π = 0 w mod 2 π = 0
9 oveq2 y = w n + 1 2 y = n + 1 2 w
10 9 fveq2d y = w sin n + 1 2 y = sin n + 1 2 w
11 oveq1 y = w y 2 = w 2
12 11 fveq2d y = w sin y 2 = sin w 2
13 12 oveq2d y = w 2 π sin y 2 = 2 π sin w 2
14 10 13 oveq12d y = w sin n + 1 2 y 2 π sin y 2 = sin n + 1 2 w 2 π sin w 2
15 8 14 ifbieq2d y = w if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2 = if w mod 2 π = 0 2 n + 1 2 π sin n + 1 2 w 2 π sin w 2
16 15 cbvmptv y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2 = w if w mod 2 π = 0 2 n + 1 2 π sin n + 1 2 w 2 π sin w 2
17 16 mpteq2i n y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2 = n w if w mod 2 π = 0 2 n + 1 2 π sin n + 1 2 w 2 π sin w 2
18 1 17 eqtri D = n w if w mod 2 π = 0 2 n + 1 2 π sin n + 1 2 w 2 π sin w 2
19 eqid y π = y π
20 eqid y + π = y + π
21 eqid w y π y + π sin n + 1 2 w 2 π sin w 2 = w y π y + π sin n + 1 2 w 2 π sin w 2
22 eqid w y π y + π 2 π sin w 2 = w y π y + π 2 π sin w 2
23 simpll N y y mod 2 π = 0 N
24 simplr N y y mod 2 π = 0 y
25 simpr N y y mod 2 π = 0 y mod 2 π = 0
26 18 19 20 21 22 23 24 25 dirkercncflem3 N y y mod 2 π = 0 D N y D N lim y
27 3 jctl y y
28 27 ad2antlr N y y mod 2 π = 0 y
29 eqid TopOpen fld = TopOpen fld
30 29 tgioo2 topGen ran . = TopOpen fld 𝑡
31 29 30 cnplimc y D N topGen ran . CnP TopOpen fld y D N : D N y D N lim y
32 28 31 syl N y y mod 2 π = 0 D N topGen ran . CnP TopOpen fld y D N : D N y D N lim y
33 6 26 32 mpbir2and N y y mod 2 π = 0 D N topGen ran . CnP TopOpen fld y
34 29 cnfldtop TopOpen fld Top
35 34 a1i N y y mod 2 π = 0 TopOpen fld Top
36 2 ad2antrr N y y mod 2 π = 0 D N :
37 3 a1i N y y mod 2 π = 0
38 retopon topGen ran . TopOn
39 38 toponunii = topGen ran .
40 29 cnfldtopon TopOpen fld TopOn
41 40 toponunii = TopOpen fld
42 39 41 cnprest2 TopOpen fld Top D N : D N topGen ran . CnP TopOpen fld y D N topGen ran . CnP TopOpen fld 𝑡 y
43 35 36 37 42 syl3anc N y y mod 2 π = 0 D N topGen ran . CnP TopOpen fld y D N topGen ran . CnP TopOpen fld 𝑡 y
44 33 43 mpbid N y y mod 2 π = 0 D N topGen ran . CnP TopOpen fld 𝑡 y
45 30 eqcomi TopOpen fld 𝑡 = topGen ran .
46 45 a1i N y y mod 2 π = 0 TopOpen fld 𝑡 = topGen ran .
47 46 oveq2d N y y mod 2 π = 0 topGen ran . CnP TopOpen fld 𝑡 = topGen ran . CnP topGen ran .
48 47 fveq1d N y y mod 2 π = 0 topGen ran . CnP TopOpen fld 𝑡 y = topGen ran . CnP topGen ran . y
49 44 48 eleqtrd N y y mod 2 π = 0 D N topGen ran . CnP topGen ran . y
50 simpll N y ¬ y mod 2 π = 0 N
51 simplr N y ¬ y mod 2 π = 0 y
52 neqne ¬ y mod 2 π = 0 y mod 2 π 0
53 52 adantl N y ¬ y mod 2 π = 0 y mod 2 π 0
54 eqid y 2 π = y 2 π
55 eqid y 2 π + 1 = y 2 π + 1
56 eqid y 2 π 2 π = y 2 π 2 π
57 eqid y 2 π + 1 2 π = y 2 π + 1 2 π
58 18 50 51 53 54 55 56 57 dirkercncflem4 N y ¬ y mod 2 π = 0 D N topGen ran . CnP topGen ran . y
59 49 58 pm2.61dan N y D N topGen ran . CnP topGen ran . y
60 59 ralrimiva N y D N topGen ran . CnP topGen ran . y
61 cncnp topGen ran . TopOn topGen ran . TopOn D N topGen ran . Cn topGen ran . D N : y D N topGen ran . CnP topGen ran . y
62 38 38 61 mp2an D N topGen ran . Cn topGen ran . D N : y D N topGen ran . CnP topGen ran . y
63 2 60 62 sylanbrc N D N topGen ran . Cn topGen ran .
64 29 30 30 cncfcn cn = topGen ran . Cn topGen ran .
65 3 3 64 mp2an cn = topGen ran . Cn topGen ran .
66 63 65 eleqtrrdi N D N : cn