Proof of Theorem quartlem1
Step | Hyp | Ref
| Expression |
1 | | 2cn 11091 |
. . . . . . . . . 10
|
2 | | quartlem1.p |
. . . . . . . . . 10
|
3 | | sqmul 12926 |
. . . . . . . . . 10
|
4 | 1, 2, 3 | sylancr 695 |
. . . . . . . . 9
|
5 | | sq2 12960 |
. . . . . . . . . 10
|
6 | 5 | oveq1i 6660 |
. . . . . . . . 9
|
7 | 4, 6 | syl6eq 2672 |
. . . . . . . 8
|
8 | 7 | oveq1d 6665 |
. . . . . . 7
|
9 | | 4cn 11098 |
. . . . . . . . 9
|
10 | 9 | a1i 11 |
. . . . . . . 8
|
11 | | 3cn 11095 |
. . . . . . . . 9
|
12 | 11 | a1i 11 |
. . . . . . . 8
|
13 | 2 | sqcld 13006 |
. . . . . . . 8
|
14 | 10, 12, 13 | subdird 10487 |
. . . . . . 7
|
15 | 8, 14 | eqtr4d 2659 |
. . . . . 6
|
16 | | ax-1cn 9994 |
. . . . . . . . . 10
|
17 | | 3p1e4 11153 |
. . . . . . . . . 10
|
18 | 9, 11, 16, 17 | subaddrii 10370 |
. . . . . . . . 9
|
19 | 18 | oveq1i 6660 |
. . . . . . . 8
|
20 | | mulid2 10038 |
. . . . . . . 8
|
21 | 19, 20 | syl5eq 2668 |
. . . . . . 7
|
22 | 13, 21 | syl 17 |
. . . . . 6
|
23 | 15, 22 | eqtr2d 2657 |
. . . . 5
|
24 | 23 | oveq1d 6665 |
. . . 4
; ; |
25 | | mulcl 10020 |
. . . . . . 7
|
26 | 1, 2, 25 | sylancr 695 |
. . . . . 6
|
27 | 26 | sqcld 13006 |
. . . . 5
|
28 | | mulcl 10020 |
. . . . . 6
|
29 | 11, 13, 28 | sylancr 695 |
. . . . 5
|
30 | | 1nn0 11308 |
. . . . . . . 8
|
31 | | 2nn 11185 |
. . . . . . . 8
|
32 | 30, 31 | decnncl 11518 |
. . . . . . 7
; |
33 | 32 | nncni 11030 |
. . . . . 6
; |
34 | | quartlem1.r |
. . . . . 6
|
35 | | mulcl 10020 |
. . . . . 6
;
; |
36 | 33, 34, 35 | sylancr 695 |
. . . . 5
; |
37 | 27, 29, 36 | subsubd 10420 |
. . . 4
; ; |
38 | 24, 37 | eqtr4d 2659 |
. . 3
; ; |
39 | | quartlem1.u |
. . 3
; |
40 | | mulcl 10020 |
. . . . . . 7
|
41 | 9, 34, 40 | sylancr 695 |
. . . . . 6
|
42 | 12, 13, 41 | subdid 10486 |
. . . . 5
|
43 | | 4t3e12 11632 |
. . . . . . . . 9
; |
44 | 9, 11, 43 | mulcomli 10047 |
. . . . . . . 8
; |
45 | 44 | oveq1i 6660 |
. . . . . . 7
; |
46 | 12, 10, 34 | mulassd 10063 |
. . . . . . 7
|
47 | 45, 46 | syl5eqr 2670 |
. . . . . 6
; |
48 | 47 | oveq2d 6666 |
. . . . 5
; |
49 | 42, 48 | eqtr4d 2659 |
. . . 4
; |
50 | 49 | oveq2d 6666 |
. . 3
; |
51 | 38, 39, 50 | 3eqtr4d 2666 |
. 2
|
52 | 1 | a1i 11 |
. . . . . . . . . 10
|
53 | | 3nn0 11310 |
. . . . . . . . . . 11
|
54 | 53 | a1i 11 |
. . . . . . . . . 10
|
55 | 52, 2, 54 | mulexpd 13023 |
. . . . . . . . 9
|
56 | | cu2 12963 |
. . . . . . . . . 10
|
57 | 56 | oveq1i 6660 |
. . . . . . . . 9
|
58 | 55, 57 | syl6eq 2672 |
. . . . . . . 8
|
59 | 58 | oveq2d 6666 |
. . . . . . 7
|
60 | | 8cn 11106 |
. . . . . . . . 9
|
61 | 60 | a1i 11 |
. . . . . . . 8
|
62 | | expcl 12878 |
. . . . . . . . 9
|
63 | 2, 53, 62 | sylancl 694 |
. . . . . . . 8
|
64 | 52, 61, 63 | mul12d 10245 |
. . . . . . 7
|
65 | 59, 64 | eqtrd 2656 |
. . . . . 6
|
66 | | 9cn 11108 |
. . . . . . . . 9
|
67 | 66 | a1i 11 |
. . . . . . . 8
|
68 | | mulcl 10020 |
. . . . . . . . 9
|
69 | 1, 63, 68 | sylancr 695 |
. . . . . . . 8
|
70 | 2, 34 | mulcld 10060 |
. . . . . . . . 9
|
71 | | mulcl 10020 |
. . . . . . . . 9
|
72 | 60, 70, 71 | sylancr 695 |
. . . . . . . 8
|
73 | 67, 69, 72 | subdid 10486 |
. . . . . . 7
|
74 | 26, 13, 41 | subdid 10486 |
. . . . . . . . 9
|
75 | 52, 2, 13 | mulassd 10063 |
. . . . . . . . . . 11
|
76 | 2, 13 | mulcomd 10061 |
. . . . . . . . . . . . 13
|
77 | | df-3 11080 |
. . . . . . . . . . . . . . 15
|
78 | 77 | oveq2i 6661 |
. . . . . . . . . . . . . 14
|
79 | | 2nn0 11309 |
. . . . . . . . . . . . . . 15
|
80 | | expp1 12867 |
. . . . . . . . . . . . . . 15
|
81 | 2, 79, 80 | sylancl 694 |
. . . . . . . . . . . . . 14
|
82 | 78, 81 | syl5eq 2668 |
. . . . . . . . . . . . 13
|
83 | 76, 82 | eqtr4d 2659 |
. . . . . . . . . . . 12
|
84 | 83 | oveq2d 6666 |
. . . . . . . . . . 11
|
85 | 75, 84 | eqtrd 2656 |
. . . . . . . . . 10
|
86 | 52, 2, 10, 34 | mul4d 10248 |
. . . . . . . . . . 11
|
87 | | 4t2e8 11181 |
. . . . . . . . . . . . 13
|
88 | 9, 1, 87 | mulcomli 10047 |
. . . . . . . . . . . 12
|
89 | 88 | oveq1i 6660 |
. . . . . . . . . . 11
|
90 | 86, 89 | syl6eq 2672 |
. . . . . . . . . 10
|
91 | 85, 90 | oveq12d 6668 |
. . . . . . . . 9
|
92 | 74, 91 | eqtrd 2656 |
. . . . . . . 8
|
93 | 92 | oveq2d 6666 |
. . . . . . 7
|
94 | | 9t8e72 11669 |
. . . . . . . . . 10
; |
95 | 94 | oveq1i 6660 |
. . . . . . . . 9
;
|
96 | 67, 61, 70 | mulassd 10063 |
. . . . . . . . 9
|
97 | 95, 96 | syl5eqr 2670 |
. . . . . . . 8
;
|
98 | 97 | oveq2d 6666 |
. . . . . . 7
;
|
99 | 73, 93, 98 | 3eqtr4d 2666 |
. . . . . 6
;
|
100 | 65, 99 | oveq12d 6668 |
. . . . 5
; |
101 | | mulcl 10020 |
. . . . . . 7
|
102 | 60, 69, 101 | sylancr 695 |
. . . . . 6
|
103 | | mulcl 10020 |
. . . . . . 7
|
104 | 66, 69, 103 | sylancr 695 |
. . . . . 6
|
105 | | 7nn0 11314 |
. . . . . . . . 9
|
106 | 105, 31 | decnncl 11518 |
. . . . . . . 8
; |
107 | 106 | nncni 11030 |
. . . . . . 7
; |
108 | | mulcl 10020 |
. . . . . . 7
;
;
|
109 | 107, 70, 108 | sylancr 695 |
. . . . . 6
;
|
110 | 102, 104,
109 | subsubd 10420 |
. . . . 5
;
; |
111 | 104, 102 | negsubdi2d 10408 |
. . . . . . 7
|
112 | 67, 61, 69 | subdird 10487 |
. . . . . . . . 9
|
113 | | 8p1e9 11158 |
. . . . . . . . . . . 12
|
114 | 66, 60, 16, 113 | subaddrii 10370 |
. . . . . . . . . . 11
|
115 | 114 | oveq1i 6660 |
. . . . . . . . . 10
|
116 | 69 | mulid2d 10058 |
. . . . . . . . . 10
|
117 | 115, 116 | syl5eq 2668 |
. . . . . . . . 9
|
118 | 112, 117 | eqtr3d 2658 |
. . . . . . . 8
|
119 | 118 | negeqd 10275 |
. . . . . . 7
|
120 | 111, 119 | eqtr3d 2658 |
. . . . . 6
|
121 | 120 | oveq1d 6665 |
. . . . 5
; ;
|
122 | 100, 110,
121 | 3eqtrd 2660 |
. . . 4
;
|
123 | | 7nn 11190 |
. . . . . . 7
|
124 | 79, 123 | decnncl 11518 |
. . . . . 6
; |
125 | 124 | nncni 11030 |
. . . . 5
; |
126 | | quartlem1.q |
. . . . . 6
|
127 | 126 | sqcld 13006 |
. . . . 5
|
128 | | mulneg2 10467 |
. . . . 5
; ; ; |
129 | 125, 127,
128 | sylancr 695 |
. . . 4
; ; |
130 | 122, 129 | oveq12d 6668 |
. . 3
; ; ; |
131 | 69 | negcld 10379 |
. . . . 5
|
132 | | mulcl 10020 |
. . . . . 6
; ; |
133 | 125, 127,
132 | sylancr 695 |
. . . . 5
; |
134 | 131, 109,
133 | addsubd 10413 |
. . . 4
;
; ; ;
|
135 | 131, 109 | addcld 10059 |
. . . . 5
;
|
136 | 135, 133 | negsubd 10398 |
. . . 4
;
; ; ; |
137 | | quartlem1.v |
. . . 4
; ;
|
138 | 134, 136,
137 | 3eqtr4d 2666 |
. . 3
;
; |
139 | 130, 138 | eqtr2d 2657 |
. 2
; |
140 | 51, 139 | jca 554 |
1
; |