Proof of Theorem dchrisum0lem2
Step | Hyp | Ref
| Expression |
1 | | 2cnd 11093 |
. . 3
|
2 | | rpcn 11841 |
. . . . 5
|
3 | 2 | adantl 482 |
. . . 4
|
4 | | fzfid 12772 |
. . . . 5
|
5 | | rpvmasum2.g |
. . . . . . 7
DChr |
6 | | rpvmasum.z |
. . . . . . 7
ℤ/nℤ |
7 | | rpvmasum2.d |
. . . . . . 7
|
8 | | rpvmasum.l |
. . . . . . 7
RHom |
9 | | rpvmasum2.w |
. . . . . . . . . . 11
|
10 | | ssrab2 3687 |
. . . . . . . . . . 11
|
11 | 9, 10 | eqsstri 3635 |
. . . . . . . . . 10
|
12 | | dchrisum0.b |
. . . . . . . . . 10
|
13 | 11, 12 | sseldi 3601 |
. . . . . . . . 9
|
14 | 13 | eldifad 3586 |
. . . . . . . 8
|
15 | 14 | ad2antrr 762 |
. . . . . . 7
|
16 | | elfzelz 12342 |
. . . . . . . 8
|
17 | 16 | adantl 482 |
. . . . . . 7
|
18 | 5, 6, 7, 8, 15, 17 | dchrzrhcl 24970 |
. . . . . 6
|
19 | | elfznn 12370 |
. . . . . . . . 9
|
20 | 19 | nnrpd 11870 |
. . . . . . . 8
|
21 | 20 | adantl 482 |
. . . . . . 7
|
22 | 21 | rpcnd 11874 |
. . . . . 6
|
23 | 21 | rpne0d 11877 |
. . . . . 6
|
24 | 18, 22, 23 | divcld 10801 |
. . . . 5
|
25 | 4, 24 | fsumcl 14464 |
. . . 4
|
26 | 3, 25 | mulcld 10060 |
. . 3
|
27 | | rpssre 11843 |
. . . . 5
|
28 | | 2cn 11091 |
. . . . 5
|
29 | | o1const 14350 |
. . . . 5
|
30 | 27, 28, 29 | mp2an 708 |
. . . 4
|
31 | 30 | a1i 11 |
. . 3
|
32 | 27 | a1i 11 |
. . . 4
|
33 | | 1red 10055 |
. . . 4
|
34 | | dchrisum0lem2.e |
. . . . 5
|
35 | | elrege0 12278 |
. . . . . 6
|
36 | 35 | simplbi 476 |
. . . . 5
|
37 | 34, 36 | syl 17 |
. . . 4
|
38 | 3, 25 | absmuld 14193 |
. . . . . . 7
|
39 | | rprege0 11847 |
. . . . . . . . . 10
|
40 | 39 | adantl 482 |
. . . . . . . . 9
|
41 | | absid 14036 |
. . . . . . . . 9
|
42 | 40, 41 | syl 17 |
. . . . . . . 8
|
43 | 42 | oveq1d 6665 |
. . . . . . 7
|
44 | 38, 43 | eqtrd 2656 |
. . . . . 6
|
45 | 44 | adantrr 753 |
. . . . 5
|
46 | 25 | adantrr 753 |
. . . . . . . . . 10
|
47 | 46 | subid1d 10381 |
. . . . . . . . 9
|
48 | 19 | adantl 482 |
. . . . . . . . . . . . 13
|
49 | | fveq2 6191 |
. . . . . . . . . . . . . . . 16
|
50 | 49 | fveq2d 6195 |
. . . . . . . . . . . . . . 15
|
51 | | id 22 |
. . . . . . . . . . . . . . 15
|
52 | 50, 51 | oveq12d 6668 |
. . . . . . . . . . . . . 14
|
53 | | dchrisum0lem2.k |
. . . . . . . . . . . . . 14
|
54 | | ovex 6678 |
. . . . . . . . . . . . . 14
|
55 | 52, 53, 54 | fvmpt3i 6287 |
. . . . . . . . . . . . 13
|
56 | 48, 55 | syl 17 |
. . . . . . . . . . . 12
|
57 | 56 | adantlrr 757 |
. . . . . . . . . . 11
|
58 | | rpregt0 11846 |
. . . . . . . . . . . . . . 15
|
59 | 58 | ad2antrl 764 |
. . . . . . . . . . . . . 14
|
60 | 59 | simpld 475 |
. . . . . . . . . . . . 13
|
61 | | simprr 796 |
. . . . . . . . . . . . 13
|
62 | | flge1nn 12622 |
. . . . . . . . . . . . 13
|
63 | 60, 61, 62 | syl2anc 693 |
. . . . . . . . . . . 12
|
64 | | nnuz 11723 |
. . . . . . . . . . . 12
|
65 | 63, 64 | syl6eleq 2711 |
. . . . . . . . . . 11
|
66 | 24 | adantlrr 757 |
. . . . . . . . . . 11
|
67 | 57, 65, 66 | fsumser 14461 |
. . . . . . . . . 10
|
68 | | rpvmasum.a |
. . . . . . . . . . . . . 14
|
69 | | rpvmasum2.1 |
. . . . . . . . . . . . . 14
|
70 | | eldifsni 4320 |
. . . . . . . . . . . . . . 15
|
71 | 13, 70 | syl 17 |
. . . . . . . . . . . . . 14
|
72 | | dchrisum0lem2.t |
. . . . . . . . . . . . . 14
|
73 | | dchrisum0lem2.3 |
. . . . . . . . . . . . . 14
|
74 | 6, 8, 68, 5, 7, 69, 14, 71, 53, 34, 72, 73, 9 | dchrvmaeq0 25193 |
. . . . . . . . . . . . 13
|
75 | 12, 74 | mpbid 222 |
. . . . . . . . . . . 12
|
76 | 75 | adantr 481 |
. . . . . . . . . . 11
|
77 | 76 | eqcomd 2628 |
. . . . . . . . . 10
|
78 | 67, 77 | oveq12d 6668 |
. . . . . . . . 9
|
79 | 47, 78 | eqtr3d 2658 |
. . . . . . . 8
|
80 | 79 | fveq2d 6195 |
. . . . . . 7
|
81 | | 1re 10039 |
. . . . . . . . . 10
|
82 | | elicopnf 12269 |
. . . . . . . . . 10
|
83 | 81, 82 | ax-mp 5 |
. . . . . . . . 9
|
84 | 60, 61, 83 | sylanbrc 698 |
. . . . . . . 8
|
85 | 73 | adantr 481 |
. . . . . . . 8
|
86 | | fveq2 6191 |
. . . . . . . . . . . . 13
|
87 | 86 | fveq2d 6195 |
. . . . . . . . . . . 12
|
88 | 87 | oveq1d 6665 |
. . . . . . . . . . 11
|
89 | 88 | fveq2d 6195 |
. . . . . . . . . 10
|
90 | | oveq2 6658 |
. . . . . . . . . 10
|
91 | 89, 90 | breq12d 4666 |
. . . . . . . . 9
|
92 | 91 | rspcv 3305 |
. . . . . . . 8
|
93 | 84, 85, 92 | sylc 65 |
. . . . . . 7
|
94 | 80, 93 | eqbrtrd 4675 |
. . . . . 6
|
95 | 46 | abscld 14175 |
. . . . . . 7
|
96 | 37 | adantr 481 |
. . . . . . 7
|
97 | | lemuldiv2 10904 |
. . . . . . 7
|
98 | 95, 96, 59, 97 | syl3anc 1326 |
. . . . . 6
|
99 | 94, 98 | mpbird 247 |
. . . . 5
|
100 | 45, 99 | eqbrtrd 4675 |
. . . 4
|
101 | 32, 26, 33, 37, 100 | elo1d 14267 |
. . 3
|
102 | 1, 26, 31, 101 | o1mul2 14355 |
. 2
|
103 | | fzfid 12772 |
. . . . 5
|
104 | 21 | rpsqrtcld 14150 |
. . . . . . . . 9
|
105 | 104 | rpcnd 11874 |
. . . . . . . 8
|
106 | 104 | rpne0d 11877 |
. . . . . . . 8
|
107 | 18, 105, 106 | divcld 10801 |
. . . . . . 7
|
108 | 107 | adantr 481 |
. . . . . 6
|
109 | | elfznn 12370 |
. . . . . . . . . 10
|
110 | 109 | adantl 482 |
. . . . . . . . 9
|
111 | 110 | nnrpd 11870 |
. . . . . . . 8
|
112 | 111 | rpsqrtcld 14150 |
. . . . . . 7
|
113 | 112 | rpcnd 11874 |
. . . . . 6
|
114 | 112 | rpne0d 11877 |
. . . . . 6
|
115 | 108, 113,
114 | divcld 10801 |
. . . . 5
|
116 | 103, 115 | fsumcl 14464 |
. . . 4
|
117 | 4, 116 | fsumcl 14464 |
. . 3
|
118 | | mulcl 10020 |
. . . 4
|
119 | 28, 26, 118 | sylancr 695 |
. . 3
|
120 | | 2re 11090 |
. . . . . . . . . 10
|
121 | | simpr 477 |
. . . . . . . . . . . . . 14
|
122 | | 2z 11409 |
. . . . . . . . . . . . . 14
|
123 | | rpexpcl 12879 |
. . . . . . . . . . . . . 14
|
124 | 121, 122,
123 | sylancl 694 |
. . . . . . . . . . . . 13
|
125 | | rpdivcl 11856 |
. . . . . . . . . . . . 13
|
126 | 124, 20, 125 | syl2an 494 |
. . . . . . . . . . . 12
|
127 | 126 | rpsqrtcld 14150 |
. . . . . . . . . . 11
|
128 | 127 | rpred 11872 |
. . . . . . . . . 10
|
129 | | remulcl 10021 |
. . . . . . . . . 10
|
130 | 120, 128,
129 | sylancr 695 |
. . . . . . . . 9
|
131 | 130 | recnd 10068 |
. . . . . . . 8
|
132 | 107, 131 | mulcld 10060 |
. . . . . . 7
|
133 | 4, 116, 132 | fsumsub 14520 |
. . . . . 6
|
134 | 112 | rpcnne0d 11881 |
. . . . . . . . . . 11
|
135 | | reccl 10692 |
. . . . . . . . . . 11
|
136 | 134, 135 | syl 17 |
. . . . . . . . . 10
|
137 | 103, 136 | fsumcl 14464 |
. . . . . . . . 9
|
138 | 107, 137,
131 | subdid 10486 |
. . . . . . . 8
|
139 | | fveq2 6191 |
. . . . . . . . . . . . . 14
|
140 | 139 | oveq2d 6666 |
. . . . . . . . . . . . 13
|
141 | 140 | sumeq1d 14431 |
. . . . . . . . . . . 12
|
142 | | fveq2 6191 |
. . . . . . . . . . . . 13
|
143 | 142 | oveq2d 6666 |
. . . . . . . . . . . 12
|
144 | 141, 143 | oveq12d 6668 |
. . . . . . . . . . 11
|
145 | | dchrisum0lem2.h |
. . . . . . . . . . 11
|
146 | | ovex 6678 |
. . . . . . . . . . 11
|
147 | 144, 145,
146 | fvmpt3i 6287 |
. . . . . . . . . 10
|
148 | 126, 147 | syl 17 |
. . . . . . . . 9
|
149 | 148 | oveq2d 6666 |
. . . . . . . 8
|
150 | 108, 113,
114 | divrecd 10804 |
. . . . . . . . . . 11
|
151 | 150 | sumeq2dv 14433 |
. . . . . . . . . 10
|
152 | 103, 107,
136 | fsummulc2 14516 |
. . . . . . . . . 10
|
153 | 151, 152 | eqtr4d 2659 |
. . . . . . . . 9
|
154 | 153 | oveq1d 6665 |
. . . . . . . 8
|
155 | 138, 149,
154 | 3eqtr4d 2666 |
. . . . . . 7
|
156 | 155 | sumeq2dv 14433 |
. . . . . 6
|
157 | | mulcl 10020 |
. . . . . . . . . 10
|
158 | 28, 3, 157 | sylancr 695 |
. . . . . . . . 9
|
159 | 4, 158, 24 | fsummulc2 14516 |
. . . . . . . 8
|
160 | 1, 3, 25 | mulassd 10063 |
. . . . . . . 8
|
161 | 158 | adantr 481 |
. . . . . . . . . . 11
|
162 | 161, 107,
105, 106 | div12d 10837 |
. . . . . . . . . 10
|
163 | 104 | rpcnne0d 11881 |
. . . . . . . . . . . . 13
|
164 | | divdiv1 10736 |
. . . . . . . . . . . . 13
|
165 | 18, 163, 163, 164 | syl3anc 1326 |
. . . . . . . . . . . 12
|
166 | 21 | rprege0d 11879 |
. . . . . . . . . . . . . 14
|
167 | | remsqsqrt 13997 |
. . . . . . . . . . . . . 14
|
168 | 166, 167 | syl 17 |
. . . . . . . . . . . . 13
|
169 | 168 | oveq2d 6666 |
. . . . . . . . . . . 12
|
170 | 165, 169 | eqtr2d 2657 |
. . . . . . . . . . 11
|
171 | 170 | oveq2d 6666 |
. . . . . . . . . 10
|
172 | 124 | adantr 481 |
. . . . . . . . . . . . . . . 16
|
173 | 172 | rprege0d 11879 |
. . . . . . . . . . . . . . 15
|
174 | | sqrtdiv 14006 |
. . . . . . . . . . . . . . 15
|
175 | 173, 21, 174 | syl2anc 693 |
. . . . . . . . . . . . . 14
|
176 | 39 | ad2antlr 763 |
. . . . . . . . . . . . . . . 16
|
177 | | sqrtsq 14010 |
. . . . . . . . . . . . . . . 16
|
178 | 176, 177 | syl 17 |
. . . . . . . . . . . . . . 15
|
179 | 178 | oveq1d 6665 |
. . . . . . . . . . . . . 14
|
180 | 175, 179 | eqtrd 2656 |
. . . . . . . . . . . . 13
|
181 | 180 | oveq2d 6666 |
. . . . . . . . . . . 12
|
182 | | 2cnd 11093 |
. . . . . . . . . . . . 13
|
183 | 3 | adantr 481 |
. . . . . . . . . . . . 13
|
184 | | divass 10703 |
. . . . . . . . . . . . 13
|
185 | 182, 183,
163, 184 | syl3anc 1326 |
. . . . . . . . . . . 12
|
186 | 181, 185 | eqtr4d 2659 |
. . . . . . . . . . 11
|
187 | 186 | oveq2d 6666 |
. . . . . . . . . 10
|
188 | 162, 171,
187 | 3eqtr4d 2666 |
. . . . . . . . 9
|
189 | 188 | sumeq2dv 14433 |
. . . . . . . 8
|
190 | 159, 160,
189 | 3eqtr3d 2664 |
. . . . . . 7
|
191 | 190 | oveq2d 6666 |
. . . . . 6
|
192 | 133, 156,
191 | 3eqtr4d 2666 |
. . . . 5
|
193 | 192 | mpteq2dva 4744 |
. . . 4
|
194 | | dchrisum0lem1.f |
. . . . 5
|
195 | | dchrisum0.c |
. . . . 5
|
196 | | dchrisum0.s |
. . . . 5
|
197 | | dchrisum0.1 |
. . . . 5
|
198 | | dchrisum0lem2.u |
. . . . 5
|
199 | 6, 8, 68, 5, 7, 69, 9, 12, 194, 195, 196, 197, 145, 198 | dchrisum0lem2a 25206 |
. . . 4
|
200 | 193, 199 | eqeltrrd 2702 |
. . 3
|
201 | 117, 119,
200 | o1dif 14360 |
. 2
|
202 | 102, 201 | mpbird 247 |
1
|