Proof of Theorem pell1qrgaplem
Step | Hyp | Ref
| Expression |
1 | | nnrp 11842 |
. . . . . 6
   |
2 | 1 | ad2antrr 762 |
. . . . 5
     
                         |
3 | | 1rp 11836 |
. . . . . 6
 |
4 | 3 | a1i 11 |
. . . . 5
     
                         |
5 | 2, 4 | rpaddcld 11887 |
. . . 4
     
                       
   |
6 | 5 | rpsqrtcld 14150 |
. . 3
     
                               |
7 | 6 | rpred 11872 |
. 2
     
                               |
8 | 2 | rpsqrtcld 14150 |
. . 3
     
                             |
9 | 8 | rpred 11872 |
. 2
     
                             |
10 | | nn0re 11301 |
. . . 4

  |
11 | 10 | adantr 481 |
. . 3
 

  |
12 | 11 | ad2antlr 763 |
. 2
     
                         |
13 | | nn0re 11301 |
. . . . 5

  |
14 | 13 | adantl 482 |
. . . 4
 

  |
15 | 14 | ad2antlr 763 |
. . 3
     
                         |
16 | 9, 15 | remulcld 10070 |
. 2
     
                               |
17 | 2 | rpred 11872 |
. . . . . 6
     
                         |
18 | | 1re 10039 |
. . . . . . . 8
 |
19 | 18 | a1i 11 |
. . . . . . 7
     
                         |
20 | 15 | resqcld 13035 |
. . . . . . 7
     
                             |
21 | 19, 20 | resubcld 10458 |
. . . . . 6
     
                               |
22 | 17, 21 | remulcld 10070 |
. . . . 5
     
                       
         |
23 | | 0red 10041 |
. . . . . 6
     
                         |
24 | 17, 23 | remulcld 10070 |
. . . . 5
     
                       
   |
25 | 12 | resqcld 13035 |
. . . . 5
     
                             |
26 | | sq1 12958 |
. . . . . . . . 9
     |
27 | 26 | a1i 11 |
. . . . . . . 8
     
                             |
28 | | nnge1 11046 |
. . . . . . . . . . 11
   |
29 | 28 | adantl 482 |
. . . . . . . . . 10
    
   
            
           |
30 | | simplrl 800 |
. . . . . . . . . . . 12
    
   
            
                   |
31 | | oveq1 6657 |
. . . . . . . . . . . . . . . . . . . . . 22
           |
32 | 31 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . 21
    
   
            
                   |
33 | | sq0 12955 |
. . . . . . . . . . . . . . . . . . . . 21
     |
34 | 32, 33 | syl6eq 2672 |
. . . . . . . . . . . . . . . . . . . 20
    
   
            
               |
35 | 34 | oveq2d 6666 |
. . . . . . . . . . . . . . . . . . 19
    
   
            
         
         |
36 | 2 | rpcnd 11874 |
. . . . . . . . . . . . . . . . . . . . 21
     
                         |
37 | 36 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
    
   
            
           |
38 | 37 | mul01d 10235 |
. . . . . . . . . . . . . . . . . . 19
    
   
            
         
   |
39 | 35, 38 | eqtrd 2656 |
. . . . . . . . . . . . . . . . . 18
    
   
            
         
       |
40 | 39 | oveq2d 6666 |
. . . . . . . . . . . . . . . . 17
    
   
            
                             |
41 | | simplrr 801 |
. . . . . . . . . . . . . . . . 17
    
   
            
                       |
42 | 12 | recnd 10068 |
. . . . . . . . . . . . . . . . . . . 20
     
                         |
43 | 42 | sqcld 13006 |
. . . . . . . . . . . . . . . . . . 19
     
                             |
44 | 43 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
    
   
            
               |
45 | 44 | subid1d 10381 |
. . . . . . . . . . . . . . . . 17
    
   
            
                     |
46 | 40, 41, 45 | 3eqtr3d 2664 |
. . . . . . . . . . . . . . . 16
    
   
            
               |
47 | 26, 46 | syl5req 2669 |
. . . . . . . . . . . . . . 15
    
   
            
                   |
48 | | nn0ge0 11318 |
. . . . . . . . . . . . . . . . . . 19

  |
49 | 48 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
 

  |
50 | 49 | ad2antlr 763 |
. . . . . . . . . . . . . . . . 17
     
                         |
51 | | 0le1 10551 |
. . . . . . . . . . . . . . . . . 18
 |
52 | 51 | a1i 11 |
. . . . . . . . . . . . . . . . 17
     
                         |
53 | | sq11 12936 |
. . . . . . . . . . . . . . . . 17
  
 
 
        
   |
54 | 12, 50, 19, 52, 53 | syl22anc 1327 |
. . . . . . . . . . . . . . . 16
     
                               
   |
55 | 54 | adantr 481 |
. . . . . . . . . . . . . . 15
    
   
            
                 
   |
56 | 47, 55 | mpbid 222 |
. . . . . . . . . . . . . 14
    
   
            
           |
57 | | simpr 477 |
. . . . . . . . . . . . . . . 16
    
   
            
           |
58 | 57 | oveq2d 6666 |
. . . . . . . . . . . . . . 15
    
   
            
                       |
59 | 8 | rpcnd 11874 |
. . . . . . . . . . . . . . . . 17
     
                             |
60 | 59 | adantr 481 |
. . . . . . . . . . . . . . . 16
    
   
            
               |
61 | 60 | mul01d 10235 |
. . . . . . . . . . . . . . 15
    
   
            
                 |
62 | 58, 61 | eqtrd 2656 |
. . . . . . . . . . . . . 14
    
   
            
                 |
63 | 56, 62 | oveq12d 6668 |
. . . . . . . . . . . . 13
    
   
            
         
           |
64 | | 1p0e1 11133 |
. . . . . . . . . . . . 13
   |
65 | 63, 64 | syl6eq 2672 |
. . . . . . . . . . . 12
    
   
            
         
         |
66 | 30, 65 | breqtrd 4679 |
. . . . . . . . . . 11
    
   
            
           |
67 | 18 | ltnri 10146 |
. . . . . . . . . . 11
 |
68 | | pm2.24 121 |
. . . . . . . . . . 11
 
   |
69 | 66, 67, 68 | mpisyl 21 |
. . . . . . . . . 10
    
   
            
           |
70 | | simplrr 801 |
. . . . . . . . . . 11
     
                         |
71 | | elnn0 11294 |
. . . . . . . . . . 11

    |
72 | 70, 71 | sylib 208 |
. . . . . . . . . 10
     
                       
   |
73 | 29, 69, 72 | mpjaodan 827 |
. . . . . . . . 9
     
                         |
74 | | nn0ge0 11318 |
. . . . . . . . . . . 12

  |
75 | 74 | adantl 482 |
. . . . . . . . . . 11
 

  |
76 | 75 | ad2antlr 763 |
. . . . . . . . . 10
     
                         |
77 | 19, 15, 52, 76 | le2sqd 13044 |
. . . . . . . . 9
     
                       
           |
78 | 73, 77 | mpbid 222 |
. . . . . . . 8
     
                                 |
79 | 27, 78 | eqbrtrrd 4677 |
. . . . . . 7
     
                             |
80 | 19, 20 | suble0d 10618 |
. . . . . . 7
     
                             
       |
81 | 79, 80 | mpbird 247 |
. . . . . 6
     
                               |
82 | 21, 23, 2 | lemul2d 11916 |
. . . . . 6
     
                             
       
     |
83 | 81, 82 | mpbid 222 |
. . . . 5
     
                       
           |
84 | 22, 24, 25, 83 | leadd2dd 10642 |
. . . 4
     
                                               |
85 | 5 | rpcnd 11874 |
. . . . . 6
     
                       
   |
86 | 85 | sqsqrtd 14178 |
. . . . 5
     
                           
         |
87 | | simprr 796 |
. . . . . . 7
     
                                     |
88 | 87 | eqcomd 2628 |
. . . . . 6
     
                            
        |
89 | 88 | oveq2d 6666 |
. . . . 5
     
                       
       
         |
90 | 15 | recnd 10068 |
. . . . . . . . 9
     
                         |
91 | 90 | sqcld 13006 |
. . . . . . . 8
     
                             |
92 | 36, 91 | mulcld 10060 |
. . . . . . 7
     
                       
       |
93 | 36, 43, 92 | addsub12d 10415 |
. . . . . 6
     
                       
     
                       |
94 | 19 | recnd 10068 |
. . . . . . . . 9
     
                         |
95 | 36, 94, 91 | subdid 10486 |
. . . . . . . 8
     
                       
          
        |
96 | 36 | mulid1d 10057 |
. . . . . . . . 9
     
                       
   |
97 | 96 | oveq1d 6665 |
. . . . . . . 8
     
                                  
        |
98 | 95, 97 | eqtr2d 2657 |
. . . . . . 7
     
                       
                 |
99 | 98 | oveq2d 6666 |
. . . . . 6
     
                                                     |
100 | 93, 99 | eqtrd 2656 |
. . . . 5
     
                       
     
                       |
101 | 86, 89, 100 | 3eqtrd 2660 |
. . . 4
     
                           
                     |
102 | 36 | mul01d 10235 |
. . . . . 6
     
                       
   |
103 | 102 | oveq2d 6666 |
. . . . 5
     
                                       |
104 | 43 | addid1d 10236 |
. . . . 5
     
                                   |
105 | 103, 104 | eqtr2d 2657 |
. . . 4
     
                                     |
106 | 84, 101, 105 | 3brtr4d 4685 |
. . 3
     
                           
           |
107 | 6 | rpge0d 11876 |
. . . 4
     
                          
    |
108 | 7, 12, 107, 50 | le2sqd 13044 |
. . 3
     
                           
 
                 |
109 | 106, 108 | mpbird 247 |
. 2
     
                               |
110 | 59 | mulid1d 10057 |
. . 3
     
                                   |
111 | 19, 15, 8 | lemul2d 11916 |
. . . 4
     
                       
               |
112 | 73, 111 | mpbid 222 |
. . 3
     
                                     |
113 | 110, 112 | eqbrtrrd 4677 |
. 2
     
                                   |
114 | 7, 9, 12, 16, 109, 113 | le2addd 10646 |
1
     
                           
                 |