Proof of Theorem cphipval
Step | Hyp | Ref
| Expression |
1 | | cphipfval.x |
. . 3
     |
2 | | cphipfval.p |
. . 3
    |
3 | | cphipfval.s |
. . 3
     |
4 | | cphipfval.n |
. . 3
     |
5 | | cphipfval.i |
. . 3
     |
6 | | eqid 2622 |
. . 3
         |
7 | | cphipval.f |
. . 3
Scalar   |
8 | | cphipval.k |
. . 3
     |
9 | 1, 2, 3, 4, 5, 6, 7, 8 | cphipval2 23040 |
. 2
   
                                        
                              |
10 | | ax-icn 9995 |
. . . . . . . . . 10
 |
11 | 10 | a1i 11 |
. . . . . . . . 9
   
   |
12 | | simp1l 1085 |
. . . . . . . . . . 11
   
   |
13 | | cphngp 22973 |
. . . . . . . . . . . . . . 15
 NrmGrp |
14 | | ngpgrp 22403 |
. . . . . . . . . . . . . . 15
 NrmGrp   |
15 | 13, 14 | syl 17 |
. . . . . . . . . . . . . 14
   |
16 | 15 | adantr 481 |
. . . . . . . . . . . . 13
     |
17 | 16 | 3ad2ant1 1082 |
. . . . . . . . . . . 12
   
   |
18 | | simp2 1062 |
. . . . . . . . . . . 12
   
   |
19 | | cphlmod 22974 |
. . . . . . . . . . . . . . . 16
   |
20 | 19 | 3anim1i 1248 |
. . . . . . . . . . . . . . 15
 
 
   |
21 | 20 | 3expa 1265 |
. . . . . . . . . . . . . 14
   
 
   |
22 | 1, 7, 3, 8 | lmodvscl 18880 |
. . . . . . . . . . . . . 14
 
 
   |
23 | 21, 22 | syl 17 |
. . . . . . . . . . . . 13
   
     |
24 | 23 | 3adant2 1080 |
. . . . . . . . . . . 12
   
     |
25 | 1, 2 | grpcl 17430 |
. . . . . . . . . . . 12
 

   
    |
26 | 17, 18, 24, 25 | syl3anc 1326 |
. . . . . . . . . . 11
   
  
    |
27 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . . . 11
                     
         |
28 | 12, 26, 27 | syl2anc 693 |
. . . . . . . . . 10
   
     
            
      |
29 | 1, 5 | reipcl 22997 |
. . . . . . . . . . . 12
         
 
       |
30 | 12, 26, 29 | syl2anc 693 |
. . . . . . . . . . 11
   
   
         |
31 | 30 | recnd 10068 |
. . . . . . . . . 10
   
   
         |
32 | 28, 31 | eqeltrd 2701 |
. . . . . . . . 9
   
     
         |
33 | 11, 32 | mulcld 10060 |
. . . . . . . 8
   
                 |
34 | 19 | adantr 481 |
. . . . . . . . . . . . . 14
     |
35 | 34 | 3ad2ant1 1082 |
. . . . . . . . . . . . 13
   
   |
36 | | cphclm 22989 |
. . . . . . . . . . . . . . . 16
 CMod |
37 | 7, 8 | clmneg1 22882 |
. . . . . . . . . . . . . . . 16
 CMod    |
38 | 36, 37 | syl 17 |
. . . . . . . . . . . . . . 15
    |
39 | 38 | adantr 481 |
. . . . . . . . . . . . . 14
      |
40 | 39 | 3ad2ant1 1082 |
. . . . . . . . . . . . 13
   
    |
41 | | simp3 1063 |
. . . . . . . . . . . . 13
   
   |
42 | 1, 7, 3, 8 | lmodvscl 18880 |
. . . . . . . . . . . . 13
  
      |
43 | 35, 40, 41, 42 | syl3anc 1326 |
. . . . . . . . . . . 12
   
      |
44 | 1, 2 | grpcl 17430 |
. . . . . . . . . . . 12
 
           |
45 | 17, 18, 43, 44 | syl3anc 1326 |
. . . . . . . . . . 11
   
        |
46 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . . . 11
                                   |
47 | 12, 45, 46 | syl2anc 693 |
. . . . . . . . . 10
   
     
 
         
 
        |
48 | 1, 5 | reipcl 22997 |
. . . . . . . . . . 11
                      |
49 | 12, 45, 48 | syl2anc 693 |
. . . . . . . . . 10
   
               |
50 | 47, 49 | eqeltrd 2701 |
. . . . . . . . 9
   
     
 
        |
51 | 50 | recnd 10068 |
. . . . . . . 8
   
     
 
        |
52 | | addneg1mul 10472 |
. . . . . . . 8
                                                   
 
              
                        |
53 | 33, 51, 52 | syl2anc 693 |
. . . . . . 7
   
       
                                                        |
54 | 36 | adantr 481 |
. . . . . . . . . . 11
   CMod |
55 | 1, 2, 6, 7, 3 | clmvsubval 22909 |
. . . . . . . . . . . 12
  CMod
                |
56 | 55 | eqcomd 2628 |
. . . . . . . . . . 11
  CMod
                |
57 | 54, 56 | syl3an1 1359 |
. . . . . . . . . 10
   
                |
58 | 57 | fveq2d 6195 |
. . . . . . . . 9
   
                        |
59 | 58 | oveq1d 6665 |
. . . . . . . 8
   
     
 
                        |
60 | 59 | oveq2d 6666 |
. . . . . . 7
   
       
                             
                          |
61 | 53, 60 | eqtrd 2656 |
. . . . . 6
   
       
                                                           |
62 | | eqid 2622 |
. . . . . . . . . . . . 13
           |
63 | 54 | 3ad2ant1 1082 |
. . . . . . . . . . . . 13
   
 CMod |
64 | | simp1r 1086 |
. . . . . . . . . . . . 13
   
   |
65 | 1, 7, 3, 62, 8, 63, 41, 64 | clmvsneg 22900 |
. . . . . . . . . . . 12
   
         
       |
66 | 65 | eqcomd 2628 |
. . . . . . . . . . 11
   
            
    |
67 | 66 | oveq2d 6666 |
. . . . . . . . . 10
   
   
                 |
68 | 1, 2, 62, 6 | grpsubval 17465 |
. . . . . . . . . . 11
  
                     
     |
69 | 18, 24, 68 | syl2anc 693 |
. . . . . . . . . 10
   
                    
     |
70 | 67, 69 | eqtr4d 2659 |
. . . . . . . . 9
   
   
              |
71 | 70 | fveq2d 6195 |
. . . . . . . 8
   
                          |
72 | 71 | oveq1d 6665 |
. . . . . . 7
   
     
                            |
73 | 72 | oveq2d 6666 |
. . . . . 6
   
       
                                |
74 | 61, 73 | oveq12d 6668 |
. . . . 5
   
         
                                                                                                  |
75 | 54 | anim1i 592 |
. . . . . . . . . . . 12
   
  CMod
   |
76 | 75 | 3adant2 1080 |
. . . . . . . . . . 11
   
  CMod
   |
77 | 1, 3 | clmvs1 22893 |
. . . . . . . . . . 11
  CMod  
   |
78 | 76, 77 | syl 17 |
. . . . . . . . . 10
   
     |
79 | 78 | oveq2d 6666 |
. . . . . . . . 9
   
  
      |
80 | 79 | fveq2d 6195 |
. . . . . . . 8
   
            
    |
81 | 80 | oveq1d 6665 |
. . . . . . 7
   
     
                   |
82 | 81 | oveq2d 6666 |
. . . . . 6
   
                    
        |
83 | 1, 2 | grpcl 17430 |
. . . . . . . . . . 11
 
     |
84 | 16, 83 | syl3an1 1359 |
. . . . . . . . . 10
   
     |
85 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . . 10
                       |
86 | 12, 84, 85 | syl2anc 693 |
. . . . . . . . 9
   
     
        
    |
87 | 1, 5 | reipcl 22997 |
. . . . . . . . . 10
       
     |
88 | 12, 84, 87 | syl2anc 693 |
. . . . . . . . 9
   
         |
89 | 86, 88 | eqeltrd 2701 |
. . . . . . . 8
   
     
       |
90 | 89 | recnd 10068 |
. . . . . . 7
   
     
       |
91 | 90 | mulid2d 10058 |
. . . . . 6
   
                         |
92 | 82, 91 | eqtrd 2656 |
. . . . 5
   
                           |
93 | 74, 92 | oveq12d 6668 |
. . . 4
   
                        
 
              
                                 
                                                            |
94 | | nnuz 11723 |
. . . . . 6
     |
95 | | df-4 11081 |
. . . . . 6
   |
96 | | oveq2 6658 |
. . . . . . . 8
           |
97 | | i4 12967 |
. . . . . . . 8
     |
98 | 96, 97 | syl6eq 2672 |
. . . . . . 7
       |
99 | 98 | oveq1d 6665 |
. . . . . . . . . 10
     
     |
100 | 99 | oveq2d 6666 |
. . . . . . . . 9
          
    |
101 | 100 | fveq2d 6195 |
. . . . . . . 8
                       |
102 | 101 | oveq1d 6665 |
. . . . . . 7
                     
         |
103 | 98, 102 | oveq12d 6668 |
. . . . . 6
                            
          |
104 | 10 | a1i 11 |
. . . . . . . . 9
   |
105 | | nnnn0 11299 |
. . . . . . . . 9
   |
106 | 104, 105 | expcld 13008 |
. . . . . . . 8
       |
107 | 106 | adantl 482 |
. . . . . . 7
    


      |
108 | 12 | adantr 481 |
. . . . . . . . 9
    


  |
109 | 17 | adantr 481 |
. . . . . . . . . 10
    


  |
110 | 18 | adantr 481 |
. . . . . . . . . 10
    


  |
111 | 35 | adantr 481 |
. . . . . . . . . . 11
    


  |
112 | 36 | anim1i 592 |
. . . . . . . . . . . . 13
   
CMod    |
113 | 112 | 3ad2ant1 1082 |
. . . . . . . . . . . 12
   
  CMod    |
114 | 7, 8 | cmodscexp 22921 |
. . . . . . . . . . . 12
   CMod 
       |
115 | 113, 114 | sylan 488 |
. . . . . . . . . . 11
    


      |
116 | 41 | adantr 481 |
. . . . . . . . . . 11
    


  |
117 | 1, 7, 3, 8 | lmodvscl 18880 |
. . . . . . . . . . 11
           
   |
118 | 111, 115,
116, 117 | syl3anc 1326 |
. . . . . . . . . 10
    


        |
119 | 1, 2 | grpcl 17430 |
. . . . . . . . . 10
 
                 |
120 | 109, 110,
118, 119 | syl3anc 1326 |
. . . . . . . . 9
    


          |
121 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . 9
                                               |
122 | 108, 120,
121 | syl2anc 693 |
. . . . . . . 8
    


                                    |
123 | 1, 5 | reipcl 22997 |
. . . . . . . . . 10
                 
 
           |
124 | 108, 120,
123 | syl2anc 693 |
. . . . . . . . 9
    


                    |
125 | 124 | recnd 10068 |
. . . . . . . 8
    


                    |
126 | 122, 125 | eqeltrd 2701 |
. . . . . . 7
    


                  |
127 | 107, 126 | mulcld 10060 |
. . . . . 6
    


                        |
128 | | df-3 11080 |
. . . . . . 7
   |
129 | | oveq2 6658 |
. . . . . . . . 9
           |
130 | | i3 12966 |
. . . . . . . . 9
      |
131 | 129, 130 | syl6eq 2672 |
. . . . . . . 8
        |
132 | 131 | oveq1d 6665 |
. . . . . . . . . . 11
     
      |
133 | 132 | oveq2d 6666 |
. . . . . . . . . 10
           
    |
134 | 133 | fveq2d 6195 |
. . . . . . . . 9
                        |
135 | 134 | oveq1d 6665 |
. . . . . . . 8
                     
          |
136 | 131, 135 | oveq12d 6668 |
. . . . . . 7
                             
           |
137 | 10 | a1i 11 |
. . . . . . . . 9
    


  |
138 | 105 | adantl 482 |
. . . . . . . . 9
    


  |
139 | 137, 138 | expcld 13008 |
. . . . . . . 8
    


      |
140 | 123 | recnd 10068 |
. . . . . . . . . 10
                 
 
           |
141 | 108, 120,
140 | syl2anc 693 |
. . . . . . . . 9
    


                    |
142 | 122, 141 | eqeltrd 2701 |
. . . . . . . 8
    


                  |
143 | 139, 142 | mulcld 10060 |
. . . . . . 7
    


                        |
144 | | df-2 11079 |
. . . . . . . 8
   |
145 | | oveq2 6658 |
. . . . . . . . . 10
           |
146 | | i2 12965 |
. . . . . . . . . 10
      |
147 | 145, 146 | syl6eq 2672 |
. . . . . . . . 9
        |
148 | 147 | oveq1d 6665 |
. . . . . . . . . . . 12
     
      |
149 | 148 | oveq2d 6666 |
. . . . . . . . . . 11
                |
150 | 149 | fveq2d 6195 |
. . . . . . . . . 10
                        |
151 | 150 | oveq1d 6665 |
. . . . . . . . 9
                     
 
        |
152 | 147, 151 | oveq12d 6668 |
. . . . . . . 8
                             
 
         |
153 | 139, 126 | mulcld 10060 |
. . . . . . . 8
    


                        |
154 | | 1z 11407 |
. . . . . . . . . 10
 |
155 | | oveq2 6658 |
. . . . . . . . . . . . 13
           |
156 | | exp1 12866 |
. . . . . . . . . . . . . 14
       |
157 | 10, 156 | ax-mp 5 |
. . . . . . . . . . . . 13
     |
158 | 155, 157 | syl6eq 2672 |
. . . . . . . . . . . 12
       |
159 | 158 | oveq1d 6665 |
. . . . . . . . . . . . . . 15
     
     |
160 | 159 | oveq2d 6666 |
. . . . . . . . . . . . . 14
          
    |
161 | 160 | fveq2d 6195 |
. . . . . . . . . . . . 13
                       |
162 | 161 | oveq1d 6665 |
. . . . . . . . . . . 12
                     
         |
163 | 158, 162 | oveq12d 6668 |
. . . . . . . . . . 11
                            
          |
164 | 163 | fsum1 14476 |
. . . . . . . . . 10
  
                                               
          |
165 | 154, 33, 164 | sylancr 695 |
. . . . . . . . 9
   
                                  
          |
166 | | 1nn 11031 |
. . . . . . . . 9
 |
167 | 165, 166 | jctil 560 |
. . . . . . . 8
   
                                   
           |
168 | | eqidd 2623 |
. . . . . . . 8
   
       
                                              
 
          |
169 | 94, 144, 152, 153, 167, 168 | fsump1i 14500 |
. . . . . . 7
   
                                     
                           |
170 | | eqidd 2623 |
. . . . . . 7
   
         
                                                               
 
              
            |
171 | 94, 128, 136, 143, 169, 170 | fsump1i 14500 |
. . . . . 6
   
                                                    
 
              
             |
172 | | eqidd 2623 |
. . . . . 6
   
                        
 
              
                                 
                                               
           |
173 | 94, 95, 103, 127, 171, 172 | fsump1i 14500 |
. . . . 5
   
                                                     
 
              
                            |
174 | 173 | simprd 479 |
. . . 4
   
                                                    
 
              
                           |
175 | 1, 6 | grpsubcl 17495 |
. . . . . . . . . . . 12
 
           |
176 | 16, 175 | syl3an1 1359 |
. . . . . . . . . . 11
   
           |
177 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . . . 11
                                               |
178 | 12, 176, 177 | syl2anc 693 |
. . . . . . . . . 10
   
                                     |
179 | 1, 5 | reipcl 22997 |
. . . . . . . . . . 11
                               |
180 | 12, 176, 179 | syl2anc 693 |
. . . . . . . . . 10
   
                     |
181 | 178, 180 | eqeltrd 2701 |
. . . . . . . . 9
   
                   |
182 | 181 | recnd 10068 |
. . . . . . . 8
   
                   |
183 | 90, 182 | subcld 10392 |
. . . . . . 7
   
                               |
184 | 1, 6 | grpsubcl 17495 |
. . . . . . . . . . . . 13
 

              |
185 | 17, 18, 24, 184 | syl3anc 1326 |
. . . . . . . . . . . 12
   
             |
186 | 1, 5, 4 | nmsq 22994 |
. . . . . . . . . . . 12
                                                       |
187 | 12, 185, 186 | syl2anc 693 |
. . . . . . . . . . 11
   
                                           |
188 | 1, 5 | reipcl 22997 |
. . . . . . . . . . . 12
                                     |
189 | 12, 185, 188 | syl2anc 693 |
. . . . . . . . . . 11
   
                         |
190 | 187, 189 | eqeltrd 2701 |
. . . . . . . . . 10
   
                     |
191 | 190 | recnd 10068 |
. . . . . . . . 9
   
                     |
192 | 32, 191 | subcld 10392 |
. . . . . . . 8
   
       
                           |
193 | 11, 192 | mulcld 10060 |
. . . . . . 7
   
       
                             |
194 | 183, 193 | addcomd 10238 |
. . . . . 6
   
                                     
                                  
                                                          |
195 | 193, 182,
90 | subadd23d 10414 |
. . . . . 6
   
                                                                         
                                                         |
196 | 32, 191, 11 | subdir2d 10488 |
. . . . . . . . 9
   
       
                                  
       
                      |
197 | 196 | oveq1d 6665 |
. . . . . . . 8
   
         
                                                                                                   |
198 | 11, 191 | mulcld 10060 |
. . . . . . . . 9
   
                       |
199 | 33, 198, 182 | sub32d 10424 |
. . . . . . . 8
   
         
       
                                             
                                               |
200 | 197, 199 | eqtrd 2656 |
. . . . . . 7
   
         
                                                                            
                      |
201 | 200 | oveq1d 6665 |
. . . . . 6
   
                                                                                                   
                                 |
202 | 194, 195,
201 | 3eqtr2d 2662 |
. . . . 5
   
                                     
                                    
                                                          |
203 | 33, 182 | subcld 10392 |
. . . . . . . 8
   
       
                           |
204 | 203, 198 | negsubd 10398 |
. . . . . . 7
   
         
                                                                               
                      |
205 | 11, 191 | mulneg1d 10483 |
. . . . . . . . 9
   
                                             |
206 | 205 | eqcomd 2628 |
. . . . . . . 8
   
                                             |
207 | 206 | oveq2d 6666 |
. . . . . . 7
   
         
                                                                                                       |
208 | 204, 207 | eqtr3d 2658 |
. . . . . 6
   
         
                                                                                                      |
209 | 208 | oveq1d 6665 |
. . . . 5
   
                                   
                                                                                                    |
210 | 202, 209 | eqtrd 2656 |
. . . 4
   
                                     
                                    
                                                           |
211 | 93, 174, 210 | 3eqtr4rd 2667 |
. . 3
   
                                     
                           
                             |
212 | 211 | oveq1d 6665 |
. 2
   
                                      
                             
                              |
213 | 9, 212 | eqtrd 2656 |
1
   
    
                              |