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

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

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

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

  |
| 9 | 8 | 3ad2ant1 1020 |
. . . . . . . . . . . . 13
     |
| 10 | | nnm1nn0 9290 |
. . . . . . . . . . . . 13
 
   |
| 11 | 9, 10 | syl 14 |
. . . . . . . . . . . 12
   
   |
| 12 | 7, 11 | eqeltrd 2273 |
. . . . . . . . . . 11
         |
| 13 | | zexpcl 10646 |
. . . . . . . . . . 11
                 |
| 14 | 5, 12, 13 | syl2anc 411 |
. . . . . . . . . 10
             |
| 15 | | 1z 9352 |
. . . . . . . . . 10
 |
| 16 | | zsubcl 9367 |
. . . . . . . . . 10
                       |
| 17 | 14, 15, 16 | sylancl 413 |
. . . . . . . . 9
               |
| 18 | | prmuz2 12299 |
. . . . . . . . . . . . . . . 16

      |
| 19 | 18 | 3ad2ant1 1020 |
. . . . . . . . . . . . . . 15
         |
| 20 | | uznn0sub 9633 |
. . . . . . . . . . . . . . 15
    
    |
| 21 | 19, 20 | syl 14 |
. . . . . . . . . . . . . 14
   
   |
| 22 | | zexpcl 10646 |
. . . . . . . . . . . . . 14
  
     
    |
| 23 | 5, 21, 22 | syl2anc 411 |
. . . . . . . . . . . . 13
           |
| 24 | | znq 9698 |
. . . . . . . . . . . . 13
     
 
           |
| 25 | 23, 9, 24 | syl2anc 411 |
. . . . . . . . . . . 12
       
     |
| 26 | 25 | flqcld 10367 |
. . . . . . . . . . 11
                 |
| 27 | 5, 26 | zmulcld 9454 |
. . . . . . . . . 10
   
               |
| 28 | 4, 27 | zmulcld 9454 |
. . . . . . . . 9
   
        
        |
| 29 | 5, 4 | gcdcomd 12141 |
. . . . . . . . . . . 12
         |
| 30 | | coprm 12312 |
. . . . . . . . . . . . 13
   
     |
| 31 | 30 | biimp3a 1356 |
. . . . . . . . . . . 12
       |
| 32 | 29, 31 | eqtrd 2229 |
. . . . . . . . . . 11
       |
| 33 | | eulerth 12401 |
. . . . . . . . . . 11
 
                 |
| 34 | 9, 5, 32, 33 | syl3anc 1249 |
. . . . . . . . . 10
                 |
| 35 | | 1zzd 9353 |
. . . . . . . . . . 11
     |
| 36 | | moddvds 11964 |
. . . . . . . . . . 11
                       
             |
| 37 | 9, 14, 35, 36 | syl3anc 1249 |
. . . . . . . . . 10
               
             |
| 38 | 34, 37 | mpbid 147 |
. . . . . . . . 9
               |
| 39 | | dvdsmul1 11978 |
. . . . . . . . . 10
  
               
                |
| 40 | 4, 27, 39 | syl2anc 411 |
. . . . . . . . 9
    
                |
| 41 | 4, 17, 28, 38, 40 | dvds2subd 11992 |
. . . . . . . 8
              
        
         |
| 42 | 5 | zcnd 9449 |
. . . . . . . . . . . 12
     |
| 43 | 23 | zcnd 9449 |
. . . . . . . . . . . 12
           |
| 44 | 4, 26 | zmulcld 9454 |
. . . . . . . . . . . . 13
   
               |
| 45 | 44 | zcnd 9449 |
. . . . . . . . . . . 12
   
               |
| 46 | 42, 43, 45 | subdid 8440 |
. . . . . . . . . . 11
   
       
                         
                 |
| 47 | | prmdiv.1 |
. . . . . . . . . . . . 13
         |
| 48 | | zq 9700 |
. . . . . . . . . . . . . . 15
               |
| 49 | 23, 48 | syl 14 |
. . . . . . . . . . . . . 14
           |
| 50 | | nnq 9707 |
. . . . . . . . . . . . . . 15
   |
| 51 | 9, 50 | syl 14 |
. . . . . . . . . . . . . 14
     |
| 52 | 9 | nngt0d 9034 |
. . . . . . . . . . . . . 14
     |
| 53 | | modqval 10416 |
. . . . . . . . . . . . . 14
     
 
     
          
                |
| 54 | 49, 51, 52, 53 | syl3anc 1249 |
. . . . . . . . . . . . 13
       
          
                |
| 55 | 47, 54 | eqtrid 2241 |
. . . . . . . . . . . 12
          
                |
| 56 | 55 | oveq2d 5938 |
. . . . . . . . . . 11
   
         
                 |
| 57 | | 2m1e1 9108 |
. . . . . . . . . . . . . . . . 17
   |
| 58 | 57 | oveq2i 5933 |
. . . . . . . . . . . . . . . 16
       |
| 59 | 7, 58 | eqtr4di 2247 |
. . . . . . . . . . . . . . 15
             |
| 60 | 9 | nncnd 9004 |
. . . . . . . . . . . . . . . 16
     |
| 61 | | 2cnd 9063 |
. . . . . . . . . . . . . . . 16
     |
| 62 | | 1cnd 8042 |
. . . . . . . . . . . . . . . 16
     |
| 63 | 60, 61, 62 | subsubd 8365 |
. . . . . . . . . . . . . . 15
   
         |
| 64 | 59, 63 | eqtrd 2229 |
. . . . . . . . . . . . . 14
             |
| 65 | 64 | oveq2d 5938 |
. . . . . . . . . . . . 13
                     |
| 66 | 42, 21 | expp1d 10766 |
. . . . . . . . . . . . 13
                     |
| 67 | 43, 42 | mulcomd 8048 |
. . . . . . . . . . . . 13
       
             |
| 68 | 65, 66, 67 | 3eqtrd 2233 |
. . . . . . . . . . . 12
                     |
| 69 | 26 | zcnd 9449 |
. . . . . . . . . . . . 13
                 |
| 70 | 60, 42, 69 | mul12d 8178 |
. . . . . . . . . . . 12
   
        
       
                |
| 71 | 68, 70 | oveq12d 5940 |
. . . . . . . . . . 11
             
                         
                 |
| 72 | 46, 56, 71 | 3eqtr4d 2239 |
. . . . . . . . . 10
   
          

                 |
| 73 | 72 | oveq1d 5937 |
. . . . . . . . 9
                 

                  |
| 74 | 14 | zcnd 9449 |
. . . . . . . . . 10
             |
| 75 | 28 | zcnd 9449 |
. . . . . . . . . 10
   
        
        |
| 76 | 74, 75, 62 | sub32d 8369 |
. . . . . . . . 9
             
        
                   
        
         |
| 77 | 73, 76 | eqtrd 2229 |
. . . . . . . 8
                  
        
         |
| 78 | 41, 77 | breqtrrd 4061 |
. . . . . . 7
         |
| 79 | | oveq2 5930 |
. . . . . . . . 9
 
     |
| 80 | 79 | oveq1d 5937 |
. . . . . . . 8
           |
| 81 | 80 | breq2d 4045 |
. . . . . . 7
     
       |
| 82 | 78, 81 | syl5ibcom 155 |
. . . . . 6
   
       |
| 83 | 42 | mul01d 8419 |
. . . . . . . . . 10
   
   |
| 84 | 83 | oveq1d 5937 |
. . . . . . . . 9
           |
| 85 | | df-neg 8200 |
. . . . . . . . 9
    |
| 86 | 84, 85 | eqtr4di 2247 |
. . . . . . . 8
          |
| 87 | 86 | breq2d 4045 |
. . . . . . 7
       
    |
| 88 | | dvdsnegb 11973 |
. . . . . . . 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 10438 |
. . . . . . . 8
     
 
                 |
| 94 | 23, 9, 93 | syl2anc 411 |
. . . . . . 7
       
           |
| 95 | 47, 94 | eqeltrid 2283 |
. . . . . 6
      
    |
| 96 | | nn0uz 9636 |
. . . . . . . 8
     |
| 97 | 11, 96 | eleqtrdi 2289 |
. . . . . . 7
   
       |
| 98 | | elfzp12 10174 |
. . . . . . 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 9498 |
. . . 4
   |
| 104 | 103 | oveq1i 5932 |
. . 3
           
   |
| 105 | 102, 104 | eleqtrrdi 2290 |
. 2
      
    |
| 106 | 105, 78 | jca 306 |
1
   
             |