Proof of Theorem prmdiv
| Step | Hyp | Ref
| Expression |
| 1 | | nprmdvds1 12333 |
. . . . . 6

  |
| 2 | 1 | 3ad2ant1 1020 |
. . . . 5
     |
| 3 | | prmz 12304 |
. . . . . . . . . 10

  |
| 4 | 3 | 3ad2ant1 1020 |
. . . . . . . . 9
     |
| 5 | | simp2 1000 |
. . . . . . . . . . 11
     |
| 6 | | phiprm 12416 |
. . . . . . . . . . . . 13

        |
| 7 | 6 | 3ad2ant1 1020 |
. . . . . . . . . . . 12
           |
| 8 | | prmnn 12303 |
. . . . . . . . . . . . . 14

  |
| 9 | 8 | 3ad2ant1 1020 |
. . . . . . . . . . . . 13
     |
| 10 | | nnm1nn0 9307 |
. . . . . . . . . . . . 13
 
   |
| 11 | 9, 10 | syl 14 |
. . . . . . . . . . . 12
   
   |
| 12 | 7, 11 | eqeltrd 2273 |
. . . . . . . . . . 11
         |
| 13 | | zexpcl 10663 |
. . . . . . . . . . 11
                 |
| 14 | 5, 12, 13 | syl2anc 411 |
. . . . . . . . . 10
             |
| 15 | | 1z 9369 |
. . . . . . . . . 10
 |
| 16 | | zsubcl 9384 |
. . . . . . . . . 10
                       |
| 17 | 14, 15, 16 | sylancl 413 |
. . . . . . . . 9
               |
| 18 | | prmuz2 12324 |
. . . . . . . . . . . . . . . 16

      |
| 19 | 18 | 3ad2ant1 1020 |
. . . . . . . . . . . . . . 15
         |
| 20 | | uznn0sub 9650 |
. . . . . . . . . . . . . . 15
    
    |
| 21 | 19, 20 | syl 14 |
. . . . . . . . . . . . . 14
   
   |
| 22 | | zexpcl 10663 |
. . . . . . . . . . . . . 14
  
     
    |
| 23 | 5, 21, 22 | syl2anc 411 |
. . . . . . . . . . . . 13
           |
| 24 | | znq 9715 |
. . . . . . . . . . . . 13
     
 
           |
| 25 | 23, 9, 24 | syl2anc 411 |
. . . . . . . . . . . 12
       
     |
| 26 | 25 | flqcld 10384 |
. . . . . . . . . . 11
                 |
| 27 | 5, 26 | zmulcld 9471 |
. . . . . . . . . 10
   
               |
| 28 | 4, 27 | zmulcld 9471 |
. . . . . . . . 9
   
        
        |
| 29 | 5, 4 | gcdcomd 12166 |
. . . . . . . . . . . 12
         |
| 30 | | coprm 12337 |
. . . . . . . . . . . . 13
   
     |
| 31 | 30 | biimp3a 1356 |
. . . . . . . . . . . 12
       |
| 32 | 29, 31 | eqtrd 2229 |
. . . . . . . . . . 11
       |
| 33 | | eulerth 12426 |
. . . . . . . . . . 11
 
                 |
| 34 | 9, 5, 32, 33 | syl3anc 1249 |
. . . . . . . . . 10
                 |
| 35 | | 1zzd 9370 |
. . . . . . . . . . 11
     |
| 36 | | moddvds 11981 |
. . . . . . . . . . 11
                       
             |
| 37 | 9, 14, 35, 36 | syl3anc 1249 |
. . . . . . . . . 10
               
             |
| 38 | 34, 37 | mpbid 147 |
. . . . . . . . 9
               |
| 39 | | dvdsmul1 11995 |
. . . . . . . . . 10
  
               
                |
| 40 | 4, 27, 39 | syl2anc 411 |
. . . . . . . . 9
    
                |
| 41 | 4, 17, 28, 38, 40 | dvds2subd 12009 |
. . . . . . . 8
              
        
         |
| 42 | 5 | zcnd 9466 |
. . . . . . . . . . . 12
     |
| 43 | 23 | zcnd 9466 |
. . . . . . . . . . . 12
           |
| 44 | 4, 26 | zmulcld 9471 |
. . . . . . . . . . . . 13
   
               |
| 45 | 44 | zcnd 9466 |
. . . . . . . . . . . 12
   
               |
| 46 | 42, 43, 45 | subdid 8457 |
. . . . . . . . . . 11
   
       
                         
                 |
| 47 | | prmdiv.1 |
. . . . . . . . . . . . 13
         |
| 48 | | zq 9717 |
. . . . . . . . . . . . . . 15
               |
| 49 | 23, 48 | syl 14 |
. . . . . . . . . . . . . 14
           |
| 50 | | nnq 9724 |
. . . . . . . . . . . . . . 15
   |
| 51 | 9, 50 | syl 14 |
. . . . . . . . . . . . . 14
     |
| 52 | 9 | nngt0d 9051 |
. . . . . . . . . . . . . 14
     |
| 53 | | modqval 10433 |
. . . . . . . . . . . . . 14
     
 
     
          
                |
| 54 | 49, 51, 52, 53 | syl3anc 1249 |
. . . . . . . . . . . . 13
       
          
                |
| 55 | 47, 54 | eqtrid 2241 |
. . . . . . . . . . . 12
          
                |
| 56 | 55 | oveq2d 5941 |
. . . . . . . . . . 11
   
         
                 |
| 57 | | 2m1e1 9125 |
. . . . . . . . . . . . . . . . 17
   |
| 58 | 57 | oveq2i 5936 |
. . . . . . . . . . . . . . . 16
       |
| 59 | 7, 58 | eqtr4di 2247 |
. . . . . . . . . . . . . . 15
             |
| 60 | 9 | nncnd 9021 |
. . . . . . . . . . . . . . . 16
     |
| 61 | | 2cnd 9080 |
. . . . . . . . . . . . . . . 16
     |
| 62 | | 1cnd 8059 |
. . . . . . . . . . . . . . . 16
     |
| 63 | 60, 61, 62 | subsubd 8382 |
. . . . . . . . . . . . . . 15
   
         |
| 64 | 59, 63 | eqtrd 2229 |
. . . . . . . . . . . . . 14
             |
| 65 | 64 | oveq2d 5941 |
. . . . . . . . . . . . 13
                     |
| 66 | 42, 21 | expp1d 10783 |
. . . . . . . . . . . . 13
                     |
| 67 | 43, 42 | mulcomd 8065 |
. . . . . . . . . . . . 13
       
             |
| 68 | 65, 66, 67 | 3eqtrd 2233 |
. . . . . . . . . . . 12
                     |
| 69 | 26 | zcnd 9466 |
. . . . . . . . . . . . 13
                 |
| 70 | 60, 42, 69 | mul12d 8195 |
. . . . . . . . . . . 12
   
        
       
                |
| 71 | 68, 70 | oveq12d 5943 |
. . . . . . . . . . 11
             
                         
                 |
| 72 | 46, 56, 71 | 3eqtr4d 2239 |
. . . . . . . . . 10
   
          

                 |
| 73 | 72 | oveq1d 5940 |
. . . . . . . . 9
                 

                  |
| 74 | 14 | zcnd 9466 |
. . . . . . . . . 10
             |
| 75 | 28 | zcnd 9466 |
. . . . . . . . . 10
   
        
        |
| 76 | 74, 75, 62 | sub32d 8386 |
. . . . . . . . 9
             
        
                   
        
         |
| 77 | 73, 76 | eqtrd 2229 |
. . . . . . . 8
                  
        
         |
| 78 | 41, 77 | breqtrrd 4062 |
. . . . . . 7
         |
| 79 | | oveq2 5933 |
. . . . . . . . 9
 
     |
| 80 | 79 | oveq1d 5940 |
. . . . . . . 8
           |
| 81 | 80 | breq2d 4046 |
. . . . . . 7
     
       |
| 82 | 78, 81 | syl5ibcom 155 |
. . . . . 6
   
       |
| 83 | 42 | mul01d 8436 |
. . . . . . . . . 10
   
   |
| 84 | 83 | oveq1d 5940 |
. . . . . . . . 9
           |
| 85 | | df-neg 8217 |
. . . . . . . . 9
    |
| 86 | 84, 85 | eqtr4di 2247 |
. . . . . . . 8
          |
| 87 | 86 | breq2d 4046 |
. . . . . . 7
       
    |
| 88 | | dvdsnegb 11990 |
. . . . . . . 8
 
      |
| 89 | 4, 15, 88 | sylancl 413 |
. . . . . . 7
   
    |
| 90 | 87, 89 | bitr4d 191 |
. . . . . 6
       
   |
| 91 | 82, 90 | sylibd 149 |
. . . . 5
   
   |
| 92 | 2, 91 | mtod 664 |
. . . 4
  
  |
| 93 | | zmodfz 10455 |
. . . . . . . 8
     
 
                 |
| 94 | 23, 9, 93 | syl2anc 411 |
. . . . . . 7
       
           |
| 95 | 47, 94 | eqeltrid 2283 |
. . . . . 6
      
    |
| 96 | | nn0uz 9653 |
. . . . . . . 8
     |
| 97 | 11, 96 | eleqtrdi 2289 |
. . . . . . 7
   
       |
| 98 | | elfzp12 10191 |
. . . . . . 7
      
    
        
      |
| 99 | 97, 98 | syl 14 |
. . . . . 6
   
     
      
      |
| 100 | 95, 99 | mpbid 147 |
. . . . 5
   
           |
| 101 | 100 | ord 725 |
. . . 4
   
           |
| 102 | 92, 101 | mpd 13 |
. . 3
        
    |
| 103 | | 1e0p1 9515 |
. . . 4
   |
| 104 | 103 | oveq1i 5935 |
. . 3
           
   |
| 105 | 102, 104 | eleqtrrdi 2290 |
. 2
      
    |
| 106 | 105, 78 | jca 306 |
1
   
             |