Step |
Hyp |
Ref |
Expression |
1 |
|
dirkertrigeqlem2.a |
|
2 |
|
dirkertrigeqlem2.sinne0 |
|
3 |
|
dirkertrigeqlem2.n |
|
4 |
|
1cnd |
|
5 |
4
|
halfcld |
|
6 |
|
fzfid |
|
7 |
|
elfzelz |
|
8 |
7
|
zcnd |
|
9 |
8
|
adantl |
|
10 |
1
|
recnd |
|
11 |
10
|
adantr |
|
12 |
9 11
|
mulcld |
|
13 |
12
|
coscld |
|
14 |
6 13
|
fsumcl |
|
15 |
5 14
|
addcld |
|
16 |
10
|
sincld |
|
17 |
15 16 2
|
divcan4d |
|
18 |
17
|
eqcomd |
|
19 |
6 16 13
|
fsummulc1 |
|
20 |
16
|
adantr |
|
21 |
13 20
|
mulcomd |
|
22 |
|
sinmulcos |
|
23 |
11 12 22
|
syl2anc |
|
24 |
|
1cnd |
|
25 |
9 24 11
|
adddird |
|
26 |
24 11
|
mulcld |
|
27 |
12 26
|
addcomd |
|
28 |
10
|
mulid2d |
|
29 |
28
|
oveq1d |
|
30 |
29
|
adantr |
|
31 |
25 27 30
|
3eqtrrd |
|
32 |
31
|
fveq2d |
|
33 |
12 11
|
negsubdi2d |
|
34 |
33
|
eqcomd |
|
35 |
34
|
fveq2d |
|
36 |
12 11
|
subcld |
|
37 |
|
sinneg |
|
38 |
36 37
|
syl |
|
39 |
35 38
|
eqtrd |
|
40 |
32 39
|
oveq12d |
|
41 |
11 12
|
addcld |
|
42 |
41
|
sincld |
|
43 |
32 42
|
eqeltrrd |
|
44 |
36
|
sincld |
|
45 |
43 44
|
negsubd |
|
46 |
9 11
|
mulsubfacd |
|
47 |
46
|
fveq2d |
|
48 |
47
|
oveq2d |
|
49 |
40 45 48
|
3eqtrd |
|
50 |
49
|
oveq1d |
|
51 |
21 23 50
|
3eqtrd |
|
52 |
51
|
sumeq2dv |
|
53 |
|
2cnd |
|
54 |
|
peano2cnm |
|
55 |
9 54
|
syl |
|
56 |
55 11
|
mulcld |
|
57 |
56
|
sincld |
|
58 |
43 57
|
subcld |
|
59 |
|
2ne0 |
|
60 |
59
|
a1i |
|
61 |
6 53 58 60
|
fsumdivc |
|
62 |
6 58
|
fsumcl |
|
63 |
62 53 60
|
divrec2d |
|
64 |
61 63
|
eqtr3d |
|
65 |
19 52 64
|
3eqtrd |
|
66 |
65
|
oveq2d |
|
67 |
5 14 16
|
adddird |
|
68 |
5 16 62
|
adddid |
|
69 |
66 67 68
|
3eqtr4d |
|
70 |
69
|
oveq1d |
|
71 |
12
|
sincld |
|
72 |
43 71 57
|
npncand |
|
73 |
72
|
eqcomd |
|
74 |
73
|
sumeq2dv |
|
75 |
43 71
|
subcld |
|
76 |
71 57
|
subcld |
|
77 |
6 75 76
|
fsumadd |
|
78 |
|
fvoveq1 |
|
79 |
|
fvoveq1 |
|
80 |
|
fvoveq1 |
|
81 |
|
fvoveq1 |
|
82 |
3
|
nnzd |
|
83 |
|
nnuz |
|
84 |
3 83
|
eleqtrdi |
|
85 |
|
peano2uz |
|
86 |
84 85
|
syl |
|
87 |
|
elfzelz |
|
88 |
87
|
zcnd |
|
89 |
88
|
adantl |
|
90 |
10
|
adantr |
|
91 |
89 90
|
mulcld |
|
92 |
91
|
sincld |
|
93 |
78 79 80 81 82 86 92
|
telfsum2 |
|
94 |
|
1cnd |
|
95 |
8 94
|
pncand |
|
96 |
95
|
eqcomd |
|
97 |
96
|
adantl |
|
98 |
97
|
fvoveq1d |
|
99 |
98
|
oveq1d |
|
100 |
99
|
sumeq2dv |
|
101 |
|
oveq1 |
|
102 |
101
|
fvoveq1d |
|
103 |
|
oveq1 |
|
104 |
103
|
fvoveq1d |
|
105 |
|
oveq1 |
|
106 |
105
|
fvoveq1d |
|
107 |
|
oveq1 |
|
108 |
107
|
fvoveq1d |
|
109 |
|
1cnd |
|
110 |
89 109
|
subcld |
|
111 |
110 90
|
mulcld |
|
112 |
111
|
sincld |
|
113 |
102 104 106 108 82 86 112
|
telfsum2 |
|
114 |
3
|
nnred |
|
115 |
114
|
recnd |
|
116 |
115 4
|
pncand |
|
117 |
116
|
fvoveq1d |
|
118 |
4
|
subidd |
|
119 |
118
|
oveq1d |
|
120 |
10
|
mul02d |
|
121 |
119 120
|
eqtrd |
|
122 |
121
|
fveq2d |
|
123 |
|
sin0 |
|
124 |
123
|
a1i |
|
125 |
122 124
|
eqtrd |
|
126 |
117 125
|
oveq12d |
|
127 |
100 113 126
|
3eqtrd |
|
128 |
93 127
|
oveq12d |
|
129 |
74 77 128
|
3eqtrd |
|
130 |
129
|
oveq2d |
|
131 |
28
|
fveq2d |
|
132 |
131
|
oveq2d |
|
133 |
132
|
oveq1d |
|
134 |
133
|
oveq2d |
|
135 |
115 4
|
addcld |
|
136 |
135 10
|
mulcld |
|
137 |
136
|
sincld |
|
138 |
137 16
|
subcld |
|
139 |
115 10
|
mulcld |
|
140 |
139
|
sincld |
|
141 |
|
0cnd |
|
142 |
140 141
|
subcld |
|
143 |
16 138 142
|
addassd |
|
144 |
143
|
eqcomd |
|
145 |
16 137
|
pncan3d |
|
146 |
140
|
subid1d |
|
147 |
145 146
|
oveq12d |
|
148 |
137 140
|
addcomd |
|
149 |
147 148
|
eqtrd |
|
150 |
134 144 149
|
3eqtrd |
|
151 |
130 150
|
eqtrd |
|
152 |
151
|
oveq2d |
|
153 |
152
|
oveq1d |
|
154 |
18 70 153
|
3eqtrd |
|
155 |
|
halfre |
|
156 |
155
|
a1i |
|
157 |
114 156
|
readdcld |
|
158 |
157 1
|
remulcld |
|
159 |
158
|
recnd |
|
160 |
5 10
|
mulcld |
|
161 |
|
sinmulcos |
|
162 |
159 160 161
|
syl2anc |
|
163 |
115 5 10
|
adddird |
|
164 |
163
|
oveq1d |
|
165 |
139 160 160
|
addassd |
|
166 |
5 5 10
|
adddird |
|
167 |
4
|
2halvesd |
|
168 |
167
|
oveq1d |
|
169 |
166 168
|
eqtr3d |
|
170 |
169
|
oveq2d |
|
171 |
115 4 10
|
adddird |
|
172 |
170 171
|
eqtr4d |
|
173 |
164 165 172
|
3eqtrrd |
|
174 |
173
|
fveq2d |
|
175 |
163
|
oveq1d |
|
176 |
139 160
|
pncand |
|
177 |
175 176
|
eqtr2d |
|
178 |
177
|
fveq2d |
|
179 |
174 178
|
oveq12d |
|
180 |
179
|
oveq1d |
|
181 |
162 180
|
eqtr4d |
|
182 |
148
|
oveq1d |
|
183 |
140 137
|
addcld |
|
184 |
183 53 60
|
divrec2d |
|
185 |
181 182 184
|
3eqtrrd |
|
186 |
185
|
oveq1d |
|
187 |
10 53 60
|
divcan2d |
|
188 |
187
|
eqcomd |
|
189 |
188
|
fveq2d |
|
190 |
10
|
halfcld |
|
191 |
|
sin2t |
|
192 |
190 191
|
syl |
|
193 |
189 192
|
eqtrd |
|
194 |
193
|
oveq2d |
|
195 |
190
|
sincld |
|
196 |
190
|
coscld |
|
197 |
53 195 196
|
mulassd |
|
198 |
10 53 60
|
divrec2d |
|
199 |
198
|
fveq2d |
|
200 |
199
|
oveq2d |
|
201 |
197 200
|
eqtr3d |
|
202 |
201
|
oveq2d |
|
203 |
159
|
sincld |
|
204 |
53 195
|
mulcld |
|
205 |
160
|
coscld |
|
206 |
195 196
|
mulcld |
|
207 |
193 2
|
eqnetrrd |
|
208 |
53 206 207
|
mulne0bbd |
|
209 |
195 196 208
|
mulne0bad |
|
210 |
53 195 60 209
|
mulne0d |
|
211 |
195 196 208
|
mulne0bbd |
|
212 |
199 211
|
eqnetrrd |
|
213 |
203 204 205 210 212
|
divcan5rd |
|
214 |
194 202 213
|
3eqtrd |
|
215 |
154 186 214
|
3eqtrd |
|
216 |
215
|
oveq1d |
|
217 |
|
picn |
|
218 |
217
|
a1i |
|
219 |
|
pire |
|
220 |
|
pipos |
|
221 |
219 220
|
gt0ne0ii |
|
222 |
221
|
a1i |
|
223 |
203 204 218 210 222
|
divdiv32d |
|
224 |
203 218 204 222 210
|
divdiv1d |
|
225 |
218 53 195
|
mulassd |
|
226 |
218 53
|
mulcomd |
|
227 |
226
|
oveq1d |
|
228 |
225 227
|
eqtr3d |
|
229 |
228
|
oveq2d |
|
230 |
224 229
|
eqtrd |
|
231 |
216 223 230
|
3eqtrd |
|