Metamath Proof Explorer


Theorem fourierdlem101

Description: Integral by substitution for a piecewise continuous function. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses fourierdlem101.d D = n s if s mod 2 π = 0 2 n + 1 2 π sin n + 1 2 s 2 π sin s 2
fourierdlem101.p P = m p 0 m | p 0 = π p m = π i 0 ..^ m p i < p i + 1
fourierdlem101.g G = t π π F t D N t X
fourierdlem101.q φ Q P M
fourierdlem101.6 φ M
fourierdlem101.n φ N
fourierdlem101.x φ X
fourierdlem101.f φ F : π π
fourierdlem101.fcn φ i 0 ..^ M F Q i Q i + 1 : Q i Q i + 1 cn
fourierdlem101.r φ i 0 ..^ M R F Q i Q i + 1 lim Q i
fourierdlem101.l φ i 0 ..^ M L F Q i Q i + 1 lim Q i + 1
Assertion fourierdlem101 φ π π F t D N t X dt = - π - X π X F X + s D N s ds

Proof

Step Hyp Ref Expression
1 fourierdlem101.d D = n s if s mod 2 π = 0 2 n + 1 2 π sin n + 1 2 s 2 π sin s 2
2 fourierdlem101.p P = m p 0 m | p 0 = π p m = π i 0 ..^ m p i < p i + 1
3 fourierdlem101.g G = t π π F t D N t X
4 fourierdlem101.q φ Q P M
5 fourierdlem101.6 φ M
6 fourierdlem101.n φ N
7 fourierdlem101.x φ X
8 fourierdlem101.f φ F : π π
9 fourierdlem101.fcn φ i 0 ..^ M F Q i Q i + 1 : Q i Q i + 1 cn
10 fourierdlem101.r φ i 0 ..^ M R F Q i Q i + 1 lim Q i
11 fourierdlem101.l φ i 0 ..^ M L F Q i Q i + 1 lim Q i + 1
12 simpr φ t π π t π π
13 8 ffvelcdmda φ t π π F t
14 6 adantr φ t π π N
15 pire π
16 15 renegcli π
17 eliccre π π t π π t
18 16 15 17 mp3an12 t π π t
19 18 adantl φ t π π t
20 7 adantr φ t π π X
21 19 20 resubcld φ t π π t X
22 1 dirkerre N t X D N t X
23 14 21 22 syl2anc φ t π π D N t X
24 23 recnd φ t π π D N t X
25 13 24 mulcld φ t π π F t D N t X
26 3 fvmpt2 t π π F t D N t X G t = F t D N t X
27 12 25 26 syl2anc φ t π π G t = F t D N t X
28 27 eqcomd φ t π π F t D N t X = G t
29 28 itgeq2dv φ π π F t D N t X dt = π π G t dt
30 fveq2 j = i Q j = Q i
31 30 oveq1d j = i Q j X = Q i X
32 31 cbvmptv j 0 M Q j X = i 0 M Q i X
33 25 3 fmptd φ G : π π
34 3 reseq1i G Q i Q i + 1 = t π π F t D N t X Q i Q i + 1
35 ioossicc Q i Q i + 1 Q i Q i + 1
36 16 a1i φ π
37 36 rexrd φ π *
38 37 adantr φ i 0 ..^ M π *
39 15 a1i φ π
40 39 rexrd φ π *
41 40 adantr φ i 0 ..^ M π *
42 2 5 4 fourierdlem15 φ Q : 0 M π π
43 42 adantr φ i 0 ..^ M Q : 0 M π π
44 simpr φ i 0 ..^ M i 0 ..^ M
45 38 41 43 44 fourierdlem8 φ i 0 ..^ M Q i Q i + 1 π π
46 35 45 sstrid φ i 0 ..^ M Q i Q i + 1 π π
47 46 resmptd φ i 0 ..^ M t π π F t D N t X Q i Q i + 1 = t Q i Q i + 1 F t D N t X
48 34 47 eqtrid φ i 0 ..^ M G Q i Q i + 1 = t Q i Q i + 1 F t D N t X
49 8 adantr φ i 0 ..^ M F : π π
50 49 46 feqresmpt φ i 0 ..^ M F Q i Q i + 1 = t Q i Q i + 1 F t
51 50 9 eqeltrrd φ i 0 ..^ M t Q i Q i + 1 F t : Q i Q i + 1 cn
52 eqidd φ i 0 ..^ M r Q i Q i + 1 s D N s = s D N s
53 simpr φ i 0 ..^ M r Q i Q i + 1 s = t Q i Q i + 1 t X r s = t Q i Q i + 1 t X r
54 eqidd φ i 0 ..^ M r Q i Q i + 1 t Q i Q i + 1 t X = t Q i Q i + 1 t X
55 oveq1 t = r t X = r X
56 55 adantl φ i 0 ..^ M r Q i Q i + 1 t = r t X = r X
57 simpr φ i 0 ..^ M r Q i Q i + 1 r Q i Q i + 1
58 elioore r Q i Q i + 1 r
59 58 adantl φ r Q i Q i + 1 r
60 7 adantr φ r Q i Q i + 1 X
61 59 60 resubcld φ r Q i Q i + 1 r X
62 61 adantlr φ i 0 ..^ M r Q i Q i + 1 r X
63 54 56 57 62 fvmptd φ i 0 ..^ M r Q i Q i + 1 t Q i Q i + 1 t X r = r X
64 63 adantr φ i 0 ..^ M r Q i Q i + 1 s = t Q i Q i + 1 t X r t Q i Q i + 1 t X r = r X
65 53 64 eqtrd φ i 0 ..^ M r Q i Q i + 1 s = t Q i Q i + 1 t X r s = r X
66 65 fveq2d φ i 0 ..^ M r Q i Q i + 1 s = t Q i Q i + 1 t X r D N s = D N r X
67 elioore t Q i Q i + 1 t
68 67 adantl φ t Q i Q i + 1 t
69 7 adantr φ t Q i Q i + 1 X
70 68 69 resubcld φ t Q i Q i + 1 t X
71 70 adantlr φ i 0 ..^ M t Q i Q i + 1 t X
72 eqid t Q i Q i + 1 t X = t Q i Q i + 1 t X
73 71 72 fmptd φ i 0 ..^ M t Q i Q i + 1 t X : Q i Q i + 1
74 73 ffvelcdmda φ i 0 ..^ M r Q i Q i + 1 t Q i Q i + 1 t X r
75 6 ad2antrr φ i 0 ..^ M r Q i Q i + 1 N
76 1 dirkerre N r X D N r X
77 75 62 76 syl2anc φ i 0 ..^ M r Q i Q i + 1 D N r X
78 52 66 74 77 fvmptd φ i 0 ..^ M r Q i Q i + 1 s D N s t Q i Q i + 1 t X r = D N r X
79 78 eqcomd φ i 0 ..^ M r Q i Q i + 1 D N r X = s D N s t Q i Q i + 1 t X r
80 79 mpteq2dva φ i 0 ..^ M r Q i Q i + 1 D N r X = r Q i Q i + 1 s D N s t Q i Q i + 1 t X r
81 55 fveq2d t = r D N t X = D N r X
82 81 cbvmptv t Q i Q i + 1 D N t X = r Q i Q i + 1 D N r X
83 82 a1i φ i 0 ..^ M t Q i Q i + 1 D N t X = r Q i Q i + 1 D N r X
84 1 dirkerre N s D N s
85 6 84 sylan φ s D N s
86 eqid s D N s = s D N s
87 85 86 fmptd φ s D N s :
88 87 adantr φ i 0 ..^ M s D N s :
89 fcompt s D N s : t Q i Q i + 1 t X : Q i Q i + 1 s D N s t Q i Q i + 1 t X = r Q i Q i + 1 s D N s t Q i Q i + 1 t X r
90 88 73 89 syl2anc φ i 0 ..^ M s D N s t Q i Q i + 1 t X = r Q i Q i + 1 s D N s t Q i Q i + 1 t X r
91 80 83 90 3eqtr4d φ i 0 ..^ M t Q i Q i + 1 D N t X = s D N s t Q i Q i + 1 t X
92 eqid t t X = t t X
93 simpr φ t t
94 7 recnd φ X
95 94 adantr φ t X
96 93 95 negsubd φ t t + X = t X
97 96 eqcomd φ t t X = t + X
98 97 mpteq2dva φ t t X = t t + X
99 94 negcld φ X
100 eqid t t + X = t t + X
101 100 addccncf X t t + X : cn
102 99 101 syl φ t t + X : cn
103 98 102 eqeltrd φ t t X : cn
104 103 adantr φ i 0 ..^ M t t X : cn
105 ioossre Q i Q i + 1
106 ax-resscn
107 105 106 sstri Q i Q i + 1
108 107 a1i φ i 0 ..^ M Q i Q i + 1
109 106 a1i φ i 0 ..^ M
110 92 104 108 109 71 cncfmptssg φ i 0 ..^ M t Q i Q i + 1 t X : Q i Q i + 1 cn
111 85 recnd φ s D N s
112 111 86 fmptd φ s D N s :
113 ssid
114 1 dirkerf N D N :
115 6 114 syl φ D N :
116 115 feqmptd φ D N = s D N s
117 1 dirkercncf N D N : cn
118 6 117 syl φ D N : cn
119 116 118 eqeltrrd φ s D N s : cn
120 cncfcdm s D N s : cn s D N s : cn s D N s :
121 113 119 120 sylancr φ s D N s : cn s D N s :
122 112 121 mpbird φ s D N s : cn
123 122 adantr φ i 0 ..^ M s D N s : cn
124 110 123 cncfco φ i 0 ..^ M s D N s t Q i Q i + 1 t X : Q i Q i + 1 cn
125 91 124 eqeltrd φ i 0 ..^ M t Q i Q i + 1 D N t X : Q i Q i + 1 cn
126 51 125 mulcncf φ i 0 ..^ M t Q i Q i + 1 F t D N t X : Q i Q i + 1 cn
127 48 126 eqeltrd φ i 0 ..^ M G Q i Q i + 1 : Q i Q i + 1 cn
128 cncff F Q i Q i + 1 : Q i Q i + 1 cn F Q i Q i + 1 : Q i Q i + 1
129 9 128 syl φ i 0 ..^ M F Q i Q i + 1 : Q i Q i + 1
130 115 adantr φ s Q i Q i + 1 D N :
131 elioore s Q i Q i + 1 s
132 131 adantl φ s Q i Q i + 1 s
133 7 adantr φ s Q i Q i + 1 X
134 132 133 resubcld φ s Q i Q i + 1 s X
135 130 134 ffvelcdmd φ s Q i Q i + 1 D N s X
136 135 recnd φ s Q i Q i + 1 D N s X
137 eqid s Q i Q i + 1 D N s X = s Q i Q i + 1 D N s X
138 136 137 fmptd φ s Q i Q i + 1 D N s X : Q i Q i + 1
139 138 adantr φ i 0 ..^ M s Q i Q i + 1 D N s X : Q i Q i + 1
140 eqid t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t = t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t
141 oveq1 t = Q i t X = Q i X
142 141 fveq2d t = Q i D N t X = D N Q i X
143 142 eqcomd t = Q i D N Q i X = D N t X
144 143 adantl φ i 0 ..^ M t Q i Q i + 1 Q i t = Q i D N Q i X = D N t X
145 eqidd φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i s Q i Q i + 1 D N s X = s Q i Q i + 1 D N s X
146 oveq1 s = t s X = t X
147 146 fveq2d s = t D N s X = D N t X
148 147 adantl φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i s = t D N s X = D N t X
149 velsn t Q i t = Q i
150 149 notbii ¬ t Q i ¬ t = Q i
151 elunnel2 t Q i Q i + 1 Q i ¬ t Q i t Q i Q i + 1
152 150 151 sylan2br t Q i Q i + 1 Q i ¬ t = Q i t Q i Q i + 1
153 152 adantll φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i t Q i Q i + 1
154 115 ad2antrr φ i 0 ..^ M t Q i Q i + 1 Q i D N :
155 simpr φ i 0 ..^ M t = Q i t = Q i
156 18 ssriv π π
157 fzossfz 0 ..^ M 0 M
158 157 44 sselid φ i 0 ..^ M i 0 M
159 43 158 ffvelcdmd φ i 0 ..^ M Q i π π
160 156 159 sselid φ i 0 ..^ M Q i
161 160 adantr φ i 0 ..^ M t = Q i Q i
162 155 161 eqeltrd φ i 0 ..^ M t = Q i t
163 162 adantlr φ i 0 ..^ M t Q i Q i + 1 Q i t = Q i t
164 153 67 syl φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i t
165 163 164 pm2.61dan φ i 0 ..^ M t Q i Q i + 1 Q i t
166 7 ad2antrr φ i 0 ..^ M t Q i Q i + 1 Q i X
167 165 166 resubcld φ i 0 ..^ M t Q i Q i + 1 Q i t X
168 154 167 ffvelcdmd φ i 0 ..^ M t Q i Q i + 1 Q i D N t X
169 168 adantr φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i D N t X
170 145 148 153 169 fvmptd φ i 0 ..^ M t Q i Q i + 1 Q i ¬ t = Q i s Q i Q i + 1 D N s X t = D N t X
171 144 170 ifeqda φ i 0 ..^ M t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t = D N t X
172 171 mpteq2dva φ i 0 ..^ M t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t = t Q i Q i + 1 Q i D N t X
173 115 adantr φ i 0 ..^ M D N :
174 elun s Q i Q i + 1 Q i s Q i Q i + 1 s Q i
175 174 bilani φ i 0 ..^ M s Q i Q i + 1 Q i s Q i Q i + 1 s Q i
176 elsni s Q i s = Q i
177 176 adantl φ i 0 ..^ M s Q i s = Q i
178 160 adantr φ i 0 ..^ M s Q i Q i
179 177 178 eqeltrd φ i 0 ..^ M s Q i s
180 179 ex φ i 0 ..^ M s Q i s
181 180 adantr φ i 0 ..^ M s Q i Q i + 1 Q i s Q i s
182 pm3.44 s Q i Q i + 1 s s Q i s s Q i Q i + 1 s Q i s
183 131 181 182 sylancr φ i 0 ..^ M s Q i Q i + 1 Q i s Q i Q i + 1 s Q i s
184 175 183 mpd φ i 0 ..^ M s Q i Q i + 1 Q i s
185 7 ad2antrr φ i 0 ..^ M s Q i Q i + 1 Q i X
186 184 185 resubcld φ i 0 ..^ M s Q i Q i + 1 Q i s X
187 eqid s Q i Q i + 1 Q i s X = s Q i Q i + 1 Q i s X
188 186 187 fmptd φ i 0 ..^ M s Q i Q i + 1 Q i s X : Q i Q i + 1 Q i
189 fcompt D N : s Q i Q i + 1 Q i s X : Q i Q i + 1 Q i D N s Q i Q i + 1 Q i s X = t Q i Q i + 1 Q i D N s Q i Q i + 1 Q i s X t
190 173 188 189 syl2anc φ i 0 ..^ M D N s Q i Q i + 1 Q i s X = t Q i Q i + 1 Q i D N s Q i Q i + 1 Q i s X t
191 eqidd φ i 0 ..^ M t Q i Q i + 1 Q i s Q i Q i + 1 Q i s X = s Q i Q i + 1 Q i s X
192 146 adantl φ i 0 ..^ M t Q i Q i + 1 Q i s = t s X = t X
193 simpr φ i 0 ..^ M t Q i Q i + 1 Q i t Q i Q i + 1 Q i
194 191 192 193 167 fvmptd φ i 0 ..^ M t Q i Q i + 1 Q i s Q i Q i + 1 Q i s X t = t X
195 194 fveq2d φ i 0 ..^ M t Q i Q i + 1 Q i D N s Q i Q i + 1 Q i s X t = D N t X
196 195 mpteq2dva φ i 0 ..^ M t Q i Q i + 1 Q i D N s Q i Q i + 1 Q i s X t = t Q i Q i + 1 Q i D N t X
197 190 196 eqtr2d φ i 0 ..^ M t Q i Q i + 1 Q i D N t X = D N s Q i Q i + 1 Q i s X
198 eqid s s X = s s X
199 simpr φ s s
200 94 adantr φ s X
201 199 200 negsubd φ s s + X = s X
202 201 eqcomd φ s s X = s + X
203 202 mpteq2dva φ s s X = s s + X
204 eqid s s + X = s s + X
205 204 addccncf X s s + X : cn
206 99 205 syl φ s s + X : cn
207 203 206 eqeltrd φ s s X : cn
208 207 adantr φ i 0 ..^ M s s X : cn
209 160 recnd φ i 0 ..^ M Q i
210 209 snssd φ i 0 ..^ M Q i
211 108 210 unssd φ i 0 ..^ M Q i Q i + 1 Q i
212 198 208 211 109 186 cncfmptssg φ i 0 ..^ M s Q i Q i + 1 Q i s X : Q i Q i + 1 Q i cn
213 116 122 eqeltrd φ D N : cn
214 213 adantr φ i 0 ..^ M D N : cn
215 212 214 cncfco φ i 0 ..^ M D N s Q i Q i + 1 Q i s X : Q i Q i + 1 Q i cn
216 eqid TopOpen fld = TopOpen fld
217 eqid TopOpen fld 𝑡 Q i Q i + 1 Q i = TopOpen fld 𝑡 Q i Q i + 1 Q i
218 216 cnfldtop TopOpen fld Top
219 unicntop = TopOpen fld
220 219 restid TopOpen fld Top TopOpen fld 𝑡 = TopOpen fld
221 218 220 ax-mp TopOpen fld 𝑡 = TopOpen fld
222 221 eqcomi TopOpen fld = TopOpen fld 𝑡
223 216 217 222 cncfcn Q i Q i + 1 Q i Q i Q i + 1 Q i cn = TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld
224 211 113 223 sylancl φ i 0 ..^ M Q i Q i + 1 Q i cn = TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld
225 215 224 eleqtrd φ i 0 ..^ M D N s Q i Q i + 1 Q i s X TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld
226 197 225 eqeltrd φ i 0 ..^ M t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld
227 216 cnfldtopon TopOpen fld TopOn
228 resttopon TopOpen fld TopOn Q i Q i + 1 Q i TopOpen fld 𝑡 Q i Q i + 1 Q i TopOn Q i Q i + 1 Q i
229 227 211 228 sylancr φ i 0 ..^ M TopOpen fld 𝑡 Q i Q i + 1 Q i TopOn Q i Q i + 1 Q i
230 cncnp TopOpen fld 𝑡 Q i Q i + 1 Q i TopOn Q i Q i + 1 Q i TopOpen fld TopOn t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld t Q i Q i + 1 Q i D N t X : Q i Q i + 1 Q i s Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s
231 229 227 230 sylancl φ i 0 ..^ M t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i Cn TopOpen fld t Q i Q i + 1 Q i D N t X : Q i Q i + 1 Q i s Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s
232 226 231 mpbid φ i 0 ..^ M t Q i Q i + 1 Q i D N t X : Q i Q i + 1 Q i s Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s
233 232 simprd φ i 0 ..^ M s Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s
234 eqidd φ i 0 ..^ M Q i = Q i
235 elsng Q i Q i Q i Q i = Q i
236 160 235 syl φ i 0 ..^ M Q i Q i Q i = Q i
237 234 236 mpbird φ i 0 ..^ M Q i Q i
238 237 olcd φ i 0 ..^ M Q i Q i Q i + 1 Q i Q i
239 elun Q i Q i Q i + 1 Q i Q i Q i Q i + 1 Q i Q i
240 238 239 sylibr φ i 0 ..^ M Q i Q i Q i + 1 Q i
241 fveq2 s = Q i TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s = TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
242 241 eleq2d s = Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
243 242 rspccva s Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld s Q i Q i Q i + 1 Q i t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
244 233 240 243 syl2anc φ i 0 ..^ M t Q i Q i + 1 Q i D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
245 172 244 eqeltrd φ i 0 ..^ M t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
246 eqid t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t = t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t
247 217 216 246 139 108 209 ellimc φ i 0 ..^ M D N Q i X s Q i Q i + 1 D N s X lim Q i t Q i Q i + 1 Q i if t = Q i D N Q i X s Q i Q i + 1 D N s X t TopOpen fld 𝑡 Q i Q i + 1 Q i CnP TopOpen fld Q i
248 245 247 mpbird φ i 0 ..^ M D N Q i X s Q i Q i + 1 D N s X lim Q i
249 129 139 140 10 248 mullimcf φ i 0 ..^ M R D N Q i X t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t lim Q i
250 fvres t Q i Q i + 1 F Q i Q i + 1 t = F t
251 250 adantl φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t = F t
252 251 oveq1d φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t = F t s Q i Q i + 1 D N s X t
253 252 mpteq2dva φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t = t Q i Q i + 1 F t s Q i Q i + 1 D N s X t
254 253 oveq1d φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t lim Q i = t Q i Q i + 1 F t s Q i Q i + 1 D N s X t lim Q i
255 249 254 eleqtrd φ i 0 ..^ M R D N Q i X t Q i Q i + 1 F t s Q i Q i + 1 D N s X t lim Q i
256 eqidd φ i 0 ..^ M t Q i Q i + 1 s Q i Q i + 1 D N s X = s Q i Q i + 1 D N s X
257 simpr φ i 0 ..^ M t Q i Q i + 1 s = t s = t
258 257 oveq1d φ i 0 ..^ M t Q i Q i + 1 s = t s X = t X
259 258 fveq2d φ i 0 ..^ M t Q i Q i + 1 s = t D N s X = D N t X
260 simpr φ i 0 ..^ M t Q i Q i + 1 t Q i Q i + 1
261 115 ad2antrr φ i 0 ..^ M t Q i Q i + 1 D N :
262 261 71 ffvelcdmd φ i 0 ..^ M t Q i Q i + 1 D N t X
263 256 259 260 262 fvmptd φ i 0 ..^ M t Q i Q i + 1 s Q i Q i + 1 D N s X t = D N t X
264 263 oveq2d φ i 0 ..^ M t Q i Q i + 1 F t s Q i Q i + 1 D N s X t = F t D N t X
265 264 mpteq2dva φ i 0 ..^ M t Q i Q i + 1 F t s Q i Q i + 1 D N s X t = t Q i Q i + 1 F t D N t X
266 265 oveq1d φ i 0 ..^ M t Q i Q i + 1 F t s Q i Q i + 1 D N s X t lim Q i = t Q i Q i + 1 F t D N t X lim Q i
267 255 266 eleqtrd φ i 0 ..^ M R D N Q i X t Q i Q i + 1 F t D N t X lim Q i
268 48 eqcomd φ i 0 ..^ M t Q i Q i + 1 F t D N t X = G Q i Q i + 1
269 268 oveq1d φ i 0 ..^ M t Q i Q i + 1 F t D N t X lim Q i = G Q i Q i + 1 lim Q i
270 267 269 eleqtrd φ i 0 ..^ M R D N Q i X G Q i Q i + 1 lim Q i
271 iftrue t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = D N Q i + 1 X
272 oveq1 t = Q i + 1 t X = Q i + 1 X
273 272 eqcomd t = Q i + 1 Q i + 1 X = t X
274 273 fveq2d t = Q i + 1 D N Q i + 1 X = D N t X
275 271 274 eqtrd t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = D N t X
276 275 adantl φ i 0 ..^ M t Q i Q i + 1 Q i + 1 t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = D N t X
277 iffalse ¬ t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = s Q i Q i + 1 D N s X t
278 277 adantl φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = s Q i Q i + 1 D N s X t
279 eqidd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 s Q i Q i + 1 D N s X = s Q i Q i + 1 D N s X
280 147 adantl φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 s = t D N s X = D N t X
281 elun t Q i Q i + 1 Q i + 1 t Q i Q i + 1 t Q i + 1
282 281 biimpi t Q i Q i + 1 Q i + 1 t Q i Q i + 1 t Q i + 1
283 282 orcomd t Q i Q i + 1 Q i + 1 t Q i + 1 t Q i Q i + 1
284 283 ad2antlr φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 t Q i + 1 t Q i Q i + 1
285 velsn t Q i + 1 t = Q i + 1
286 285 notbii ¬ t Q i + 1 ¬ t = Q i + 1
287 286 bilanri φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 ¬ t Q i + 1
288 pm2.53 t Q i + 1 t Q i Q i + 1 ¬ t Q i + 1 t Q i Q i + 1
289 284 287 288 sylc φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 t Q i Q i + 1
290 173 ad2antrr φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 D N :
291 289 67 syl φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 t
292 7 ad3antrrr φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 X
293 291 292 resubcld φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 t X
294 290 293 ffvelcdmd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 D N t X
295 279 280 289 294 fvmptd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 s Q i Q i + 1 D N s X t = D N t X
296 278 295 eqtrd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 ¬ t = Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = D N t X
297 276 296 pm2.61dan φ i 0 ..^ M t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = D N t X
298 297 mpteq2dva φ i 0 ..^ M t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = t Q i Q i + 1 Q i + 1 D N t X
299 eqid t D N t X = t D N t X
300 106 a1i φ
301 simpr φ t t
302 7 adantr φ t X
303 301 302 resubcld φ t t X
304 92 103 300 300 303 cncfmptssg φ t t X : cn
305 304 213 cncfcompt φ t D N t X : cn
306 305 adantr φ i 0 ..^ M t D N t X : cn
307 105 a1i φ i 0 ..^ M Q i Q i + 1
308 fzofzp1 i 0 ..^ M i + 1 0 M
309 308 adantl φ i 0 ..^ M i + 1 0 M
310 43 309 ffvelcdmd φ i 0 ..^ M Q i + 1 π π
311 156 310 sselid φ i 0 ..^ M Q i + 1
312 311 snssd φ i 0 ..^ M Q i + 1
313 307 312 unssd φ i 0 ..^ M Q i Q i + 1 Q i + 1
314 113 a1i φ i 0 ..^ M
315 173 adantr φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N :
316 313 sselda φ i 0 ..^ M t Q i Q i + 1 Q i + 1 t
317 7 ad2antrr φ i 0 ..^ M t Q i Q i + 1 Q i + 1 X
318 316 317 resubcld φ i 0 ..^ M t Q i Q i + 1 Q i + 1 t X
319 315 318 ffvelcdmd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X
320 319 recnd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X
321 299 306 313 314 320 cncfmptssg φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X : Q i Q i + 1 Q i + 1 cn
322 156 106 sstri π π
323 322 310 sselid φ i 0 ..^ M Q i + 1
324 323 snssd φ i 0 ..^ M Q i + 1
325 108 324 unssd φ i 0 ..^ M Q i Q i + 1 Q i + 1
326 eqid TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 = TopOpen fld 𝑡 Q i Q i + 1 Q i + 1
327 216 326 222 cncfcn Q i Q i + 1 Q i + 1 Q i Q i + 1 Q i + 1 cn = TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 Cn TopOpen fld
328 325 113 327 sylancl φ i 0 ..^ M Q i Q i + 1 Q i + 1 cn = TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 Cn TopOpen fld
329 321 328 eleqtrd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 Cn TopOpen fld
330 resttopon TopOpen fld TopOn Q i Q i + 1 Q i + 1 TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 TopOn Q i Q i + 1 Q i + 1
331 227 325 330 sylancr φ i 0 ..^ M TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 TopOn Q i Q i + 1 Q i + 1
332 cncnp TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 TopOn Q i Q i + 1 Q i + 1 TopOpen fld TopOn t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 Cn TopOpen fld t Q i Q i + 1 Q i + 1 D N t X : Q i Q i + 1 Q i + 1 s Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s
333 331 227 332 sylancl φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 Cn TopOpen fld t Q i Q i + 1 Q i + 1 D N t X : Q i Q i + 1 Q i + 1 s Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s
334 329 333 mpbid φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X : Q i Q i + 1 Q i + 1 s Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s
335 334 simprd φ i 0 ..^ M s Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s
336 eqidd φ i 0 ..^ M Q i + 1 = Q i + 1
337 elsng Q i + 1 Q i + 1 Q i + 1 Q i + 1 = Q i + 1
338 311 337 syl φ i 0 ..^ M Q i + 1 Q i + 1 Q i + 1 = Q i + 1
339 336 338 mpbird φ i 0 ..^ M Q i + 1 Q i + 1
340 339 olcd φ i 0 ..^ M Q i + 1 Q i Q i + 1 Q i + 1 Q i + 1
341 elun Q i + 1 Q i Q i + 1 Q i + 1 Q i + 1 Q i Q i + 1 Q i + 1 Q i + 1
342 340 341 sylibr φ i 0 ..^ M Q i + 1 Q i Q i + 1 Q i + 1
343 fveq2 s = Q i + 1 TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s = TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
344 343 eleq2d s = Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
345 344 rspccva s Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld s Q i + 1 Q i Q i + 1 Q i + 1 t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
346 335 342 345 syl2anc φ i 0 ..^ M t Q i Q i + 1 Q i + 1 D N t X TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
347 298 346 eqeltrd φ i 0 ..^ M t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
348 eqid t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t = t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t
349 326 216 348 139 108 323 ellimc φ i 0 ..^ M D N Q i + 1 X s Q i Q i + 1 D N s X lim Q i + 1 t Q i Q i + 1 Q i + 1 if t = Q i + 1 D N Q i + 1 X s Q i Q i + 1 D N s X t TopOpen fld 𝑡 Q i Q i + 1 Q i + 1 CnP TopOpen fld Q i + 1
350 347 349 mpbird φ i 0 ..^ M D N Q i + 1 X s Q i Q i + 1 D N s X lim Q i + 1
351 129 139 140 11 350 mullimcf φ i 0 ..^ M L D N Q i + 1 X t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t lim Q i + 1
352 265 253 48 3eqtr4d φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t = G Q i Q i + 1
353 352 oveq1d φ i 0 ..^ M t Q i Q i + 1 F Q i Q i + 1 t s Q i Q i + 1 D N s X t lim Q i + 1 = G Q i Q i + 1 lim Q i + 1
354 351 353 eleqtrd φ i 0 ..^ M L D N Q i + 1 X G Q i Q i + 1 lim Q i + 1
355 2 32 5 4 7 33 127 270 354 fourierdlem93 φ π π G t dt = - π - X π X G X + s ds
356 3 a1i φ s - π - X π X G = t π π F t D N t X
357 fveq2 t = X + s F t = F X + s
358 357 oveq1d t = X + s F t D N t X = F X + s D N t X
359 358 adantl φ s - π - X π X t = X + s F t D N t X = F X + s D N t X
360 oveq1 t = X + s t X = X + s - X
361 94 adantr φ s - π - X π X X
362 36 7 resubcld φ - π - X
363 362 adantr φ s - π - X π X - π - X
364 39 7 resubcld φ π X
365 364 adantr φ s - π - X π X π X
366 simpr φ s - π - X π X s - π - X π X
367 eliccre - π - X π X s - π - X π X s
368 363 365 366 367 syl3anc φ s - π - X π X s
369 368 recnd φ s - π - X π X s
370 361 369 pncan2d φ s - π - X π X X + s - X = s
371 360 370 sylan9eqr φ s - π - X π X t = X + s t X = s
372 371 fveq2d φ s - π - X π X t = X + s D N t X = D N s
373 372 oveq2d φ s - π - X π X t = X + s F X + s D N t X = F X + s D N s
374 359 373 eqtrd φ s - π - X π X t = X + s F t D N t X = F X + s D N s
375 16 a1i φ s - π - X π X π
376 15 a1i φ s - π - X π X π
377 7 adantr φ s - π - X π X X
378 377 368 readdcld φ s - π - X π X X + s
379 36 recnd φ π
380 94 379 pncan3d φ X + π - X = π
381 380 eqcomd φ π = X + π - X
382 381 adantr φ s - π - X π X π = X + π - X
383 elicc2 - π - X π X s - π - X π X s - π - X s s π X
384 363 365 383 syl2anc φ s - π - X π X s - π - X π X s - π - X s s π X
385 366 384 mpbid φ s - π - X π X s - π - X s s π X
386 385 simp2d φ s - π - X π X - π - X s
387 363 368 377 386 leadd2dd φ s - π - X π X X + π - X X + s
388 382 387 eqbrtrd φ s - π - X π X π X + s
389 385 simp3d φ s - π - X π X s π X
390 368 365 377 389 leadd2dd φ s - π - X π X X + s X + π - X
391 picn π
392 391 a1i φ s - π - X π X π
393 361 392 pncan3d φ s - π - X π X X + π - X = π
394 390 393 breqtrd φ s - π - X π X X + s π
395 375 376 378 388 394 eliccd φ s - π - X π X X + s π π
396 8 adantr φ s - π - X π X F : π π
397 396 395 ffvelcdmd φ s - π - X π X F X + s
398 368 111 syldan φ s - π - X π X D N s
399 397 398 mulcld φ s - π - X π X F X + s D N s
400 356 374 395 399 fvmptd φ s - π - X π X G X + s = F X + s D N s
401 400 itgeq2dv φ - π - X π X G X + s ds = - π - X π X F X + s D N s ds
402 29 355 401 3eqtrd φ π π F t D N t X dt = - π - X π X F X + s D N s ds