Metamath Proof Explorer


Theorem dirkercncflem2

Description: Lemma used to prove that the Dirichlet kernel is continuous at Y points that are multiples of ( 2 x. _pi ) . (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses dirkercncflem2.d D = n y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2
dirkercncflem2.f F = y A B Y sin N + 1 2 y
dirkercncflem2.g G = y A B Y 2 π sin y 2
dirkercncflem2.yne0 φ y A B Y sin y 2 0
dirkercncflem2.h H = y A B Y N + 1 2 cos N + 1 2 y
dirkercncflem2.i I = y A B Y π cos y 2
dirkercncflem2.l L = w A B N + 1 2 cos N + 1 2 w π cos w 2
dirkercncflem2.n φ N
dirkercncflem2.y φ Y A B
dirkercncflem2.ymod φ Y mod 2 π = 0
dirkercncflem2.11 φ y A B Y cos y 2 0
Assertion dirkercncflem2 φ D N Y D N A B Y lim Y

Proof

Step Hyp Ref Expression
1 dirkercncflem2.d D = n y if y mod 2 π = 0 2 n + 1 2 π sin n + 1 2 y 2 π sin y 2
2 dirkercncflem2.f F = y A B Y sin N + 1 2 y
3 dirkercncflem2.g G = y A B Y 2 π sin y 2
4 dirkercncflem2.yne0 φ y A B Y sin y 2 0
5 dirkercncflem2.h H = y A B Y N + 1 2 cos N + 1 2 y
6 dirkercncflem2.i I = y A B Y π cos y 2
7 dirkercncflem2.l L = w A B N + 1 2 cos N + 1 2 w π cos w 2
8 dirkercncflem2.n φ N
9 dirkercncflem2.y φ Y A B
10 dirkercncflem2.ymod φ Y mod 2 π = 0
11 dirkercncflem2.11 φ y A B Y cos y 2 0
12 difss A B Y A B
13 ioossre A B
14 12 13 sstri A B Y
15 14 a1i φ A B Y
16 8 adantr φ y A B Y N
17 16 nnred φ y A B Y N
18 halfre 1 2
19 18 a1i φ y A B Y 1 2
20 17 19 readdcld φ y A B Y N + 1 2
21 15 sselda φ y A B Y y
22 20 21 remulcld φ y A B Y N + 1 2 y
23 22 resincld φ y A B Y sin N + 1 2 y
24 23 2 fmptd φ F : A B Y
25 2pire 2 π
26 25 a1i φ y A B Y 2 π
27 21 rehalfcld φ y A B Y y 2
28 27 resincld φ y A B Y sin y 2
29 26 28 remulcld φ y A B Y 2 π sin y 2
30 29 3 fmptd φ G : A B Y
31 iooretop A B topGen ran .
32 31 a1i φ A B topGen ran .
33 eqid A B Y = A B Y
34 2 a1i φ F = y A B Y sin N + 1 2 y
35 34 oveq2d φ D F = dy A B Y sin N + 1 2 y d y
36 resmpt A B Y y sin N + 1 2 y A B Y = y A B Y sin N + 1 2 y
37 14 36 ax-mp y sin N + 1 2 y A B Y = y A B Y sin N + 1 2 y
38 37 eqcomi y A B Y sin N + 1 2 y = y sin N + 1 2 y A B Y
39 38 a1i φ y A B Y sin N + 1 2 y = y sin N + 1 2 y A B Y
40 39 oveq2d φ dy A B Y sin N + 1 2 y d y = D y sin N + 1 2 y A B Y
41 ax-resscn
42 41 a1i φ
43 8 nncnd φ N
44 halfcn 1 2
45 44 a1i φ 1 2
46 43 45 addcld φ N + 1 2
47 46 adantr φ y N + 1 2
48 42 sselda φ y y
49 47 48 mulcld φ y N + 1 2 y
50 49 sincld φ y sin N + 1 2 y
51 eqid y sin N + 1 2 y = y sin N + 1 2 y
52 50 51 fmptd φ y sin N + 1 2 y :
53 ssid
54 53 14 pm3.2i A B Y
55 54 a1i φ A B Y
56 eqid TopOpen fld = TopOpen fld
57 tgioo4 topGen ran . = TopOpen fld 𝑡
58 56 57 dvres y sin N + 1 2 y : A B Y D y sin N + 1 2 y A B Y = dy sin N + 1 2 y d y int topGen ran . A B Y
59 42 52 55 58 syl21anc φ D y sin N + 1 2 y A B Y = dy sin N + 1 2 y d y int topGen ran . A B Y
60 retop topGen ran . Top
61 rehaus topGen ran . Haus
62 9 elioored φ Y
63 uniretop = topGen ran .
64 63 sncld topGen ran . Haus Y Y Clsd topGen ran .
65 61 62 64 sylancr φ Y Clsd topGen ran .
66 63 difopn A B topGen ran . Y Clsd topGen ran . A B Y topGen ran .
67 31 65 66 sylancr φ A B Y topGen ran .
68 isopn3i topGen ran . Top A B Y topGen ran . int topGen ran . A B Y = A B Y
69 60 67 68 sylancr φ int topGen ran . A B Y = A B Y
70 69 reseq2d φ dy sin N + 1 2 y d y int topGen ran . A B Y = dy sin N + 1 2 y d y A B Y
71 reelprrecn
72 71 a1i φ
73 46 adantr φ y N + 1 2
74 simpr φ y y
75 73 74 mulcld φ y N + 1 2 y
76 75 sincld φ y sin N + 1 2 y
77 eqid y sin N + 1 2 y = y sin N + 1 2 y
78 76 77 fmptd φ y sin N + 1 2 y :
79 ssid
80 79 a1i φ
81 dvsinax N + 1 2 dy sin N + 1 2 y d y = y N + 1 2 cos N + 1 2 y
82 46 81 syl φ dy sin N + 1 2 y d y = y N + 1 2 cos N + 1 2 y
83 82 dmeqd φ dom dy sin N + 1 2 y d y = dom y N + 1 2 cos N + 1 2 y
84 eqid y N + 1 2 cos N + 1 2 y = y N + 1 2 cos N + 1 2 y
85 75 coscld φ y cos N + 1 2 y
86 73 85 mulcld φ y N + 1 2 cos N + 1 2 y
87 84 86 dmmptd φ dom y N + 1 2 cos N + 1 2 y =
88 83 87 eqtrd φ dom dy sin N + 1 2 y d y =
89 41 88 sseqtrrid φ dom dy sin N + 1 2 y d y
90 dvres3 y sin N + 1 2 y : dom dy sin N + 1 2 y d y D y sin N + 1 2 y = dy sin N + 1 2 y d y
91 72 78 80 89 90 syl22anc φ D y sin N + 1 2 y = dy sin N + 1 2 y d y
92 resmpt y sin N + 1 2 y = y sin N + 1 2 y
93 41 92 mp1i φ y sin N + 1 2 y = y sin N + 1 2 y
94 93 oveq2d φ D y sin N + 1 2 y = dy sin N + 1 2 y d y
95 82 reseq1d φ dy sin N + 1 2 y d y = y N + 1 2 cos N + 1 2 y
96 resmpt y N + 1 2 cos N + 1 2 y = y N + 1 2 cos N + 1 2 y
97 41 96 ax-mp y N + 1 2 cos N + 1 2 y = y N + 1 2 cos N + 1 2 y
98 95 97 eqtrdi φ dy sin N + 1 2 y d y = y N + 1 2 cos N + 1 2 y
99 91 94 98 3eqtr3d φ dy sin N + 1 2 y d y = y N + 1 2 cos N + 1 2 y
100 99 reseq1d φ dy sin N + 1 2 y d y A B Y = y N + 1 2 cos N + 1 2 y A B Y
101 resmpt A B Y y N + 1 2 cos N + 1 2 y A B Y = y A B Y N + 1 2 cos N + 1 2 y
102 14 101 mp1i φ y N + 1 2 cos N + 1 2 y A B Y = y A B Y N + 1 2 cos N + 1 2 y
103 70 100 102 3eqtrd φ dy sin N + 1 2 y d y int topGen ran . A B Y = y A B Y N + 1 2 cos N + 1 2 y
104 40 59 103 3eqtrd φ dy A B Y sin N + 1 2 y d y = y A B Y N + 1 2 cos N + 1 2 y
105 5 a1i φ H = y A B Y N + 1 2 cos N + 1 2 y
106 105 eqcomd φ y A B Y N + 1 2 cos N + 1 2 y = H
107 35 104 106 3eqtrd φ D F = H
108 107 dmeqd φ dom F = dom H
109 21 recnd φ y A B Y y
110 109 86 syldan φ y A B Y N + 1 2 cos N + 1 2 y
111 5 110 dmmptd φ dom H = A B Y
112 108 111 eqtr2d φ A B Y = dom F
113 eqimss A B Y = dom F A B Y dom F
114 112 113 syl φ A B Y dom F
115 6 a1i φ I = y A B Y π cos y 2
116 resmpt A B Y y 2 π sin y 2 A B Y = y A B Y 2 π sin y 2
117 14 116 ax-mp y 2 π sin y 2 A B Y = y A B Y 2 π sin y 2
118 117 eqcomi y A B Y 2 π sin y 2 = y 2 π sin y 2 A B Y
119 118 oveq2i dy A B Y 2 π sin y 2 d y = D y 2 π sin y 2 A B Y
120 119 a1i φ dy A B Y 2 π sin y 2 d y = D y 2 π sin y 2 A B Y
121 2picn 2 π
122 121 a1i φ y 2 π
123 48 halfcld φ y y 2
124 123 sincld φ y sin y 2
125 122 124 mulcld φ y 2 π sin y 2
126 eqid y 2 π sin y 2 = y 2 π sin y 2
127 125 126 fmptd φ y 2 π sin y 2 :
128 56 57 dvres y 2 π sin y 2 : A B Y D y 2 π sin y 2 A B Y = dy 2 π sin y 2 d y int topGen ran . A B Y
129 42 127 55 128 syl21anc φ D y 2 π sin y 2 A B Y = dy 2 π sin y 2 d y int topGen ran . A B Y
130 69 reseq2d φ dy 2 π sin y 2 d y int topGen ran . A B Y = dy 2 π sin y 2 d y A B Y
131 41 sseli y y
132 1cnd y 1
133 2cnd y 2
134 id y y
135 2ne0 2 0
136 135 a1i y 2 0
137 132 133 134 136 div13d y 1 2 y = y 2 1
138 halfcl y y 2
139 138 mulridd y y 2 1 = y 2
140 137 139 eqtrd y 1 2 y = y 2
141 140 fveq2d y sin 1 2 y = sin y 2
142 141 oveq2d y 2 π sin 1 2 y = 2 π sin y 2
143 142 eqcomd y 2 π sin y 2 = 2 π sin 1 2 y
144 131 143 syl y 2 π sin y 2 = 2 π sin 1 2 y
145 144 adantl φ y 2 π sin y 2 = 2 π sin 1 2 y
146 145 mpteq2dva φ y 2 π sin y 2 = y 2 π sin 1 2 y
147 146 oveq2d φ dy 2 π sin y 2 d y = dy 2 π sin 1 2 y d y
148 121 a1i φ y 2 π
149 44 a1i φ y 1 2
150 149 74 mulcld φ y 1 2 y
151 150 sincld φ y sin 1 2 y
152 148 151 mulcld φ y 2 π sin 1 2 y
153 eqid y 2 π sin 1 2 y = y 2 π sin 1 2 y
154 152 153 fmptd φ y 2 π sin 1 2 y :
155 2cnd φ 2
156 picn π
157 156 a1i φ π
158 155 157 mulcld φ 2 π
159 dvasinbx 2 π 1 2 dy 2 π sin 1 2 y d y = y 2 π 1 2 cos 1 2 y
160 158 44 159 sylancl φ dy 2 π sin 1 2 y d y = y 2 π 1 2 cos 1 2 y
161 2cnd φ y 2
162 156 a1i φ y π
163 161 162 149 mul32d φ y 2 π 1 2 = 2 1 2 π
164 135 a1i φ y 2 0
165 161 164 recidd φ y 2 1 2 = 1
166 165 oveq1d φ y 2 1 2 π = 1 π
167 162 mullidd φ y 1 π = π
168 163 166 167 3eqtrd φ y 2 π 1 2 = π
169 140 fveq2d y cos 1 2 y = cos y 2
170 169 adantl φ y cos 1 2 y = cos y 2
171 168 170 oveq12d φ y 2 π 1 2 cos 1 2 y = π cos y 2
172 171 mpteq2dva φ y 2 π 1 2 cos 1 2 y = y π cos y 2
173 160 172 eqtrd φ dy 2 π sin 1 2 y d y = y π cos y 2
174 173 dmeqd φ dom dy 2 π sin 1 2 y d y = dom y π cos y 2
175 eqid y π cos y 2 = y π cos y 2
176 74 halfcld φ y y 2
177 176 coscld φ y cos y 2
178 162 177 mulcld φ y π cos y 2
179 175 178 dmmptd φ dom y π cos y 2 =
180 174 179 eqtrd φ dom dy 2 π sin 1 2 y d y =
181 41 180 sseqtrrid φ dom dy 2 π sin 1 2 y d y
182 dvres3 y 2 π sin 1 2 y : dom dy 2 π sin 1 2 y d y D y 2 π sin 1 2 y = dy 2 π sin 1 2 y d y
183 72 154 80 181 182 syl22anc φ D y 2 π sin 1 2 y = dy 2 π sin 1 2 y d y
184 resmpt y 2 π sin 1 2 y = y 2 π sin 1 2 y
185 41 184 mp1i φ y 2 π sin 1 2 y = y 2 π sin 1 2 y
186 185 oveq2d φ D y 2 π sin 1 2 y = dy 2 π sin 1 2 y d y
187 173 reseq1d φ dy 2 π sin 1 2 y d y = y π cos y 2
188 183 186 187 3eqtr3d φ dy 2 π sin 1 2 y d y = y π cos y 2
189 resmpt y π cos y 2 = y π cos y 2
190 41 189 ax-mp y π cos y 2 = y π cos y 2
191 188 190 eqtrdi φ dy 2 π sin 1 2 y d y = y π cos y 2
192 147 191 eqtrd φ dy 2 π sin y 2 d y = y π cos y 2
193 192 reseq1d φ dy 2 π sin y 2 d y A B Y = y π cos y 2 A B Y
194 15 resmptd φ y π cos y 2 A B Y = y A B Y π cos y 2
195 130 193 194 3eqtrd φ dy 2 π sin y 2 d y int topGen ran . A B Y = y A B Y π cos y 2
196 120 129 195 3eqtrd φ dy A B Y 2 π sin y 2 d y = y A B Y π cos y 2
197 196 eqcomd φ y A B Y π cos y 2 = dy A B Y 2 π sin y 2 d y
198 3 a1i φ G = y A B Y 2 π sin y 2
199 198 oveq2d φ D G = dy A B Y 2 π sin y 2 d y
200 199 eqcomd φ dy A B Y 2 π sin y 2 d y = D G
201 115 197 200 3eqtrrd φ D G = I
202 201 dmeqd φ dom G = dom I
203 109 178 syldan φ y A B Y π cos y 2
204 6 203 dmmptd φ dom I = A B Y
205 202 204 eqtr2d φ A B Y = dom G
206 eqimss A B Y = dom G A B Y dom G
207 205 206 syl φ A B Y dom G
208 109 75 syldan φ y A B Y N + 1 2 y
209 208 ralrimiva φ y A B Y N + 1 2 y
210 eqid y A B Y N + 1 2 y = y A B Y N + 1 2 y
211 210 fnmpt y A B Y N + 1 2 y y A B Y N + 1 2 y Fn A B Y
212 209 211 syl φ y A B Y N + 1 2 y Fn A B Y
213 eqidd φ w A B Y y A B Y N + 1 2 y = y A B Y N + 1 2 y
214 simpr φ w A B Y y = w y = w
215 214 oveq2d φ w A B Y y = w N + 1 2 y = N + 1 2 w
216 simpr φ w A B Y w A B Y
217 43 adantr φ w A B Y N
218 1cnd φ w A B Y 1
219 218 halfcld φ w A B Y 1 2
220 217 219 addcld φ w A B Y N + 1 2
221 eldifi w A B Y w A B
222 221 elioored w A B Y w
223 222 recnd w A B Y w
224 223 adantl φ w A B Y w
225 220 224 mulcld φ w A B Y N + 1 2 w
226 213 215 216 225 fvmptd φ w A B Y y A B Y N + 1 2 y w = N + 1 2 w
227 eleq1w y = w y A B Y w A B Y
228 227 anbi2d y = w φ y A B Y φ w A B Y
229 oveq1 y = w y mod 2 π = w mod 2 π
230 229 neeq1d y = w y mod 2 π 0 w mod 2 π 0
231 228 230 imbi12d y = w φ y A B Y y mod 2 π 0 φ w A B Y w mod 2 π 0
232 eldifi y A B Y y A B
233 elioore y A B y
234 232 233 131 3syl y A B Y y
235 2cnd y A B Y 2
236 156 a1i y A B Y π
237 135 a1i y A B Y 2 0
238 0re 0
239 pipos 0 < π
240 238 239 gtneii π 0
241 240 a1i y A B Y π 0
242 234 235 236 237 241 divdiv1d y A B Y y 2 π = y 2 π
243 242 eqcomd y A B Y y 2 π = y 2 π
244 243 adantl φ y A B Y y 2 π = y 2 π
245 4 neneqd φ y A B Y ¬ sin y 2 = 0
246 109 halfcld φ y A B Y y 2
247 sineq0 y 2 sin y 2 = 0 y 2 π
248 246 247 syl φ y A B Y sin y 2 = 0 y 2 π
249 245 248 mtbid φ y A B Y ¬ y 2 π
250 244 249 eqneltrd φ y A B Y ¬ y 2 π
251 2rp 2 +
252 pirp π +
253 rpmulcl 2 + π + 2 π +
254 251 252 253 mp2an 2 π +
255 mod0 y 2 π + y mod 2 π = 0 y 2 π
256 21 254 255 sylancl φ y A B Y y mod 2 π = 0 y 2 π
257 250 256 mtbird φ y A B Y ¬ y mod 2 π = 0
258 257 neqned φ y A B Y y mod 2 π 0
259 231 258 chvarvv φ w A B Y w mod 2 π 0
260 259 neneqd φ w A B Y ¬ w mod 2 π = 0
261 simpll φ w A B Y N + 1 2 w = N + 1 2 Y φ
262 simpr φ w A B Y N + 1 2 w = N + 1 2 Y N + 1 2 w = N + 1 2 Y
263 223 ad2antlr φ w A B Y N + 1 2 w = N + 1 2 Y w
264 62 recnd φ Y
265 264 ad2antrr φ w A B Y N + 1 2 w = N + 1 2 Y Y
266 0red φ 0
267 8 nnred φ N
268 1red φ 1
269 268 rehalfcld φ 1 2
270 267 269 readdcld φ N + 1 2
271 8 nngt0d φ 0 < N
272 251 a1i φ 2 +
273 272 rpreccld φ 1 2 +
274 267 273 ltaddrpd φ N < N + 1 2
275 266 267 270 271 274 lttrd φ 0 < N + 1 2
276 275 gt0ne0d φ N + 1 2 0
277 46 276 jca φ N + 1 2 N + 1 2 0
278 277 ad2antrr φ w A B Y N + 1 2 w = N + 1 2 Y N + 1 2 N + 1 2 0
279 mulcan w Y N + 1 2 N + 1 2 0 N + 1 2 w = N + 1 2 Y w = Y
280 263 265 278 279 syl3anc φ w A B Y N + 1 2 w = N + 1 2 Y N + 1 2 w = N + 1 2 Y w = Y
281 262 280 mpbid φ w A B Y N + 1 2 w = N + 1 2 Y w = Y
282 oveq1 w = Y w mod 2 π = Y mod 2 π
283 282 10 sylan9eqr φ w = Y w mod 2 π = 0
284 261 281 283 syl2anc φ w A B Y N + 1 2 w = N + 1 2 Y w mod 2 π = 0
285 260 284 mtand φ w A B Y ¬ N + 1 2 w = N + 1 2 Y
286 46 264 mulcld φ N + 1 2 Y
287 286 adantr φ w A B Y N + 1 2 Y
288 elsn2g N + 1 2 Y N + 1 2 w N + 1 2 Y N + 1 2 w = N + 1 2 Y
289 287 288 syl φ w A B Y N + 1 2 w N + 1 2 Y N + 1 2 w = N + 1 2 Y
290 285 289 mtbird φ w A B Y ¬ N + 1 2 w N + 1 2 Y
291 225 290 eldifd φ w A B Y N + 1 2 w N + 1 2 Y
292 226 291 eqeltrd φ w A B Y y A B Y N + 1 2 y w N + 1 2 Y
293 sinf sin :
294 293 fdmi dom sin =
295 294 eqcomi = dom sin
296 295 a1i φ w A B Y = dom sin
297 296 difeq1d φ w A B Y N + 1 2 Y = dom sin N + 1 2 Y
298 292 297 eleqtrd φ w A B Y y A B Y N + 1 2 y w dom sin N + 1 2 Y
299 298 ralrimiva φ w A B Y y A B Y N + 1 2 y w dom sin N + 1 2 Y
300 fnfvrnss y A B Y N + 1 2 y Fn A B Y w A B Y y A B Y N + 1 2 y w dom sin N + 1 2 Y ran y A B Y N + 1 2 y dom sin N + 1 2 Y
301 212 299 300 syl2anc φ ran y A B Y N + 1 2 y dom sin N + 1 2 Y
302 uncom A B Y Y = Y A B Y
303 302 a1i φ A B Y Y = Y A B Y
304 9 snssd φ Y A B
305 undif Y A B Y A B Y = A B
306 304 305 sylib φ Y A B Y = A B
307 303 306 eqtrd φ A B Y Y = A B
308 307 mpteq1d φ w A B Y Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = w A B if w = Y N + 1 2 Y y A B Y N + 1 2 y w
309 iftrue w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = N + 1 2 Y
310 oveq2 w = Y N + 1 2 w = N + 1 2 Y
311 309 310 eqtr4d w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = N + 1 2 w
312 311 adantl φ w A B w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = N + 1 2 w
313 iffalse ¬ w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = y A B Y N + 1 2 y w
314 313 adantl φ w A B ¬ w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = y A B Y N + 1 2 y w
315 eqidd φ w A B ¬ w = Y y A B Y N + 1 2 y = y A B Y N + 1 2 y
316 oveq2 y = w N + 1 2 y = N + 1 2 w
317 316 adantl φ w A B ¬ w = Y y = w N + 1 2 y = N + 1 2 w
318 simpl w A B ¬ w = Y w A B
319 id ¬ w = Y ¬ w = Y
320 velsn w Y w = Y
321 319 320 sylnibr ¬ w = Y ¬ w Y
322 321 adantl w A B ¬ w = Y ¬ w Y
323 318 322 eldifd w A B ¬ w = Y w A B Y
324 323 adantll φ w A B ¬ w = Y w A B Y
325 46 adantr φ w A B N + 1 2
326 elioore w A B w
327 326 recnd w A B w
328 327 adantl φ w A B w
329 325 328 mulcld φ w A B N + 1 2 w
330 329 adantr φ w A B ¬ w = Y N + 1 2 w
331 315 317 324 330 fvmptd φ w A B ¬ w = Y y A B Y N + 1 2 y w = N + 1 2 w
332 314 331 eqtrd φ w A B ¬ w = Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = N + 1 2 w
333 312 332 pm2.61dan φ w A B if w = Y N + 1 2 Y y A B Y N + 1 2 y w = N + 1 2 w
334 333 mpteq2dva φ w A B if w = Y N + 1 2 Y y A B Y N + 1 2 y w = w A B N + 1 2 w
335 ioosscn A B
336 resmpt A B w N + 1 2 w A B = w A B N + 1 2 w
337 335 336 ax-mp w N + 1 2 w A B = w A B N + 1 2 w
338 eqid w N + 1 2 w = w N + 1 2 w
339 338 mulc1cncf N + 1 2 w N + 1 2 w : cn
340 46 339 syl φ w N + 1 2 w : cn
341 56 cnfldtop TopOpen fld Top
342 unicntop = TopOpen fld
343 342 restid TopOpen fld Top TopOpen fld 𝑡 = TopOpen fld
344 341 343 ax-mp TopOpen fld 𝑡 = TopOpen fld
345 344 eqcomi TopOpen fld = TopOpen fld 𝑡
346 56 345 345 cncfcn cn = TopOpen fld Cn TopOpen fld
347 79 80 346 sylancr φ cn = TopOpen fld Cn TopOpen fld
348 340 347 eleqtrd φ w N + 1 2 w TopOpen fld Cn TopOpen fld
349 13 42 sstrid φ A B
350 342 cnrest w N + 1 2 w TopOpen fld Cn TopOpen fld A B w N + 1 2 w A B TopOpen fld 𝑡 A B Cn TopOpen fld
351 348 349 350 syl2anc φ w N + 1 2 w A B TopOpen fld 𝑡 A B Cn TopOpen fld
352 337 351 eqeltrrid φ w A B N + 1 2 w TopOpen fld 𝑡 A B Cn TopOpen fld
353 56 cnfldtopon TopOpen fld TopOn
354 resttopon TopOpen fld TopOn A B TopOpen fld 𝑡 A B TopOn A B
355 353 349 354 sylancr φ TopOpen fld 𝑡 A B TopOn A B
356 cncnp TopOpen fld 𝑡 A B TopOn A B TopOpen fld TopOn w A B N + 1 2 w TopOpen fld 𝑡 A B Cn TopOpen fld w A B N + 1 2 w : A B y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y
357 355 353 356 sylancl φ w A B N + 1 2 w TopOpen fld 𝑡 A B Cn TopOpen fld w A B N + 1 2 w : A B y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y
358 352 357 mpbid φ w A B N + 1 2 w : A B y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y
359 358 simprd φ y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y
360 fveq2 y = Y TopOpen fld 𝑡 A B CnP TopOpen fld y = TopOpen fld 𝑡 A B CnP TopOpen fld Y
361 360 eleq2d y = Y w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld Y
362 361 rspccva y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld y Y A B w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld Y
363 359 9 362 syl2anc φ w A B N + 1 2 w TopOpen fld 𝑡 A B CnP TopOpen fld Y
364 334 363 eqeltrd φ w A B if w = Y N + 1 2 Y y A B Y N + 1 2 y w TopOpen fld 𝑡 A B CnP TopOpen fld Y
365 307 eqcomd φ A B = A B Y Y
366 365 oveq2d φ TopOpen fld 𝑡 A B = TopOpen fld 𝑡 A B Y Y
367 366 oveq1d φ TopOpen fld 𝑡 A B CnP TopOpen fld = TopOpen fld 𝑡 A B Y Y CnP TopOpen fld
368 367 fveq1d φ TopOpen fld 𝑡 A B CnP TopOpen fld Y = TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
369 364 368 eleqtrd φ w A B if w = Y N + 1 2 Y y A B Y N + 1 2 y w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
370 308 369 eqeltrd φ w A B Y Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
371 eqid TopOpen fld 𝑡 A B Y Y = TopOpen fld 𝑡 A B Y Y
372 eqid w A B Y Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w = w A B Y Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w
373 208 210 fmptd φ y A B Y N + 1 2 y : A B Y
374 15 41 sstrdi φ A B Y
375 371 56 372 373 374 264 ellimc φ N + 1 2 Y y A B Y N + 1 2 y lim Y w A B Y Y if w = Y N + 1 2 Y y A B Y N + 1 2 y w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
376 370 375 mpbird φ N + 1 2 Y y A B Y N + 1 2 y lim Y
377 135 a1i φ 2 0
378 240 a1i φ π 0
379 155 157 377 378 mulne0d φ 2 π 0
380 264 158 379 divcan1d φ Y 2 π 2 π = Y
381 380 eqcomd φ Y = Y 2 π 2 π
382 381 oveq2d φ N + 1 2 Y = N + 1 2 Y 2 π 2 π
383 382 fveq2d φ sin N + 1 2 Y = sin N + 1 2 Y 2 π 2 π
384 264 158 379 divcld φ Y 2 π
385 46 384 158 mul12d φ N + 1 2 Y 2 π 2 π = Y 2 π N + 1 2 2 π
386 46 155 157 mulassd φ N + 1 2 2 π = N + 1 2 2 π
387 386 eqcomd φ N + 1 2 2 π = N + 1 2 2 π
388 387 oveq2d φ Y 2 π N + 1 2 2 π = Y 2 π N + 1 2 2 π
389 43 45 155 adddird φ N + 1 2 2 = N 2 + 1 2 2
390 155 377 recid2d φ 1 2 2 = 1
391 390 oveq2d φ N 2 + 1 2 2 = N 2 + 1
392 389 391 eqtrd φ N + 1 2 2 = N 2 + 1
393 392 oveq1d φ N + 1 2 2 π = N 2 + 1 π
394 393 oveq2d φ Y 2 π N + 1 2 2 π = Y 2 π N 2 + 1 π
395 385 388 394 3eqtrd φ N + 1 2 Y 2 π 2 π = Y 2 π N 2 + 1 π
396 43 155 mulcld φ N 2
397 1cnd φ 1
398 396 397 addcld φ N 2 + 1
399 384 398 157 mulassd φ Y 2 π N 2 + 1 π = Y 2 π N 2 + 1 π
400 395 399 eqtr4d φ N + 1 2 Y 2 π 2 π = Y 2 π N 2 + 1 π
401 400 fveq2d φ sin N + 1 2 Y 2 π 2 π = sin Y 2 π N 2 + 1 π
402 mod0 Y 2 π + Y mod 2 π = 0 Y 2 π
403 62 254 402 sylancl φ Y mod 2 π = 0 Y 2 π
404 10 403 mpbid φ Y 2 π
405 8 nnzd φ N
406 2z 2
407 406 a1i φ 2
408 405 407 zmulcld φ N 2
409 408 peano2zd φ N 2 + 1
410 404 409 zmulcld φ Y 2 π N 2 + 1
411 sinkpi Y 2 π N 2 + 1 sin Y 2 π N 2 + 1 π = 0
412 410 411 syl φ sin Y 2 π N 2 + 1 π = 0
413 383 401 412 3eqtrd φ sin N + 1 2 Y = 0
414 sincn sin : cn
415 414 a1i φ sin : cn
416 415 286 cnlimci φ sin N + 1 2 Y sin lim N + 1 2 Y
417 413 416 eqeltrrd φ 0 sin lim N + 1 2 Y
418 301 376 417 limccog φ 0 sin y A B Y N + 1 2 y lim Y
419 2 a1i φ w A B Y F = y A B Y sin N + 1 2 y
420 215 fveq2d φ w A B Y y = w sin N + 1 2 y = sin N + 1 2 w
421 225 sincld φ w A B Y sin N + 1 2 w
422 419 420 216 421 fvmptd φ w A B Y F w = sin N + 1 2 w
423 226 fveq2d φ w A B Y sin y A B Y N + 1 2 y w = sin N + 1 2 w
424 422 423 eqtr4d φ w A B Y F w = sin y A B Y N + 1 2 y w
425 424 mpteq2dva φ w A B Y F w = w A B Y sin y A B Y N + 1 2 y w
426 24 feqmptd φ F = w A B Y F w
427 fcompt sin : y A B Y N + 1 2 y : A B Y sin y A B Y N + 1 2 y = w A B Y sin y A B Y N + 1 2 y w
428 293 373 427 sylancr φ sin y A B Y N + 1 2 y = w A B Y sin y A B Y N + 1 2 y w
429 425 426 428 3eqtr4rd φ sin y A B Y N + 1 2 y = F
430 429 oveq1d φ sin y A B Y N + 1 2 y lim Y = F lim Y
431 418 430 eleqtrd φ 0 F lim Y
432 simpr φ w A B w = Y w = Y
433 432 iftrued φ w A B w = Y if w = Y 0 G w = 0
434 264 155 158 377 379 divdiv32d φ Y 2 2 π = Y 2 π 2
435 434 oveq1d φ Y 2 2 π 2 π = Y 2 π 2 2 π
436 264 halfcld φ Y 2
437 436 158 379 divcan1d φ Y 2 2 π 2 π = Y 2
438 384 155 158 377 div32d φ Y 2 π 2 2 π = Y 2 π 2 π 2
439 157 155 377 divcan3d φ 2 π 2 = π
440 439 oveq2d φ Y 2 π 2 π 2 = Y 2 π π
441 438 440 eqtrd φ Y 2 π 2 2 π = Y 2 π π
442 435 437 441 3eqtr3d φ Y 2 = Y 2 π π
443 442 fveq2d φ sin Y 2 = sin Y 2 π π
444 sinkpi Y 2 π sin Y 2 π π = 0
445 404 444 syl φ sin Y 2 π π = 0
446 443 445 eqtrd φ sin Y 2 = 0
447 446 oveq2d φ 2 π sin Y 2 = 2 π 0
448 158 mul01d φ 2 π 0 = 0
449 447 448 eqtrd φ 2 π sin Y 2 = 0
450 449 eqcomd φ 0 = 2 π sin Y 2
451 450 ad2antrr φ w A B w = Y 0 = 2 π sin Y 2
452 fvoveq1 w = Y sin w 2 = sin Y 2
453 452 oveq2d w = Y 2 π sin w 2 = 2 π sin Y 2
454 453 eqcomd w = Y 2 π sin Y 2 = 2 π sin w 2
455 454 adantl φ w A B w = Y 2 π sin Y 2 = 2 π sin w 2
456 433 451 455 3eqtrd φ w A B w = Y if w = Y 0 G w = 2 π sin w 2
457 iffalse ¬ w = Y if w = Y 0 G w = G w
458 457 adantl φ w A B ¬ w = Y if w = Y 0 G w = G w
459 fvoveq1 y = w sin y 2 = sin w 2
460 459 oveq2d y = w 2 π sin y 2 = 2 π sin w 2
461 121 a1i φ w A B 2 π
462 328 halfcld φ w A B w 2
463 462 sincld φ w A B sin w 2
464 461 463 mulcld φ w A B 2 π sin w 2
465 464 adantr φ w A B ¬ w = Y 2 π sin w 2
466 3 460 324 465 fvmptd3 φ w A B ¬ w = Y G w = 2 π sin w 2
467 458 466 eqtrd φ w A B ¬ w = Y if w = Y 0 G w = 2 π sin w 2
468 456 467 pm2.61dan φ w A B if w = Y 0 G w = 2 π sin w 2
469 468 mpteq2dva φ w A B if w = Y 0 G w = w A B 2 π sin w 2
470 eqid w 2 π sin w 2 = w 2 π sin w 2
471 80 158 80 constcncfg φ w 2 π : cn
472 id w w
473 2cnd w 2
474 135 a1i w 2 0
475 472 473 474 divrec2d w w 2 = 1 2 w
476 475 mpteq2ia w w 2 = w 1 2 w
477 eqid w 1 2 w = w 1 2 w
478 477 mulc1cncf 1 2 w 1 2 w : cn
479 44 478 ax-mp w 1 2 w : cn
480 476 479 eqeltri w w 2 : cn
481 480 a1i φ w w 2 : cn
482 415 481 cncfmpt1f φ w sin w 2 : cn
483 471 482 mulcncf φ w 2 π sin w 2 : cn
484 470 483 349 80 464 cncfmptssg φ w A B 2 π sin w 2 : A B cn
485 eqid TopOpen fld 𝑡 A B = TopOpen fld 𝑡 A B
486 56 485 345 cncfcn A B A B cn = TopOpen fld 𝑡 A B Cn TopOpen fld
487 349 79 486 sylancl φ A B cn = TopOpen fld 𝑡 A B Cn TopOpen fld
488 484 487 eleqtrd φ w A B 2 π sin w 2 TopOpen fld 𝑡 A B Cn TopOpen fld
489 cncnp TopOpen fld 𝑡 A B TopOn A B TopOpen fld TopOn w A B 2 π sin w 2 TopOpen fld 𝑡 A B Cn TopOpen fld w A B 2 π sin w 2 : A B y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y
490 355 353 489 sylancl φ w A B 2 π sin w 2 TopOpen fld 𝑡 A B Cn TopOpen fld w A B 2 π sin w 2 : A B y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y
491 488 490 mpbid φ w A B 2 π sin w 2 : A B y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y
492 491 simprd φ y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y
493 360 eleq2d y = Y w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld Y
494 493 rspccva y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld y Y A B w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld Y
495 492 9 494 syl2anc φ w A B 2 π sin w 2 TopOpen fld 𝑡 A B CnP TopOpen fld Y
496 469 495 eqeltrd φ w A B if w = Y 0 G w TopOpen fld 𝑡 A B CnP TopOpen fld Y
497 307 mpteq1d φ w A B Y Y if w = Y 0 G w = w A B if w = Y 0 G w
498 366 eqcomd φ TopOpen fld 𝑡 A B Y Y = TopOpen fld 𝑡 A B
499 498 oveq1d φ TopOpen fld 𝑡 A B Y Y CnP TopOpen fld = TopOpen fld 𝑡 A B CnP TopOpen fld
500 499 fveq1d φ TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y = TopOpen fld 𝑡 A B CnP TopOpen fld Y
501 496 497 500 3eltr4d φ w A B Y Y if w = Y 0 G w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
502 eqid w A B Y Y if w = Y 0 G w = w A B Y Y if w = Y 0 G w
503 21 125 syldan φ y A B Y 2 π sin y 2
504 503 3 fmptd φ G : A B Y
505 371 56 502 504 374 264 ellimc φ 0 G lim Y w A B Y Y if w = Y 0 G w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
506 501 505 mpbird φ 0 G lim Y
507 257 nrexdv φ ¬ y A B Y y mod 2 π = 0
508 504 ffund φ Fun G
509 fvelima Fun G 0 G A B Y y A B Y G y = 0
510 508 509 sylan φ 0 G A B Y y A B Y G y = 0
511 2cnd φ y A B Y 2
512 156 a1i φ y A B Y π
513 135 a1i φ y A B Y 2 0
514 240 a1i φ y A B Y π 0
515 109 511 512 513 514 divdiv1d φ y A B Y y 2 π = y 2 π
516 515 eqcomd φ y A B Y y 2 π = y 2 π
517 516 adantr φ y A B Y G y = 0 y 2 π = y 2 π
518 2cnd y A B Y G y = 0 2
519 156 a1i y A B Y G y = 0 π
520 518 519 mulcld y A B Y G y = 0 2 π
521 234 adantr y A B Y G y = 0 y
522 521 halfcld y A B Y G y = 0 y 2
523 522 sincld y A B Y G y = 0 sin y 2
524 520 523 mulcld y A B Y G y = 0 2 π sin y 2
525 3 fvmpt2 y A B Y 2 π sin y 2 G y = 2 π sin y 2
526 524 525 syldan y A B Y G y = 0 G y = 2 π sin y 2
527 526 eqcomd y A B Y G y = 0 2 π sin y 2 = G y
528 simpr y A B Y G y = 0 G y = 0
529 527 528 eqtrd y A B Y G y = 0 2 π sin y 2 = 0
530 121 a1i y A B Y 2 π
531 234 halfcld y A B Y y 2
532 531 sincld y A B Y sin y 2
533 530 532 mul0ord y A B Y 2 π sin y 2 = 0 2 π = 0 sin y 2 = 0
534 533 adantr y A B Y G y = 0 2 π sin y 2 = 0 2 π = 0 sin y 2 = 0
535 529 534 mpbid y A B Y G y = 0 2 π = 0 sin y 2 = 0
536 2cnne0 2 2 0
537 156 240 pm3.2i π π 0
538 mulne0 2 2 0 π π 0 2 π 0
539 536 537 538 mp2an 2 π 0
540 539 neii ¬ 2 π = 0
541 pm2.53 2 π = 0 sin y 2 = 0 ¬ 2 π = 0 sin y 2 = 0
542 535 540 541 mpisyl y A B Y G y = 0 sin y 2 = 0
543 542 adantll φ y A B Y G y = 0 sin y 2 = 0
544 109 adantr φ y A B Y G y = 0 y
545 544 halfcld φ y A B Y G y = 0 y 2
546 545 247 syl φ y A B Y G y = 0 sin y 2 = 0 y 2 π
547 543 546 mpbid φ y A B Y G y = 0 y 2 π
548 517 547 eqeltrd φ y A B Y G y = 0 y 2 π
549 21 adantr φ y A B Y G y = 0 y
550 549 254 255 sylancl φ y A B Y G y = 0 y mod 2 π = 0 y 2 π
551 548 550 mpbird φ y A B Y G y = 0 y mod 2 π = 0
552 551 ex φ y A B Y G y = 0 y mod 2 π = 0
553 552 reximdva φ y A B Y G y = 0 y A B Y y mod 2 π = 0
554 553 adantr φ 0 G A B Y y A B Y G y = 0 y A B Y y mod 2 π = 0
555 510 554 mpd φ 0 G A B Y y A B Y y mod 2 π = 0
556 507 555 mtand φ ¬ 0 G A B Y
557 simpr φ y A B Y y A B Y
558 6 fvmpt2 y A B Y π cos y 2 I y = π cos y 2
559 557 203 558 syl2anc φ y A B Y I y = π cos y 2
560 531 coscld y A B Y cos y 2
561 560 adantl φ y A B Y cos y 2
562 512 561 514 11 mulne0d φ y A B Y π cos y 2 0
563 559 562 eqnetrd φ y A B Y I y 0
564 563 neneqd φ y A B Y ¬ I y = 0
565 564 nrexdv φ ¬ y A B Y I y = 0
566 203 6 fmptd φ I : A B Y
567 566 ffund φ Fun I
568 fvelima Fun I 0 I A B Y y A B Y I y = 0
569 567 568 sylan φ 0 I A B Y y A B Y I y = 0
570 565 569 mtand φ ¬ 0 I A B Y
571 201 imaeq1d φ G A B Y = I A B Y
572 570 571 neleqtrrd φ ¬ 0 G A B Y
573 1 dirkerval2 N Y D N Y = if Y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 Y 2 π sin Y 2
574 8 62 573 syl2anc φ D N Y = if Y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 Y 2 π sin Y 2
575 10 iftrued φ if Y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 Y 2 π sin Y 2 = 2 N + 1 2 π
576 7 a1i φ L = w A B N + 1 2 cos N + 1 2 w π cos w 2
577 iftrue w = Y if w = Y 2 N + 1 2 π y A B Y H y I y w = 2 N + 1 2 π
578 577 adantl φ w A B w = Y if w = Y 2 N + 1 2 π y A B Y H y I y w = 2 N + 1 2 π
579 155 43 mulcld φ 2 N
580 579 397 addcld φ 2 N + 1
581 580 155 157 377 378 divdiv1d φ 2 N + 1 2 π = 2 N + 1 2 π
582 581 eqcomd φ 2 N + 1 2 π = 2 N + 1 2 π
583 579 397 155 377 divdird φ 2 N + 1 2 = 2 N 2 + 1 2
584 43 155 377 divcan3d φ 2 N 2 = N
585 584 oveq1d φ 2 N 2 + 1 2 = N + 1 2
586 583 585 eqtrd φ 2 N + 1 2 = N + 1 2
587 586 oveq1d φ 2 N + 1 2 π = N + 1 2 π
588 582 587 eqtrd φ 2 N + 1 2 π = N + 1 2 π
589 588 ad2antrr φ w A B w = Y 2 N + 1 2 π = N + 1 2 π
590 310 fveq2d w = Y cos N + 1 2 w = cos N + 1 2 Y
591 590 oveq2d w = Y N + 1 2 cos N + 1 2 w = N + 1 2 cos N + 1 2 Y
592 fvoveq1 w = Y cos w 2 = cos Y 2
593 592 oveq2d w = Y π cos w 2 = π cos Y 2
594 591 593 oveq12d w = Y N + 1 2 cos N + 1 2 w π cos w 2 = N + 1 2 cos N + 1 2 Y π cos Y 2
595 594 adantl φ w A B w = Y N + 1 2 cos N + 1 2 w π cos w 2 = N + 1 2 cos N + 1 2 Y π cos Y 2
596 43 45 264 adddird φ N + 1 2 Y = N Y + 1 2 Y
597 397 155 264 377 div32d φ 1 2 Y = 1 Y 2
598 436 mullidd φ 1 Y 2 = Y 2
599 597 598 eqtrd φ 1 2 Y = Y 2
600 599 oveq2d φ N Y + 1 2 Y = N Y + Y 2
601 43 264 mulcld φ N Y
602 601 436 addcomd φ N Y + Y 2 = Y 2 + N Y
603 596 600 602 3eqtrd φ N + 1 2 Y = Y 2 + N Y
604 603 fveq2d φ cos N + 1 2 Y = cos Y 2 + N Y
605 601 158 379 divcan1d φ N Y 2 π 2 π = N Y
606 605 eqcomd φ N Y = N Y 2 π 2 π
607 606 oveq2d φ Y 2 + N Y = Y 2 + N Y 2 π 2 π
608 607 fveq2d φ cos Y 2 + N Y = cos Y 2 + N Y 2 π 2 π
609 43 264 158 379 divassd φ N Y 2 π = N Y 2 π
610 405 404 zmulcld φ N Y 2 π
611 609 610 eqeltrd φ N Y 2 π
612 cosper Y 2 N Y 2 π cos Y 2 + N Y 2 π 2 π = cos Y 2
613 436 611 612 syl2anc φ cos Y 2 + N Y 2 π 2 π = cos Y 2
614 604 608 613 3eqtrd φ cos N + 1 2 Y = cos Y 2
615 614 oveq2d φ N + 1 2 cos N + 1 2 Y = N + 1 2 cos Y 2
616 615 oveq1d φ N + 1 2 cos N + 1 2 Y π cos Y 2 = N + 1 2 cos Y 2 π cos Y 2
617 436 coscld φ cos Y 2
618 264 155 157 377 378 divdiv1d φ Y 2 π = Y 2 π
619 618 404 eqeltrd φ Y 2 π
620 619 zred φ Y 2 π
621 620 273 ltaddrpd φ Y 2 π < Y 2 π + 1 2
622 halflt1 1 2 < 1
623 622 a1i φ 1 2 < 1
624 269 268 620 623 ltadd2dd φ Y 2 π + 1 2 < Y 2 π + 1
625 btwnnz Y 2 π Y 2 π < Y 2 π + 1 2 Y 2 π + 1 2 < Y 2 π + 1 ¬ Y 2 π + 1 2
626 619 621 624 625 syl3anc φ ¬ Y 2 π + 1 2
627 coseq0 Y 2 cos Y 2 = 0 Y 2 π + 1 2
628 436 627 syl φ cos Y 2 = 0 Y 2 π + 1 2
629 626 628 mtbird φ ¬ cos Y 2 = 0
630 629 neqned φ cos Y 2 0
631 46 157 617 378 630 divcan5rd φ N + 1 2 cos Y 2 π cos Y 2 = N + 1 2 π
632 616 631 eqtrd φ N + 1 2 cos N + 1 2 Y π cos Y 2 = N + 1 2 π
633 632 ad2antrr φ w A B w = Y N + 1 2 cos N + 1 2 Y π cos Y 2 = N + 1 2 π
634 595 633 eqtr2d φ w A B w = Y N + 1 2 π = N + 1 2 cos N + 1 2 w π cos w 2
635 578 589 634 3eqtrrd φ w A B w = Y N + 1 2 cos N + 1 2 w π cos w 2 = if w = Y 2 N + 1 2 π y A B Y H y I y w
636 iffalse ¬ w = Y if w = Y 2 N + 1 2 π y A B Y H y I y w = y A B Y H y I y w
637 636 adantl φ w A B ¬ w = Y if w = Y 2 N + 1 2 π y A B Y H y I y w = y A B Y H y I y w
638 eqidd φ w A B ¬ w = Y y A B Y H y I y = y A B Y H y I y
639 fveq2 y = w H y = H w
640 fveq2 y = w I y = I w
641 639 640 oveq12d y = w H y I y = H w I w
642 641 adantl φ w A B ¬ w = Y y = w H y I y = H w I w
643 110 5 fmptd φ H : A B Y
644 643 ad2antrr φ w A B ¬ w = Y H : A B Y
645 644 324 ffvelcdmd φ w A B ¬ w = Y H w
646 566 ad2antrr φ w A B ¬ w = Y I : A B Y
647 646 324 ffvelcdmd φ w A B ¬ w = Y I w
648 6 a1i φ w A B ¬ w = Y I = y A B Y π cos y 2
649 simpr φ w A B ¬ w = Y y = w y = w
650 649 fvoveq1d φ w A B ¬ w = Y y = w cos y 2 = cos w 2
651 650 oveq2d φ w A B ¬ w = Y y = w π cos y 2 = π cos w 2
652 156 a1i w A B π
653 327 halfcld w A B w 2
654 653 coscld w A B cos w 2
655 652 654 mulcld w A B π cos w 2
656 655 ad2antlr φ w A B ¬ w = Y π cos w 2
657 648 651 324 656 fvmptd φ w A B ¬ w = Y I w = π cos w 2
658 537 a1i φ w A B ¬ w = Y π π 0
659 654 ad2antlr φ w A B ¬ w = Y cos w 2
660 simpll φ w A B ¬ w = Y φ
661 fvoveq1 y = w cos y 2 = cos w 2
662 661 neeq1d y = w cos y 2 0 cos w 2 0
663 228 662 imbi12d y = w φ y A B Y cos y 2 0 φ w A B Y cos w 2 0
664 663 11 chvarvv φ w A B Y cos w 2 0
665 660 324 664 syl2anc φ w A B ¬ w = Y cos w 2 0
666 mulne0 π π 0 cos w 2 cos w 2 0 π cos w 2 0
667 658 659 665 666 syl12anc φ w A B ¬ w = Y π cos w 2 0
668 657 667 eqnetrd φ w A B ¬ w = Y I w 0
669 645 647 668 divcld φ w A B ¬ w = Y H w I w
670 638 642 324 669 fvmptd φ w A B ¬ w = Y y A B Y H y I y w = H w I w
671 5 a1i φ w A B ¬ w = Y H = y A B Y N + 1 2 cos N + 1 2 y
672 317 fveq2d φ w A B ¬ w = Y y = w cos N + 1 2 y = cos N + 1 2 w
673 672 oveq2d φ w A B ¬ w = Y y = w N + 1 2 cos N + 1 2 y = N + 1 2 cos N + 1 2 w
674 329 coscld φ w A B cos N + 1 2 w
675 325 674 mulcld φ w A B N + 1 2 cos N + 1 2 w
676 675 adantr φ w A B ¬ w = Y N + 1 2 cos N + 1 2 w
677 671 673 324 676 fvmptd φ w A B ¬ w = Y H w = N + 1 2 cos N + 1 2 w
678 677 657 oveq12d φ w A B ¬ w = Y H w I w = N + 1 2 cos N + 1 2 w π cos w 2
679 637 670 678 3eqtrrd φ w A B ¬ w = Y N + 1 2 cos N + 1 2 w π cos w 2 = if w = Y 2 N + 1 2 π y A B Y H y I y w
680 635 679 pm2.61dan φ w A B N + 1 2 cos N + 1 2 w π cos w 2 = if w = Y 2 N + 1 2 π y A B Y H y I y w
681 680 mpteq2dva φ w A B N + 1 2 cos N + 1 2 w π cos w 2 = w A B if w = Y 2 N + 1 2 π y A B Y H y I y w
682 576 681 eqtr2d φ w A B if w = Y 2 N + 1 2 π y A B Y H y I y w = L
683 349 46 80 constcncfg φ w A B N + 1 2 : A B cn
684 cosf cos :
685 233 49 sylan2 φ y A B N + 1 2 y
686 eqid y A B N + 1 2 y = y A B N + 1 2 y
687 685 686 fmptd φ y A B N + 1 2 y : A B
688 fcompt cos : y A B N + 1 2 y : A B cos y A B N + 1 2 y = w A B cos y A B N + 1 2 y w
689 684 687 688 sylancr φ cos y A B N + 1 2 y = w A B cos y A B N + 1 2 y w
690 eqidd φ w A B y A B N + 1 2 y = y A B N + 1 2 y
691 316 adantl φ w A B y = w N + 1 2 y = N + 1 2 w
692 simpr φ w A B w A B
693 690 691 692 329 fvmptd φ w A B y A B N + 1 2 y w = N + 1 2 w
694 693 fveq2d φ w A B cos y A B N + 1 2 y w = cos N + 1 2 w
695 694 mpteq2dva φ w A B cos y A B N + 1 2 y w = w A B cos N + 1 2 w
696 689 695 eqtr2d φ w A B cos N + 1 2 w = cos y A B N + 1 2 y
697 349 46 80 constcncfg φ y A B N + 1 2 : A B cn
698 349 80 idcncfg φ y A B y : A B cn
699 697 698 mulcncf φ y A B N + 1 2 y : A B cn
700 coscn cos : cn
701 700 a1i φ cos : cn
702 699 701 cncfco φ cos y A B N + 1 2 y : A B cn
703 696 702 eqeltrd φ w A B cos N + 1 2 w : A B cn
704 683 703 mulcncf φ w A B N + 1 2 cos N + 1 2 w : A B cn
705 eqid w A B π cos w 2 = w A B π cos w 2
706 349 157 80 constcncfg φ w A B π : A B cn
707 2cnd φ w A B 2
708 135 a1i φ w A B 2 0
709 328 707 708 divrecd φ w A B w 2 = w 1 2
710 709 mpteq2dva φ w A B w 2 = w A B w 1 2
711 eqid w w 1 2 = w w 1 2
712 cncfmptid w w : cn
713 79 79 712 mp2an w w : cn
714 713 a1i φ w w : cn
715 79 a1i 1 2
716 id 1 2 1 2
717 715 716 715 constcncfg 1 2 w 1 2 : cn
718 44 717 mp1i φ w 1 2 : cn
719 714 718 mulcncf φ w w 1 2 : cn
720 709 462 eqeltrrd φ w A B w 1 2
721 711 719 349 80 720 cncfmptssg φ w A B w 1 2 : A B cn
722 710 721 eqeltrd φ w A B w 2 : A B cn
723 701 722 cncfmpt1f φ w A B cos w 2 : A B cn
724 706 723 mulcncf φ w A B π cos w 2 : A B cn
725 ssid A B A B
726 725 a1i φ A B A B
727 difssd φ 0
728 655 adantl φ w A B π cos w 2
729 156 a1i φ w A B π
730 654 adantl φ w A B cos w 2
731 240 a1i φ w A B π 0
732 592 adantl φ w = Y cos w 2 = cos Y 2
733 630 adantr φ w = Y cos Y 2 0
734 732 733 eqnetrd φ w = Y cos w 2 0
735 734 adantlr φ w A B w = Y cos w 2 0
736 735 665 pm2.61dan φ w A B cos w 2 0
737 729 730 731 736 mulne0d φ w A B π cos w 2 0
738 737 neneqd φ w A B ¬ π cos w 2 = 0
739 elsng π cos w 2 π cos w 2 0 π cos w 2 = 0
740 728 739 syl φ w A B π cos w 2 0 π cos w 2 = 0
741 738 740 mtbird φ w A B ¬ π cos w 2 0
742 728 741 eldifd φ w A B π cos w 2 0
743 705 724 726 727 742 cncfmptssg φ w A B π cos w 2 : A B cn 0
744 704 743 divcncf φ w A B N + 1 2 cos N + 1 2 w π cos w 2 : A B cn
745 744 487 eleqtrd φ w A B N + 1 2 cos N + 1 2 w π cos w 2 TopOpen fld 𝑡 A B Cn TopOpen fld
746 576 745 eqeltrd φ L TopOpen fld 𝑡 A B Cn TopOpen fld
747 cncnp TopOpen fld 𝑡 A B TopOn A B TopOpen fld TopOn L TopOpen fld 𝑡 A B Cn TopOpen fld L : A B y A B L TopOpen fld 𝑡 A B CnP TopOpen fld y
748 355 353 747 sylancl φ L TopOpen fld 𝑡 A B Cn TopOpen fld L : A B y A B L TopOpen fld 𝑡 A B CnP TopOpen fld y
749 746 748 mpbid φ L : A B y A B L TopOpen fld 𝑡 A B CnP TopOpen fld y
750 749 simprd φ y A B L TopOpen fld 𝑡 A B CnP TopOpen fld y
751 360 eleq2d y = Y L TopOpen fld 𝑡 A B CnP TopOpen fld y L TopOpen fld 𝑡 A B CnP TopOpen fld Y
752 751 rspccva y A B L TopOpen fld 𝑡 A B CnP TopOpen fld y Y A B L TopOpen fld 𝑡 A B CnP TopOpen fld Y
753 750 9 752 syl2anc φ L TopOpen fld 𝑡 A B CnP TopOpen fld Y
754 682 753 eqeltrd φ w A B if w = Y 2 N + 1 2 π y A B Y H y I y w TopOpen fld 𝑡 A B CnP TopOpen fld Y
755 307 mpteq1d φ w A B Y Y if w = Y 2 N + 1 2 π y A B Y H y I y w = w A B if w = Y 2 N + 1 2 π y A B Y H y I y w
756 754 755 500 3eltr4d φ w A B Y Y if w = Y 2 N + 1 2 π y A B Y H y I y w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
757 eqid w A B Y Y if w = Y 2 N + 1 2 π y A B Y H y I y w = w A B Y Y if w = Y 2 N + 1 2 π y A B Y H y I y w
758 5 fvmpt2 y A B Y N + 1 2 cos N + 1 2 y H y = N + 1 2 cos N + 1 2 y
759 557 110 758 syl2anc φ y A B Y H y = N + 1 2 cos N + 1 2 y
760 759 559 oveq12d φ y A B Y H y I y = N + 1 2 cos N + 1 2 y π cos y 2
761 110 203 562 divcld φ y A B Y N + 1 2 cos N + 1 2 y π cos y 2
762 760 761 eqeltrd φ y A B Y H y I y
763 eqid y A B Y H y I y = y A B Y H y I y
764 762 763 fmptd φ y A B Y H y I y : A B Y
765 371 56 757 764 374 264 ellimc φ 2 N + 1 2 π y A B Y H y I y lim Y w A B Y Y if w = Y 2 N + 1 2 π y A B Y H y I y w TopOpen fld 𝑡 A B Y Y CnP TopOpen fld Y
766 756 765 mpbird φ 2 N + 1 2 π y A B Y H y I y lim Y
767 107 eqcomd φ H = D F
768 767 fveq1d φ H y = F y
769 201 eqcomd φ I = D G
770 769 fveq1d φ I y = G y
771 768 770 oveq12d φ H y I y = F y G y
772 771 mpteq2dv φ y A B Y H y I y = y A B Y F y G y
773 772 oveq1d φ y A B Y H y I y lim Y = y A B Y F y G y lim Y
774 766 773 eleqtrd φ 2 N + 1 2 π y A B Y F y G y lim Y
775 575 774 eqeltrd φ if Y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 Y 2 π sin Y 2 y A B Y F y G y lim Y
776 574 775 eqeltrd φ D N Y y A B Y F y G y lim Y
777 15 24 30 32 9 33 114 207 431 506 556 572 776 lhop φ D N Y y A B Y F y G y lim Y
778 1 dirkerval N D N = y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2
779 8 778 syl φ D N = y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2
780 779 reseq1d φ D N A B Y = y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2 A B Y
781 15 resmptd φ y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2 A B Y = y A B Y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2
782 257 iffalsed φ y A B Y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2 = sin N + 1 2 y 2 π sin y 2
783 23 recnd φ y A B Y sin N + 1 2 y
784 2 fvmpt2 y A B Y sin N + 1 2 y F y = sin N + 1 2 y
785 557 783 784 syl2anc φ y A B Y F y = sin N + 1 2 y
786 557 503 525 syl2anc φ y A B Y G y = 2 π sin y 2
787 785 786 oveq12d φ y A B Y F y G y = sin N + 1 2 y 2 π sin y 2
788 782 787 eqtr4d φ y A B Y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2 = F y G y
789 788 mpteq2dva φ y A B Y if y mod 2 π = 0 2 N + 1 2 π sin N + 1 2 y 2 π sin y 2 = y A B Y F y G y
790 780 781 789 3eqtrrd φ y A B Y F y G y = D N A B Y
791 790 oveq1d φ y A B Y F y G y lim Y = D N A B Y lim Y
792 777 791 eleqtrd φ D N Y D N A B Y lim Y