Proof of Theorem fourierdlem26
Step | Hyp | Ref
| Expression |
1 | | fourierdlem26.5 |
. . . 4
|
2 | 1 | a1i 11 |
. . 3
|
3 | | simpr 477 |
. . . 4
|
4 | 3 | oveq2d 6666 |
. . . . . . 7
|
5 | 4 | oveq1d 6665 |
. . . . . 6
|
6 | 5 | fveq2d 6195 |
. . . . 5
|
7 | 6 | oveq1d 6665 |
. . . 4
|
8 | 3, 7 | oveq12d 6668 |
. . 3
|
9 | | fourierdlem26.8 |
. . . . 5
|
10 | | fourierdlem26.6 |
. . . . . . 7
|
11 | 10 | rexrd 10089 |
. . . . . 6
|
12 | | fourierdlem26.4 |
. . . . . . . 8
|
13 | | fourierdlem26.2 |
. . . . . . . . 9
|
14 | | fourierdlem26.1 |
. . . . . . . . 9
|
15 | 13, 14 | resubcld 10458 |
. . . . . . . 8
|
16 | 12, 15 | syl5eqel 2705 |
. . . . . . 7
|
17 | 10, 16 | readdcld 10069 |
. . . . . 6
|
18 | | elioc2 12236 |
. . . . . 6
|
19 | 11, 17, 18 | syl2anc 693 |
. . . . 5
|
20 | 9, 19 | mpbid 222 |
. . . 4
|
21 | 20 | simp1d 1073 |
. . 3
|
22 | 13, 21 | resubcld 10458 |
. . . . . . . 8
|
23 | | fourierdlem26.3 |
. . . . . . . . . . 11
|
24 | 14, 13 | posdifd 10614 |
. . . . . . . . . . 11
|
25 | 23, 24 | mpbid 222 |
. . . . . . . . . 10
|
26 | 25, 12 | syl6breqr 4695 |
. . . . . . . . 9
|
27 | 26 | gt0ne0d 10592 |
. . . . . . . 8
|
28 | 22, 16, 27 | redivcld 10853 |
. . . . . . 7
|
29 | 28 | flcld 12599 |
. . . . . 6
|
30 | 29 | zred 11482 |
. . . . 5
|
31 | 30, 16 | remulcld 10070 |
. . . 4
|
32 | 21, 31 | readdcld 10069 |
. . 3
|
33 | 2, 8, 21, 32 | fvmptd 6288 |
. 2
|
34 | 10 | recnd 10068 |
. . . . . . . . . . . 12
|
35 | 21 | recnd 10068 |
. . . . . . . . . . . 12
|
36 | 34, 35 | pncan3d 10395 |
. . . . . . . . . . 11
|
37 | 36 | eqcomd 2628 |
. . . . . . . . . 10
|
38 | 37 | oveq2d 6666 |
. . . . . . . . 9
|
39 | 13 | recnd 10068 |
. . . . . . . . . 10
|
40 | 35, 34 | subcld 10392 |
. . . . . . . . . 10
|
41 | 39, 34, 40 | subsub4d 10423 |
. . . . . . . . 9
|
42 | 38, 41 | eqtr4d 2659 |
. . . . . . . 8
|
43 | 42 | oveq1d 6665 |
. . . . . . 7
|
44 | 13, 10 | resubcld 10458 |
. . . . . . . . 9
|
45 | 44 | recnd 10068 |
. . . . . . . 8
|
46 | 16 | recnd 10068 |
. . . . . . . 8
|
47 | 45, 40, 46, 27 | divsubdird 10840 |
. . . . . . 7
|
48 | 40, 46, 27 | divnegd 10814 |
. . . . . . . . . 10
|
49 | 35, 34 | negsubdi2d 10408 |
. . . . . . . . . . 11
|
50 | 49 | oveq1d 6665 |
. . . . . . . . . 10
|
51 | 48, 50 | eqtrd 2656 |
. . . . . . . . 9
|
52 | 51 | oveq2d 6666 |
. . . . . . . 8
|
53 | 44, 16, 27 | redivcld 10853 |
. . . . . . . . . 10
|
54 | 53 | recnd 10068 |
. . . . . . . . 9
|
55 | 40, 46, 27 | divcld 10801 |
. . . . . . . . 9
|
56 | 54, 55 | negsubd 10398 |
. . . . . . . 8
|
57 | | 1cnd 10056 |
. . . . . . . . . . . 12
|
58 | 54, 57 | npcand 10396 |
. . . . . . . . . . 11
|
59 | 58 | eqcomd 2628 |
. . . . . . . . . 10
|
60 | 59 | oveq1d 6665 |
. . . . . . . . 9
|
61 | 54, 57 | subcld 10392 |
. . . . . . . . . 10
|
62 | 34, 35 | subcld 10392 |
. . . . . . . . . . 11
|
63 | 62, 46, 27 | divcld 10801 |
. . . . . . . . . 10
|
64 | 61, 57, 63 | addassd 10062 |
. . . . . . . . 9
|
65 | 60, 64 | eqtrd 2656 |
. . . . . . . 8
|
66 | 52, 56, 65 | 3eqtr3d 2664 |
. . . . . . 7
|
67 | 43, 47, 66 | 3eqtrd 2660 |
. . . . . 6
|
68 | 67 | fveq2d 6195 |
. . . . 5
|
69 | 10, 21 | resubcld 10458 |
. . . . . . . . 9
|
70 | 16, 69 | readdcld 10069 |
. . . . . . . 8
|
71 | 16, 26 | elrpd 11869 |
. . . . . . . 8
|
72 | 34, 46 | addcomd 10238 |
. . . . . . . . . . . . . . 15
|
73 | 72 | oveq2d 6666 |
. . . . . . . . . . . . . 14
|
74 | 9, 73 | eleqtrd 2703 |
. . . . . . . . . . . . 13
|
75 | 16, 10 | readdcld 10069 |
. . . . . . . . . . . . . 14
|
76 | | elioc2 12236 |
. . . . . . . . . . . . . 14
|
77 | 11, 75, 76 | syl2anc 693 |
. . . . . . . . . . . . 13
|
78 | 74, 77 | mpbid 222 |
. . . . . . . . . . . 12
|
79 | 78 | simp3d 1075 |
. . . . . . . . . . 11
|
80 | 21, 10, 16 | lesubaddd 10624 |
. . . . . . . . . . 11
|
81 | 79, 80 | mpbird 247 |
. . . . . . . . . 10
|
82 | 21, 10 | resubcld 10458 |
. . . . . . . . . . 11
|
83 | 16, 82 | subge0d 10617 |
. . . . . . . . . 10
|
84 | 81, 83 | mpbird 247 |
. . . . . . . . 9
|
85 | 46, 35, 34 | subsub2d 10421 |
. . . . . . . . 9
|
86 | 84, 85 | breqtrd 4679 |
. . . . . . . 8
|
87 | 70, 71, 86 | divge0d 11912 |
. . . . . . 7
|
88 | 46, 62, 46, 27 | divdird 10839 |
. . . . . . . 8
|
89 | 46, 27 | dividd 10799 |
. . . . . . . . . 10
|
90 | 89 | eqcomd 2628 |
. . . . . . . . 9
|
91 | 90 | oveq1d 6665 |
. . . . . . . 8
|
92 | 88, 91 | eqtr4d 2659 |
. . . . . . 7
|
93 | 87, 92 | breqtrd 4679 |
. . . . . 6
|
94 | 20 | simp2d 1074 |
. . . . . . . . 9
|
95 | 10, 21 | sublt0d 10653 |
. . . . . . . . 9
|
96 | 94, 95 | mpbird 247 |
. . . . . . . 8
|
97 | 69, 71, 96 | divlt0gt0d 39498 |
. . . . . . 7
|
98 | 69, 16, 27 | redivcld 10853 |
. . . . . . . 8
|
99 | | 1red 10055 |
. . . . . . . 8
|
100 | | ltaddneg 10251 |
. . . . . . . 8
|
101 | 98, 99, 100 | syl2anc 693 |
. . . . . . 7
|
102 | 97, 101 | mpbid 222 |
. . . . . 6
|
103 | 53 | flcld 12599 |
. . . . . . . . . . . . . . 15
|
104 | 103 | zcnd 11483 |
. . . . . . . . . . . . . 14
|
105 | 104, 46 | mulcld 10060 |
. . . . . . . . . . . . 13
|
106 | 34, 105 | pncan2d 10394 |
. . . . . . . . . . . 12
|
107 | 106 | eqcomd 2628 |
. . . . . . . . . . 11
|
108 | 107 | oveq1d 6665 |
. . . . . . . . . 10
|
109 | 104, 46, 27 | divcan4d 10807 |
. . . . . . . . . 10
|
110 | | id 22 |
. . . . . . . . . . . . . . . . 17
|
111 | | oveq2 6658 |
. . . . . . . . . . . . . . . . . . . 20
|
112 | 111 | oveq1d 6665 |
. . . . . . . . . . . . . . . . . . 19
|
113 | 112 | fveq2d 6195 |
. . . . . . . . . . . . . . . . . 18
|
114 | 113 | oveq1d 6665 |
. . . . . . . . . . . . . . . . 17
|
115 | 110, 114 | oveq12d 6668 |
. . . . . . . . . . . . . . . 16
|
116 | 115 | adantl 482 |
. . . . . . . . . . . . . . 15
|
117 | | reflcl 12597 |
. . . . . . . . . . . . . . . . . 18
|
118 | 53, 117 | syl 17 |
. . . . . . . . . . . . . . . . 17
|
119 | 118, 16 | remulcld 10070 |
. . . . . . . . . . . . . . . 16
|
120 | 10, 119 | readdcld 10069 |
. . . . . . . . . . . . . . 15
|
121 | 2, 116, 10, 120 | fvmptd 6288 |
. . . . . . . . . . . . . 14
|
122 | 121 | eqcomd 2628 |
. . . . . . . . . . . . 13
|
123 | 122 | oveq1d 6665 |
. . . . . . . . . . . 12
|
124 | 123 | oveq1d 6665 |
. . . . . . . . . . 11
|
125 | | fourierdlem26.7 |
. . . . . . . . . . . . 13
|
126 | 125 | oveq1d 6665 |
. . . . . . . . . . . 12
|
127 | 126 | oveq1d 6665 |
. . . . . . . . . . 11
|
128 | 124, 127 | eqtrd 2656 |
. . . . . . . . . 10
|
129 | 108, 109,
128 | 3eqtr3d 2664 |
. . . . . . . . 9
|
130 | 129, 103 | eqeltrrd 2702 |
. . . . . . . 8
|
131 | | 1zzd 11408 |
. . . . . . . 8
|
132 | 130, 131 | zsubcld 11487 |
. . . . . . 7
|
133 | 99, 98 | readdcld 10069 |
. . . . . . 7
|
134 | | flbi2 12618 |
. . . . . . 7
|
135 | 132, 133,
134 | syl2anc 693 |
. . . . . 6
|
136 | 93, 102, 135 | mpbir2and 957 |
. . . . 5
|
137 | 129 | eqcomd 2628 |
. . . . . 6
|
138 | 137 | oveq1d 6665 |
. . . . 5
|
139 | 68, 136, 138 | 3eqtrd 2660 |
. . . 4
|
140 | 139 | oveq1d 6665 |
. . 3
|
141 | 140 | oveq2d 6666 |
. 2
|
142 | 37 | oveq1d 6665 |
. . 3
|
143 | 104, 57, 46 | subdird 10487 |
. . . . 5
|
144 | 143 | oveq2d 6666 |
. . . 4
|
145 | 34, 40 | addcld 10059 |
. . . . . 6
|
146 | 57, 46 | mulcld 10060 |
. . . . . 6
|
147 | 145, 105,
146 | addsubassd 10412 |
. . . . 5
|
148 | 147 | eqcomd 2628 |
. . . 4
|
149 | 34, 40, 105 | add32d 10263 |
. . . . . 6
|
150 | 149 | oveq1d 6665 |
. . . . 5
|
151 | 122 | oveq1d 6665 |
. . . . . 6
|
152 | 46 | mulid2d 10058 |
. . . . . 6
|
153 | 151, 152 | oveq12d 6668 |
. . . . 5
|
154 | 125, 13 | eqeltrd 2701 |
. . . . . . . 8
|
155 | 154 | recnd 10068 |
. . . . . . 7
|
156 | 155, 40, 46 | addsubd 10413 |
. . . . . 6
|
157 | 125 | oveq1d 6665 |
. . . . . . . 8
|
158 | 12 | a1i 11 |
. . . . . . . . 9
|
159 | 158 | oveq2d 6666 |
. . . . . . . 8
|
160 | 14 | recnd 10068 |
. . . . . . . . 9
|
161 | 39, 160 | nncand 10397 |
. . . . . . . 8
|
162 | 157, 159,
161 | 3eqtrd 2660 |
. . . . . . 7
|
163 | 162 | oveq1d 6665 |
. . . . . 6
|
164 | 156, 163 | eqtrd 2656 |
. . . . 5
|
165 | 150, 153,
164 | 3eqtrd 2660 |
. . . 4
|
166 | 144, 148,
165 | 3eqtrd 2660 |
. . 3
|
167 | 142, 166 | eqtrd 2656 |
. 2
|
168 | 33, 141, 167 | 3eqtrd 2660 |
1
|