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
   
    
                              |