Proof of Theorem pythagtriplem16
| Step | Hyp | Ref
| Expression |
| 1 | | pythagtriplem15.1 |
. . . . 5
                 |
| 2 | | pythagtriplem15.2 |
. . . . 5
                 |
| 3 | 1, 2 | oveq12i 5934 |
. . . 4
              
         
            |
| 4 | | simp13 1031 |
. . . . . . . . . . 11
  
                      |
| 5 | | simp12 1030 |
. . . . . . . . . . 11
  
                      |
| 6 | 4, 5 | nnaddcld 9038 |
. . . . . . . . . 10
  
                    
   |
| 7 | 6 | nnrpd 9769 |
. . . . . . . . 9
  
                    
   |
| 8 | 7 | rpsqrtcld 11323 |
. . . . . . . 8
  
                            |
| 9 | 8 | rpcnd 9773 |
. . . . . . 7
  
                            |
| 10 | 4 | nnzd 9447 |
. . . . . . . . . . . 12
  
                      |
| 11 | 5 | nnzd 9447 |
. . . . . . . . . . . 12
  
                      |
| 12 | 10, 11 | zsubcld 9453 |
. . . . . . . . . . 11
  
                    
   |
| 13 | 12 | zred 9448 |
. . . . . . . . . 10
  
                    
   |
| 14 | | pythagtriplem10 12438 |
. . . . . . . . . . 11
  
                
   |
| 15 | 14 | 3adant3 1019 |
. . . . . . . . . 10
  
                        |
| 16 | 13, 15 | elrpd 9768 |
. . . . . . . . 9
  
                    
   |
| 17 | 16 | rpsqrtcld 11323 |
. . . . . . . 8
  
                            |
| 18 | 17 | rpcnd 9773 |
. . . . . . 7
  
                            |
| 19 | 9, 18 | addcld 8046 |
. . . . . 6
  
                        
           |
| 20 | | 2cnd 9063 |
. . . . . 6
  
                      |
| 21 | 9, 18 | subcld 8337 |
. . . . . 6
  
                        
           |
| 22 | | 2ap0 9083 |
. . . . . . 7
#  |
| 23 | 22 | a1i 9 |
. . . . . 6
  
                    #   |
| 24 | 19, 20, 21, 20, 23, 23 | divmuldivapd 8859 |
. . . . 5
  
                                                
                               
         |
| 25 | 19, 21 | mulcld 8047 |
. . . . . 6
  
                         
             
            |
| 26 | 25, 20, 20, 23, 23 | divdivap1d 8849 |
. . . . 5
  
                                 
       
                                      
         |
| 27 | | nnre 8997 |
. . . . . . . . . . . . 13
   |
| 28 | | nnre 8997 |
. . . . . . . . . . . . 13
   |
| 29 | | readdcl 8005 |
. . . . . . . . . . . . 13
 
     |
| 30 | 27, 28, 29 | syl2anr 290 |
. . . . . . . . . . . 12
 
     |
| 31 | 30 | 3adant1 1017 |
. . . . . . . . . . 11
 
 
   |
| 32 | 31 | 3ad2ant1 1020 |
. . . . . . . . . 10
  
                    
   |
| 33 | 27 | adantl 277 |
. . . . . . . . . . . . . 14
 
   |
| 34 | 28 | adantr 276 |
. . . . . . . . . . . . . 14
 
   |
| 35 | | nngt0 9015 |
. . . . . . . . . . . . . . 15
   |
| 36 | 35 | adantl 277 |
. . . . . . . . . . . . . 14
 
   |
| 37 | | nngt0 9015 |
. . . . . . . . . . . . . . 15
   |
| 38 | 37 | adantr 276 |
. . . . . . . . . . . . . 14
 
   |
| 39 | 33, 34, 36, 38 | addgt0d 8548 |
. . . . . . . . . . . . 13
 
     |
| 40 | | 0re 8026 |
. . . . . . . . . . . . . 14
 |
| 41 | | ltle 8114 |
. . . . . . . . . . . . . 14
  
    
     |
| 42 | 40, 41 | mpan 424 |
. . . . . . . . . . . . 13
   
       |
| 43 | 30, 39, 42 | sylc 62 |
. . . . . . . . . . . 12
 

    |
| 44 | 43 | 3adant1 1017 |
. . . . . . . . . . 11
 
     |
| 45 | 44 | 3ad2ant1 1020 |
. . . . . . . . . 10
  
                        |
| 46 | | resqrtth 11196 |
. . . . . . . . . 10
           
         |
| 47 | 32, 45, 46 | syl2anc 411 |
. . . . . . . . 9
  
                        
         |
| 48 | | resubcl 8290 |
. . . . . . . . . . . . 13
 
     |
| 49 | 27, 28, 48 | syl2anr 290 |
. . . . . . . . . . . 12
 
     |
| 50 | 49 | 3adant1 1017 |
. . . . . . . . . . 11
 
 
   |
| 51 | 50 | 3ad2ant1 1020 |
. . . . . . . . . 10
  
                    
   |
| 52 | | ltle 8114 |
. . . . . . . . . . . 12
  
    
     |
| 53 | 40, 52 | mpan 424 |
. . . . . . . . . . 11
   
       |
| 54 | 51, 15, 53 | sylc 62 |
. . . . . . . . . 10
  
                        |
| 55 | | resqrtth 11196 |
. . . . . . . . . 10
           
         |
| 56 | 51, 54, 55 | syl2anc 411 |
. . . . . . . . 9
  
                        
         |
| 57 | 47, 56 | oveq12d 5940 |
. . . . . . . 8
  
                         
                        |
| 58 | 57 | oveq1d 5937 |
. . . . . . 7
  
                                                
     |
| 59 | | subsq 10738 |
. . . . . . . . 9
     
                                          
       
            |
| 60 | 9, 18, 59 | syl2anc 411 |
. . . . . . . 8
  
                         
                     
             
            |
| 61 | 60 | oveq1d 5937 |
. . . . . . 7
  
                                                        
       
             |
| 62 | | nncn 8998 |
. . . . . . . . . . . 12
   |
| 63 | | nncn 8998 |
. . . . . . . . . . . 12
   |
| 64 | | pnncan 8267 |
. . . . . . . . . . . . . 14
 
           |
| 65 | 64 | 3anidm23 1308 |
. . . . . . . . . . . . 13
 
    
      |
| 66 | | 2times 9118 |
. . . . . . . . . . . . . 14
       |
| 67 | 66 | adantl 277 |
. . . . . . . . . . . . 13
 
       |
| 68 | 65, 67 | eqtr4d 2232 |
. . . . . . . . . . . 12
 
    
      |
| 69 | 62, 63, 68 | syl2anr 290 |
. . . . . . . . . . 11
 
    
      |
| 70 | 69 | 3adant1 1017 |
. . . . . . . . . 10
 
           |
| 71 | 70 | 3ad2ant1 1020 |
. . . . . . . . 9
  
                              |
| 72 | 71 | oveq1d 5937 |
. . . . . . . 8
  
                        
         |
| 73 | 5 | nncnd 9004 |
. . . . . . . . 9
  
                      |
| 74 | 73, 20, 23 | divcanap3d 8822 |
. . . . . . . 8
  
                          |
| 75 | 72, 74 | eqtrd 2229 |
. . . . . . 7
  
                        
     |
| 76 | 58, 61, 75 | 3eqtr3d 2237 |
. . . . . 6
  
                                              
       |
| 77 | 76 | oveq1d 5937 |
. . . . 5
  
                                 
       
                |
| 78 | 24, 26, 77 | 3eqtr2d 2235 |
. . . 4
  
                                                
         |
| 79 | 3, 78 | eqtrid 2241 |
. . 3
  
                    
     |
| 80 | 79 | oveq2d 5938 |
. 2
  
                              |
| 81 | 73, 20, 23 | divcanap2d 8819 |
. 2
  
                          |
| 82 | 80, 81 | eqtr2d 2230 |
1
  
                          |