Metamath Proof Explorer


Theorem fourierdlem22

Description: The coefficients of the fourier series are integrable and reals. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses fourierdlem22.f φ F :
fourierdlem22.c C = π π
fourierdlem22.fibl φ F C 𝐿 1
fourierdlem22.a A = n 0 C F x cos n x dx π
fourierdlem22.b B = n C F x sin n x dx π
Assertion fourierdlem22 φ n 0 A n n B n

Proof

Step Hyp Ref Expression
1 fourierdlem22.f φ F :
2 fourierdlem22.c C = π π
3 fourierdlem22.fibl φ F C 𝐿 1
4 fourierdlem22.a A = n 0 C F x cos n x dx π
5 fourierdlem22.b B = n C F x sin n x dx π
6 1 adantr φ x C F :
7 ioossre π π
8 id x C x C
9 8 2 eleqtrdi x C x π π
10 7 9 sselid x C x
11 10 adantl φ x C x
12 6 11 ffvelrnd φ x C F x
13 12 adantlr φ n 0 x C F x
14 nn0re n 0 n
15 14 adantr n 0 x C n
16 10 adantl n 0 x C x
17 15 16 remulcld n 0 x C n x
18 17 recoscld n 0 x C cos n x
19 18 adantll φ n 0 x C cos n x
20 13 19 remulcld φ n 0 x C F x cos n x
21 ioombl π π dom vol
22 2 21 eqeltri C dom vol
23 22 a1i φ n 0 C dom vol
24 eqidd φ n 0 x C cos n x = x C cos n x
25 eqidd φ n 0 x C F x = x C F x
26 23 19 13 24 25 offval2 φ n 0 x C cos n x × f x C F x = x C cos n x F x
27 19 recnd φ n 0 x C cos n x
28 13 recnd φ n 0 x C F x
29 27 28 mulcomd φ n 0 x C cos n x F x = F x cos n x
30 29 mpteq2dva φ n 0 x C cos n x F x = x C F x cos n x
31 26 30 eqtr2d φ n 0 x C F x cos n x = x C cos n x × f x C F x
32 coscn cos : cn
33 32 a1i n 0 cos : cn
34 2 7 eqsstri C
35 ax-resscn
36 34 35 sstri C
37 36 a1i n 0 C
38 14 recnd n 0 n
39 ssid
40 39 a1i n 0
41 37 38 40 constcncfg n 0 x C n : C cn
42 cncfmptid C x C x : C cn
43 36 39 42 mp2an x C x : C cn
44 43 a1i n 0 x C x : C cn
45 41 44 mulcncf n 0 x C n x : C cn
46 33 45 cncfmpt1f n 0 x C cos n x : C cn
47 cnmbf C dom vol x C cos n x : C cn x C cos n x MblFn
48 22 46 47 sylancr n 0 x C cos n x MblFn
49 48 adantl φ n 0 x C cos n x MblFn
50 1 feqmptd φ F = x F x
51 50 reseq1d φ F C = x F x C
52 resmpt C x F x C = x C F x
53 34 52 mp1i φ x F x C = x C F x
54 51 53 eqtr2d φ x C F x = F C
55 54 3 eqeltrd φ x C F x 𝐿 1
56 55 adantr φ n 0 x C F x 𝐿 1
57 1re 1
58 simpr n 0 y dom x C cos n x y dom x C cos n x
59 nfv x n 0
60 nfmpt1 _ x x C cos n x
61 60 nfdm _ x dom x C cos n x
62 61 nfcri x y dom x C cos n x
63 59 62 nfan x n 0 y dom x C cos n x
64 18 ex n 0 x C cos n x
65 64 adantr n 0 y dom x C cos n x x C cos n x
66 63 65 ralrimi n 0 y dom x C cos n x x C cos n x
67 dmmptg x C cos n x dom x C cos n x = C
68 66 67 syl n 0 y dom x C cos n x dom x C cos n x = C
69 58 68 eleqtrd n 0 y dom x C cos n x y C
70 eqidd n 0 y C x C cos n x = x C cos n x
71 oveq2 x = y n x = n y
72 71 fveq2d x = y cos n x = cos n y
73 72 adantl n 0 y C x = y cos n x = cos n y
74 simpr n 0 y C y C
75 14 adantr n 0 y C n
76 34 74 sselid n 0 y C y
77 75 76 remulcld n 0 y C n y
78 77 recoscld n 0 y C cos n y
79 70 73 74 78 fvmptd n 0 y C x C cos n x y = cos n y
80 79 fveq2d n 0 y C x C cos n x y = cos n y
81 abscosbd n y cos n y 1
82 77 81 syl n 0 y C cos n y 1
83 80 82 eqbrtrd n 0 y C x C cos n x y 1
84 69 83 syldan n 0 y dom x C cos n x x C cos n x y 1
85 84 ralrimiva n 0 y dom x C cos n x x C cos n x y 1
86 breq2 b = 1 x C cos n x y b x C cos n x y 1
87 86 ralbidv b = 1 y dom x C cos n x x C cos n x y b y dom x C cos n x x C cos n x y 1
88 87 rspcev 1 y dom x C cos n x x C cos n x y 1 b y dom x C cos n x x C cos n x y b
89 57 85 88 sylancr n 0 b y dom x C cos n x x C cos n x y b
90 89 adantl φ n 0 b y dom x C cos n x x C cos n x y b
91 bddmulibl x C cos n x MblFn x C F x 𝐿 1 b y dom x C cos n x x C cos n x y b x C cos n x × f x C F x 𝐿 1
92 49 56 90 91 syl3anc φ n 0 x C cos n x × f x C F x 𝐿 1
93 31 92 eqeltrd φ n 0 x C F x cos n x 𝐿 1
94 20 93 itgrecl φ n 0 C F x cos n x dx
95 pire π
96 95 a1i φ n 0 π
97 0re 0
98 pipos 0 < π
99 97 98 gtneii π 0
100 99 a1i φ n 0 π 0
101 94 96 100 redivcld φ n 0 C F x cos n x dx π
102 101 4 fmptd φ A : 0
103 102 ffvelrnda φ n 0 A n
104 103 ex φ n 0 A n
105 nnnn0 n n 0
106 17 resincld n 0 x C sin n x
107 106 adantll φ n 0 x C sin n x
108 13 107 remulcld φ n 0 x C F x sin n x
109 eqidd φ n 0 x C sin n x = x C sin n x
110 23 107 13 109 25 offval2 φ n 0 x C sin n x × f x C F x = x C sin n x F x
111 107 recnd φ n 0 x C sin n x
112 111 28 mulcomd φ n 0 x C sin n x F x = F x sin n x
113 112 mpteq2dva φ n 0 x C sin n x F x = x C F x sin n x
114 110 113 eqtr2d φ n 0 x C F x sin n x = x C sin n x × f x C F x
115 sincn sin : cn
116 115 a1i φ n 0 sin : cn
117 45 adantl φ n 0 x C n x : C cn
118 116 117 cncfmpt1f φ n 0 x C sin n x : C cn
119 cnmbf C dom vol x C sin n x : C cn x C sin n x MblFn
120 22 118 119 sylancr φ n 0 x C sin n x MblFn
121 simpr n 0 y dom x C sin n x y dom x C sin n x
122 nfmpt1 _ x x C sin n x
123 122 nfdm _ x dom x C sin n x
124 123 nfcri x y dom x C sin n x
125 59 124 nfan x n 0 y dom x C sin n x
126 106 ex n 0 x C sin n x
127 126 adantr n 0 y dom x C sin n x x C sin n x
128 125 127 ralrimi n 0 y dom x C sin n x x C sin n x
129 dmmptg x C sin n x dom x C sin n x = C
130 128 129 syl n 0 y dom x C sin n x dom x C sin n x = C
131 121 130 eleqtrd n 0 y dom x C sin n x y C
132 eqidd n 0 y C x C sin n x = x C sin n x
133 71 fveq2d x = y sin n x = sin n y
134 133 adantl n 0 y C x = y sin n x = sin n y
135 77 resincld n 0 y C sin n y
136 132 134 74 135 fvmptd n 0 y C x C sin n x y = sin n y
137 136 fveq2d n 0 y C x C sin n x y = sin n y
138 abssinbd n y sin n y 1
139 77 138 syl n 0 y C sin n y 1
140 137 139 eqbrtrd n 0 y C x C sin n x y 1
141 131 140 syldan n 0 y dom x C sin n x x C sin n x y 1
142 141 ralrimiva n 0 y dom x C sin n x x C sin n x y 1
143 breq2 b = 1 x C sin n x y b x C sin n x y 1
144 143 ralbidv b = 1 y dom x C sin n x x C sin n x y b y dom x C sin n x x C sin n x y 1
145 144 rspcev 1 y dom x C sin n x x C sin n x y 1 b y dom x C sin n x x C sin n x y b
146 57 142 145 sylancr n 0 b y dom x C sin n x x C sin n x y b
147 146 adantl φ n 0 b y dom x C sin n x x C sin n x y b
148 bddmulibl x C sin n x MblFn x C F x 𝐿 1 b y dom x C sin n x x C sin n x y b x C sin n x × f x C F x 𝐿 1
149 120 56 147 148 syl3anc φ n 0 x C sin n x × f x C F x 𝐿 1
150 114 149 eqeltrd φ n 0 x C F x sin n x 𝐿 1
151 108 150 itgrecl φ n 0 C F x sin n x dx
152 105 151 sylan2 φ n C F x sin n x dx
153 95 a1i φ n π
154 99 a1i φ n π 0
155 152 153 154 redivcld φ n C F x sin n x dx π
156 155 5 fmptd φ B :
157 156 ffvelrnda φ n B n
158 157 ex φ n B n
159 104 158 jca φ n 0 A n n B n