MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  quart1 Unicode version

Theorem quart1 20152
Description: Depress a quartic equation. (Contributed by Mario Carneiro, 6-May-2015.)
Hypotheses
Ref Expression
quart1.a  |-  ( ph  ->  A  e.  CC )
quart1.b  |-  ( ph  ->  B  e.  CC )
quart1.c  |-  ( ph  ->  C  e.  CC )
quart1.d  |-  ( ph  ->  D  e.  CC )
quart1.p  |-  ( ph  ->  P  =  ( B  -  ( ( 3  /  8 )  x.  ( A ^ 2 ) ) ) )
quart1.q  |-  ( ph  ->  Q  =  ( ( C  -  ( ( A  x.  B )  /  2 ) )  +  ( ( A ^ 3 )  / 
8 ) ) )
quart1.r  |-  ( ph  ->  R  =  ( ( D  -  ( ( C  x.  A )  /  4 ) )  +  ( ( ( ( A ^ 2 )  x.  B )  / ; 1 6 )  -  ( ( 3  / ;; 2 5 6 )  x.  ( A ^
4 ) ) ) ) )
quart1.x  |-  ( ph  ->  X  e.  CC )
quart1.y  |-  ( ph  ->  Y  =  ( X  +  ( A  / 
4 ) ) )
Assertion
Ref Expression
quart1  |-  ( ph  ->  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( B  x.  ( X ^ 2 ) )  +  ( ( C  x.  X )  +  D ) ) )  =  ( ( ( Y ^ 4 )  +  ( P  x.  ( Y ^ 2 ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) )

Proof of Theorem quart1
StepHypRef Expression
1 quart1.y . . . . . . 7  |-  ( ph  ->  Y  =  ( X  +  ( A  / 
4 ) ) )
21oveq1d 5873 . . . . . 6  |-  ( ph  ->  ( Y ^ 4 )  =  ( ( X  +  ( A  /  4 ) ) ^ 4 ) )
3 quart1.x . . . . . . 7  |-  ( ph  ->  X  e.  CC )
4 quart1.a . . . . . . . 8  |-  ( ph  ->  A  e.  CC )
5 4cn 9820 . . . . . . . . 9  |-  4  e.  CC
65a1i 10 . . . . . . . 8  |-  ( ph  ->  4  e.  CC )
7 4nn 9879 . . . . . . . . . 10  |-  4  e.  NN
87nnne0i 9780 . . . . . . . . 9  |-  4  =/=  0
98a1i 10 . . . . . . . 8  |-  ( ph  ->  4  =/=  0 )
104, 6, 9divcld 9536 . . . . . . 7  |-  ( ph  ->  ( A  /  4
)  e.  CC )
11 binom4 20146 . . . . . . 7  |-  ( ( X  e.  CC  /\  ( A  /  4
)  e.  CC )  ->  ( ( X  +  ( A  / 
4 ) ) ^
4 )  =  ( ( ( X ^
4 )  +  ( 4  x.  ( ( X ^ 3 )  x.  ( A  / 
4 ) ) ) )  +  ( ( 6  x.  ( ( X ^ 2 )  x.  ( ( A  /  4 ) ^
2 ) ) )  +  ( ( 4  x.  ( X  x.  ( ( A  / 
4 ) ^ 3 ) ) )  +  ( ( A  / 
4 ) ^ 4 ) ) ) ) )
123, 10, 11syl2anc 642 . . . . . 6  |-  ( ph  ->  ( ( X  +  ( A  /  4
) ) ^ 4 )  =  ( ( ( X ^ 4 )  +  ( 4  x.  ( ( X ^ 3 )  x.  ( A  /  4
) ) ) )  +  ( ( 6  x.  ( ( X ^ 2 )  x.  ( ( A  / 
4 ) ^ 2 ) ) )  +  ( ( 4  x.  ( X  x.  (
( A  /  4
) ^ 3 ) ) )  +  ( ( A  /  4
) ^ 4 ) ) ) ) )
13 3nn0 9983 . . . . . . . . . . 11  |-  3  e.  NN0
14 expcl 11121 . . . . . . . . . . 11  |-  ( ( X  e.  CC  /\  3  e.  NN0 )  -> 
( X ^ 3 )  e.  CC )
153, 13, 14sylancl 643 . . . . . . . . . 10  |-  ( ph  ->  ( X ^ 3 )  e.  CC )
166, 15, 10mul12d 9021 . . . . . . . . 9  |-  ( ph  ->  ( 4  x.  (
( X ^ 3 )  x.  ( A  /  4 ) ) )  =  ( ( X ^ 3 )  x.  ( 4  x.  ( A  /  4
) ) ) )
174, 6, 9divcan2d 9538 . . . . . . . . . 10  |-  ( ph  ->  ( 4  x.  ( A  /  4 ) )  =  A )
1817oveq2d 5874 . . . . . . . . 9  |-  ( ph  ->  ( ( X ^
3 )  x.  (
4  x.  ( A  /  4 ) ) )  =  ( ( X ^ 3 )  x.  A ) )
1915, 4mulcomd 8856 . . . . . . . . 9  |-  ( ph  ->  ( ( X ^
3 )  x.  A
)  =  ( A  x.  ( X ^
3 ) ) )
2016, 18, 193eqtrd 2319 . . . . . . . 8  |-  ( ph  ->  ( 4  x.  (
( X ^ 3 )  x.  ( A  /  4 ) ) )  =  ( A  x.  ( X ^
3 ) ) )
2120oveq2d 5874 . . . . . . 7  |-  ( ph  ->  ( ( X ^
4 )  +  ( 4  x.  ( ( X ^ 3 )  x.  ( A  / 
4 ) ) ) )  =  ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) ) )
22 6nn 9881 . . . . . . . . . . . 12  |-  6  e.  NN
2322nncni 9756 . . . . . . . . . . 11  |-  6  e.  CC
2423a1i 10 . . . . . . . . . 10  |-  ( ph  ->  6  e.  CC )
2510sqcld 11243 . . . . . . . . . 10  |-  ( ph  ->  ( ( A  / 
4 ) ^ 2 )  e.  CC )
263sqcld 11243 . . . . . . . . . 10  |-  ( ph  ->  ( X ^ 2 )  e.  CC )
2724, 25, 26mulassd 8858 . . . . . . . . 9  |-  ( ph  ->  ( ( 6  x.  ( ( A  / 
4 ) ^ 2 ) )  x.  ( X ^ 2 ) )  =  ( 6  x.  ( ( ( A  /  4 ) ^
2 )  x.  ( X ^ 2 ) ) ) )
28 3cn 9818 . . . . . . . . . . . . . . . 16  |-  3  e.  CC
29 2cn 9816 . . . . . . . . . . . . . . . 16  |-  2  e.  CC
30 3t2e6 9872 . . . . . . . . . . . . . . . 16  |-  ( 3  x.  2 )  =  6
3128, 29, 30mulcomli 8844 . . . . . . . . . . . . . . 15  |-  ( 2  x.  3 )  =  6
32 8nn 9883 . . . . . . . . . . . . . . . . 17  |-  8  e.  NN
3332nncni 9756 . . . . . . . . . . . . . . . 16  |-  8  e.  CC
34 8t2e16 10212 . . . . . . . . . . . . . . . 16  |-  ( 8  x.  2 )  = ; 1
6
3533, 29, 34mulcomli 8844 . . . . . . . . . . . . . . 15  |-  ( 2  x.  8 )  = ; 1
6
3631, 35oveq12i 5870 . . . . . . . . . . . . . 14  |-  ( ( 2  x.  3 )  /  ( 2  x.  8 ) )  =  ( 6  / ; 1 6 )
3732nnne0i 9780 . . . . . . . . . . . . . . . 16  |-  8  =/=  0
3833, 37pm3.2i 441 . . . . . . . . . . . . . . 15  |-  ( 8  e.  CC  /\  8  =/=  0 )
39 2ne0 9829 . . . . . . . . . . . . . . . 16  |-  2  =/=  0
4029, 39pm3.2i 441 . . . . . . . . . . . . . . 15  |-  ( 2  e.  CC  /\  2  =/=  0 )
41 divcan5 9462 . . . . . . . . . . . . . . 15  |-  ( ( 3  e.  CC  /\  ( 8  e.  CC  /\  8  =/=  0 )  /\  ( 2  e.  CC  /\  2  =/=  0 ) )  -> 
( ( 2  x.  3 )  /  (
2  x.  8 ) )  =  ( 3  /  8 ) )
4228, 38, 40, 41mp3an 1277 . . . . . . . . . . . . . 14  |-  ( ( 2  x.  3 )  /  ( 2  x.  8 ) )  =  ( 3  /  8
)
4336, 42eqtr3i 2305 . . . . . . . . . . . . 13  |-  ( 6  / ; 1 6 )  =  ( 3  /  8
)
4443oveq2i 5869 . . . . . . . . . . . 12  |-  ( ( A ^ 2 )  x.  ( 6  / ; 1 6 ) )  =  ( ( A ^ 2 )  x.  ( 3  /  8 ) )
454sqcld 11243 . . . . . . . . . . . . 13  |-  ( ph  ->  ( A ^ 2 )  e.  CC )
46 1nn0 9981 . . . . . . . . . . . . . . . 16  |-  1  e.  NN0
4746, 22decnncl 10137 . . . . . . . . . . . . . . 15  |- ; 1 6  e.  NN
4847nncni 9756 . . . . . . . . . . . . . 14  |- ; 1 6  e.  CC
4948a1i 10 . . . . . . . . . . . . 13  |-  ( ph  -> ; 1
6  e.  CC )
5047nnne0i 9780 . . . . . . . . . . . . . 14  |- ; 1 6  =/=  0
5150a1i 10 . . . . . . . . . . . . 13  |-  ( ph  -> ; 1
6  =/=  0 )
5245, 24, 49, 51div12d 9572 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( A ^
2 )  x.  (
6  / ; 1 6 ) )  =  ( 6  x.  ( ( A ^
2 )  / ; 1 6 ) ) )
5344, 52syl5eqr 2329 . . . . . . . . . . 11  |-  ( ph  ->  ( ( A ^
2 )  x.  (
3  /  8 ) )  =  ( 6  x.  ( ( A ^ 2 )  / ; 1 6 ) ) )
5428, 33, 37divcli 9502 . . . . . . . . . . . 12  |-  ( 3  /  8 )  e.  CC
55 mulcom 8823 . . . . . . . . . . . 12  |-  ( ( ( 3  /  8
)  e.  CC  /\  ( A ^ 2 )  e.  CC )  -> 
( ( 3  / 
8 )  x.  ( A ^ 2 ) )  =  ( ( A ^ 2 )  x.  ( 3  /  8
) ) )
5654, 45, 55sylancr 644 . . . . . . . . . . 11  |-  ( ph  ->  ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  =  ( ( A ^ 2 )  x.  ( 3  /  8
) ) )
574, 6, 9sqdivd 11258 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( A  / 
4 ) ^ 2 )  =  ( ( A ^ 2 )  /  ( 4 ^ 2 ) ) )
585sqvali 11183 . . . . . . . . . . . . . . 15  |-  ( 4 ^ 2 )  =  ( 4  x.  4 )
59 4t4e16 10197 . . . . . . . . . . . . . . 15  |-  ( 4  x.  4 )  = ; 1
6
6058, 59eqtri 2303 . . . . . . . . . . . . . 14  |-  ( 4 ^ 2 )  = ; 1
6
6160oveq2i 5869 . . . . . . . . . . . . 13  |-  ( ( A ^ 2 )  /  ( 4 ^ 2 ) )  =  ( ( A ^
2 )  / ; 1 6 )
6257, 61syl6eq 2331 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( A  / 
4 ) ^ 2 )  =  ( ( A ^ 2 )  / ; 1 6 ) )
6362oveq2d 5874 . . . . . . . . . . 11  |-  ( ph  ->  ( 6  x.  (
( A  /  4
) ^ 2 ) )  =  ( 6  x.  ( ( A ^ 2 )  / ; 1 6 ) ) )
6453, 56, 633eqtr4d 2325 . . . . . . . . . 10  |-  ( ph  ->  ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  =  ( 6  x.  ( ( A  / 
4 ) ^ 2 ) ) )
6564oveq1d 5873 . . . . . . . . 9  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  ( X ^ 2 ) )  =  ( ( 6  x.  ( ( A  /  4 ) ^
2 ) )  x.  ( X ^ 2 ) ) )
6626, 25mulcomd 8856 . . . . . . . . . 10  |-  ( ph  ->  ( ( X ^
2 )  x.  (
( A  /  4
) ^ 2 ) )  =  ( ( ( A  /  4
) ^ 2 )  x.  ( X ^
2 ) ) )
6766oveq2d 5874 . . . . . . . . 9  |-  ( ph  ->  ( 6  x.  (
( X ^ 2 )  x.  ( ( A  /  4 ) ^ 2 ) ) )  =  ( 6  x.  ( ( ( A  /  4 ) ^ 2 )  x.  ( X ^ 2 ) ) ) )
6827, 65, 673eqtr4rd 2326 . . . . . . . 8  |-  ( ph  ->  ( 6  x.  (
( X ^ 2 )  x.  ( ( A  /  4 ) ^ 2 ) ) )  =  ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) ) )
69 expcl 11121 . . . . . . . . . . . 12  |-  ( ( ( A  /  4
)  e.  CC  /\  3  e.  NN0 )  -> 
( ( A  / 
4 ) ^ 3 )  e.  CC )
7010, 13, 69sylancl 643 . . . . . . . . . . 11  |-  ( ph  ->  ( ( A  / 
4 ) ^ 3 )  e.  CC )
716, 3, 70mul12d 9021 . . . . . . . . . 10  |-  ( ph  ->  ( 4  x.  ( X  x.  ( ( A  /  4 ) ^
3 ) ) )  =  ( X  x.  ( 4  x.  (
( A  /  4
) ^ 3 ) ) ) )
726, 70mulcld 8855 . . . . . . . . . . 11  |-  ( ph  ->  ( 4  x.  (
( A  /  4
) ^ 3 ) )  e.  CC )
733, 72mulcomd 8856 . . . . . . . . . 10  |-  ( ph  ->  ( X  x.  (
4  x.  ( ( A  /  4 ) ^ 3 ) ) )  =  ( ( 4  x.  ( ( A  /  4 ) ^ 3 ) )  x.  X ) )
74 df-3 9805 . . . . . . . . . . . . . . . . 17  |-  3  =  ( 2  +  1 )
7574oveq2i 5869 . . . . . . . . . . . . . . . 16  |-  ( 4 ^ 3 )  =  ( 4 ^ (
2  +  1 ) )
76 2nn0 9982 . . . . . . . . . . . . . . . . 17  |-  2  e.  NN0
77 expp1 11110 . . . . . . . . . . . . . . . . 17  |-  ( ( 4  e.  CC  /\  2  e.  NN0 )  -> 
( 4 ^ (
2  +  1 ) )  =  ( ( 4 ^ 2 )  x.  4 ) )
785, 76, 77mp2an 653 . . . . . . . . . . . . . . . 16  |-  ( 4 ^ ( 2  +  1 ) )  =  ( ( 4 ^ 2 )  x.  4 )
7960oveq1i 5868 . . . . . . . . . . . . . . . 16  |-  ( ( 4 ^ 2 )  x.  4 )  =  (; 1 6  x.  4 )
8075, 78, 793eqtri 2307 . . . . . . . . . . . . . . 15  |-  ( 4 ^ 3 )  =  (; 1 6  x.  4 )
8180oveq2i 5869 . . . . . . . . . . . . . 14  |-  ( ( A ^ 3 )  /  ( 4 ^ 3 ) )  =  ( ( A ^
3 )  /  (; 1 6  x.  4 ) )
8213a1i 10 . . . . . . . . . . . . . . 15  |-  ( ph  ->  3  e.  NN0 )
834, 6, 9, 82expdivd 11259 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( A  / 
4 ) ^ 3 )  =  ( ( A ^ 3 )  /  ( 4 ^ 3 ) ) )
84 expcl 11121 . . . . . . . . . . . . . . . 16  |-  ( ( A  e.  CC  /\  3  e.  NN0 )  -> 
( A ^ 3 )  e.  CC )
854, 13, 84sylancl 643 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( A ^ 3 )  e.  CC )
8685, 49, 6, 51, 9divdiv1d 9567 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( ( A ^ 3 )  / ; 1 6 )  /  4 )  =  ( ( A ^ 3 )  / 
(; 1 6  x.  4 ) ) )
8781, 83, 863eqtr4a 2341 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( A  / 
4 ) ^ 3 )  =  ( ( ( A ^ 3 )  / ; 1 6 )  / 
4 ) )
8887oveq2d 5874 . . . . . . . . . . . 12  |-  ( ph  ->  ( 4  x.  (
( A  /  4
) ^ 3 ) )  =  ( 4  x.  ( ( ( A ^ 3 )  / ; 1 6 )  / 
4 ) ) )
8934oveq2i 5869 . . . . . . . . . . . . 13  |-  ( ( A ^ 3 )  /  ( 8  x.  2 ) )  =  ( ( A ^
3 )  / ; 1 6 )
9033a1i 10 . . . . . . . . . . . . . 14  |-  ( ph  ->  8  e.  CC )
9129a1i 10 . . . . . . . . . . . . . 14  |-  ( ph  ->  2  e.  CC )
9237a1i 10 . . . . . . . . . . . . . 14  |-  ( ph  ->  8  =/=  0 )
9339a1i 10 . . . . . . . . . . . . . 14  |-  ( ph  ->  2  =/=  0 )
9485, 90, 91, 92, 93divdiv1d 9567 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( ( A ^ 3 )  / 
8 )  /  2
)  =  ( ( A ^ 3 )  /  ( 8  x.  2 ) ) )
9585, 49, 51divcld 9536 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( A ^
3 )  / ; 1 6 )  e.  CC )
9695, 6, 9divcan2d 9538 . . . . . . . . . . . . 13  |-  ( ph  ->  ( 4  x.  (
( ( A ^
3 )  / ; 1 6 )  / 
4 ) )  =  ( ( A ^
3 )  / ; 1 6 ) )
9789, 94, 963eqtr4a 2341 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( ( A ^ 3 )  / 
8 )  /  2
)  =  ( 4  x.  ( ( ( A ^ 3 )  / ; 1 6 )  / 
4 ) ) )
9888, 97eqtr4d 2318 . . . . . . . . . . 11  |-  ( ph  ->  ( 4  x.  (
( A  /  4
) ^ 3 ) )  =  ( ( ( A ^ 3 )  /  8 )  /  2 ) )
9998oveq1d 5873 . . . . . . . . . 10  |-  ( ph  ->  ( ( 4  x.  ( ( A  / 
4 ) ^ 3 ) )  x.  X
)  =  ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X ) )
10071, 73, 993eqtrd 2319 . . . . . . . . 9  |-  ( ph  ->  ( 4  x.  ( X  x.  ( ( A  /  4 ) ^
3 ) ) )  =  ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X ) )
101 4nn0 9984 . . . . . . . . . . . 12  |-  4  e.  NN0
102101a1i 10 . . . . . . . . . . 11  |-  ( ph  ->  4  e.  NN0 )
1034, 6, 9, 102expdivd 11259 . . . . . . . . . 10  |-  ( ph  ->  ( ( A  / 
4 ) ^ 4 )  =  ( ( A ^ 4 )  /  ( 4 ^ 4 ) ) )
104 expmul 11147 . . . . . . . . . . . . . . 15  |-  ( ( 2  e.  CC  /\  2  e.  NN0  /\  4  e.  NN0 )  ->  (
2 ^ ( 2  x.  4 ) )  =  ( ( 2 ^ 2 ) ^
4 ) )
10529, 76, 101, 104mp3an 1277 . . . . . . . . . . . . . 14  |-  ( 2 ^ ( 2  x.  4 ) )  =  ( ( 2 ^ 2 ) ^ 4 )
106 4t2e8 9874 . . . . . . . . . . . . . . . 16  |-  ( 4  x.  2 )  =  8
1075, 29, 106mulcomli 8844 . . . . . . . . . . . . . . 15  |-  ( 2  x.  4 )  =  8
108107oveq2i 5869 . . . . . . . . . . . . . 14  |-  ( 2 ^ ( 2  x.  4 ) )  =  ( 2 ^ 8 )
109105, 108eqtr3i 2305 . . . . . . . . . . . . 13  |-  ( ( 2 ^ 2 ) ^ 4 )  =  ( 2 ^ 8 )
110 sq2 11199 . . . . . . . . . . . . . 14  |-  ( 2 ^ 2 )  =  4
111110oveq1i 5868 . . . . . . . . . . . . 13  |-  ( ( 2 ^ 2 ) ^ 4 )  =  ( 4 ^ 4 )
112109, 111eqtr3i 2305 . . . . . . . . . . . 12  |-  ( 2 ^ 8 )  =  ( 4 ^ 4 )
113 2exp8 13102 . . . . . . . . . . . 12  |-  ( 2 ^ 8 )  = ;; 2 5 6
114112, 113eqtr3i 2305 . . . . . . . . . . 11  |-  ( 4 ^ 4 )  = ;; 2 5 6
115114oveq2i 5869 . . . . . . . . . 10  |-  ( ( A ^ 4 )  /  ( 4 ^ 4 ) )  =  ( ( A ^
4 )  / ;; 2 5 6 )
116103, 115syl6eq 2331 . . . . . . . . 9  |-  ( ph  ->  ( ( A  / 
4 ) ^ 4 )  =  ( ( A ^ 4 )  / ;; 2 5 6 ) )
117100, 116oveq12d 5876 . . . . . . . 8  |-  ( ph  ->  ( ( 4  x.  ( X  x.  (
( A  /  4
) ^ 3 ) ) )  +  ( ( A  /  4
) ^ 4 ) )  =  ( ( ( ( ( A ^ 3 )  / 
8 )  /  2
)  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )
11868, 117oveq12d 5876 . . . . . . 7  |-  ( ph  ->  ( ( 6  x.  ( ( X ^
2 )  x.  (
( A  /  4
) ^ 2 ) ) )  +  ( ( 4  x.  ( X  x.  ( ( A  /  4 ) ^
3 ) ) )  +  ( ( A  /  4 ) ^
4 ) ) )  =  ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) ) )
11921, 118oveq12d 5876 . . . . . 6  |-  ( ph  ->  ( ( ( X ^ 4 )  +  ( 4  x.  (
( X ^ 3 )  x.  ( A  /  4 ) ) ) )  +  ( ( 6  x.  (
( X ^ 2 )  x.  ( ( A  /  4 ) ^ 2 ) ) )  +  ( ( 4  x.  ( X  x.  ( ( A  /  4 ) ^
3 ) ) )  +  ( ( A  /  4 ) ^
4 ) ) ) )  =  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^
3 ) ) )  +  ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) ) ) )
1202, 12, 1193eqtrd 2319 . . . . 5  |-  ( ph  ->  ( Y ^ 4 )  =  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^
3 ) ) )  +  ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) ) ) )
121120oveq1d 5873 . . . 4  |-  ( ph  ->  ( ( Y ^
4 )  +  ( P  x.  ( Y ^ 2 ) ) )  =  ( ( ( ( X ^
4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) ) )  +  ( P  x.  ( Y ^ 2 ) ) ) )
122 expcl 11121 . . . . . . 7  |-  ( ( X  e.  CC  /\  4  e.  NN0 )  -> 
( X ^ 4 )  e.  CC )
1233, 101, 122sylancl 643 . . . . . 6  |-  ( ph  ->  ( X ^ 4 )  e.  CC )
1244, 15mulcld 8855 . . . . . 6  |-  ( ph  ->  ( A  x.  ( X ^ 3 ) )  e.  CC )
125123, 124addcld 8854 . . . . 5  |-  ( ph  ->  ( ( X ^
4 )  +  ( A  x.  ( X ^ 3 ) ) )  e.  CC )
126 mulcl 8821 . . . . . . . 8  |-  ( ( ( 3  /  8
)  e.  CC  /\  ( A ^ 2 )  e.  CC )  -> 
( ( 3  / 
8 )  x.  ( A ^ 2 ) )  e.  CC )
12754, 45, 126sylancr 644 . . . . . . 7  |-  ( ph  ->  ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  e.  CC )
128127, 26mulcld 8855 . . . . . 6  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  ( X ^ 2 ) )  e.  CC )
12985, 90, 92divcld 9536 . . . . . . . . 9  |-  ( ph  ->  ( ( A ^
3 )  /  8
)  e.  CC )
130129halfcld 9956 . . . . . . . 8  |-  ( ph  ->  ( ( ( A ^ 3 )  / 
8 )  /  2
)  e.  CC )
131130, 3mulcld 8855 . . . . . . 7  |-  ( ph  ->  ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  e.  CC )
132 expcl 11121 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  4  e.  NN0 )  -> 
( A ^ 4 )  e.  CC )
1334, 101, 132sylancl 643 . . . . . . . 8  |-  ( ph  ->  ( A ^ 4 )  e.  CC )
134 5nn0 9985 . . . . . . . . . . . 12  |-  5  e.  NN0
13576, 134deccl 10138 . . . . . . . . . . 11  |- ; 2 5  e.  NN0
136135, 22decnncl 10137 . . . . . . . . . 10  |- ;; 2 5 6  e.  NN
137136nncni 9756 . . . . . . . . 9  |- ;; 2 5 6  e.  CC
138137a1i 10 . . . . . . . 8  |-  ( ph  -> ;; 2 5 6  e.  CC )
139136nnne0i 9780 . . . . . . . . 9  |- ;; 2 5 6  =/=  0
140139a1i 10 . . . . . . . 8  |-  ( ph  -> ;; 2 5 6  =/=  0 )
141133, 138, 140divcld 9536 . . . . . . 7  |-  ( ph  ->  ( ( A ^
4 )  / ;; 2 5 6 )  e.  CC )
142131, 141addcld 8854 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  e.  CC )
143128, 142addcld 8854 . . . . 5  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  ( X ^ 2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  e.  CC )
144 quart1.b . . . . . . . 8  |-  ( ph  ->  B  e.  CC )
145 quart1.c . . . . . . . 8  |-  ( ph  ->  C  e.  CC )
146 quart1.d . . . . . . . 8  |-  ( ph  ->  D  e.  CC )
147 quart1.p . . . . . . . 8  |-  ( ph  ->  P  =  ( B  -  ( ( 3  /  8 )  x.  ( A ^ 2 ) ) ) )
148 quart1.q . . . . . . . 8  |-  ( ph  ->  Q  =  ( ( C  -  ( ( A  x.  B )  /  2 ) )  +  ( ( A ^ 3 )  / 
8 ) ) )
149 quart1.r . . . . . . . 8  |-  ( ph  ->  R  =  ( ( D  -  ( ( C  x.  A )  /  4 ) )  +  ( ( ( ( A ^ 2 )  x.  B )  / ; 1 6 )  -  ( ( 3  / ;; 2 5 6 )  x.  ( A ^
4 ) ) ) ) )
1504, 144, 145, 146, 147, 148, 149quart1cl 20150 . . . . . . 7  |-  ( ph  ->  ( P  e.  CC  /\  Q  e.  CC  /\  R  e.  CC )
)
151150simp1d 967 . . . . . 6  |-  ( ph  ->  P  e.  CC )
1523, 10addcld 8854 . . . . . . . 8  |-  ( ph  ->  ( X  +  ( A  /  4 ) )  e.  CC )
1531, 152eqeltrd 2357 . . . . . . 7  |-  ( ph  ->  Y  e.  CC )
154153sqcld 11243 . . . . . 6  |-  ( ph  ->  ( Y ^ 2 )  e.  CC )
155151, 154mulcld 8855 . . . . 5  |-  ( ph  ->  ( P  x.  ( Y ^ 2 ) )  e.  CC )
156125, 143, 155addassd 8857 . . . 4  |-  ( ph  ->  ( ( ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  ( X ^ 2 ) )  +  ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) ) ) )  +  ( P  x.  ( Y ^ 2 ) ) )  =  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^
3 ) ) )  +  ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) ) ) )
157121, 156eqtrd 2315 . . 3  |-  ( ph  ->  ( ( Y ^
4 )  +  ( P  x.  ( Y ^ 2 ) ) )  =  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^
3 ) ) )  +  ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) ) ) )
158157oveq1d 5873 . 2  |-  ( ph  ->  ( ( ( Y ^ 4 )  +  ( P  x.  ( Y ^ 2 ) ) )  +  ( ( Q  x.  Y )  +  R ) )  =  ( ( ( ( X ^ 4 )  +  ( A  x.  ( X ^
3 ) ) )  +  ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) ) )  +  ( ( Q  x.  Y )  +  R ) ) )
159143, 155addcld 8854 . . 3  |-  ( ph  ->  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) )  e.  CC )
160150simp2d 968 . . . . 5  |-  ( ph  ->  Q  e.  CC )
161160, 153mulcld 8855 . . . 4  |-  ( ph  ->  ( Q  x.  Y
)  e.  CC )
162150simp3d 969 . . . 4  |-  ( ph  ->  R  e.  CC )
163161, 162addcld 8854 . . 3  |-  ( ph  ->  ( ( Q  x.  Y )  +  R
)  e.  CC )
164125, 159, 163addassd 8857 . 2  |-  ( ph  ->  ( ( ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  ( X ^ 2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^ 2 ) ) ) )  +  ( ( Q  x.  Y )  +  R
) )  =  ( ( ( X ^
4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  ( X ^ 2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^ 2 ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) ) )
1651oveq1d 5873 . . . . . . . . . 10  |-  ( ph  ->  ( Y ^ 2 )  =  ( ( X  +  ( A  /  4 ) ) ^ 2 ) )
166 binom2 11218 . . . . . . . . . . 11  |-  ( ( X  e.  CC  /\  ( A  /  4
)  e.  CC )  ->  ( ( X  +  ( A  / 
4 ) ) ^
2 )  =  ( ( ( X ^
2 )  +  ( 2  x.  ( X  x.  ( A  / 
4 ) ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) )
1673, 10, 166syl2anc 642 . . . . . . . . . 10  |-  ( ph  ->  ( ( X  +  ( A  /  4
) ) ^ 2 )  =  ( ( ( X ^ 2 )  +  ( 2  x.  ( X  x.  ( A  /  4
) ) ) )  +  ( ( A  /  4 ) ^
2 ) ) )
1683, 10mulcld 8855 . . . . . . . . . . . 12  |-  ( ph  ->  ( X  x.  ( A  /  4 ) )  e.  CC )
169 mulcl 8821 . . . . . . . . . . . 12  |-  ( ( 2  e.  CC  /\  ( X  x.  ( A  /  4 ) )  e.  CC )  -> 
( 2  x.  ( X  x.  ( A  /  4 ) ) )  e.  CC )
17029, 168, 169sylancr 644 . . . . . . . . . . 11  |-  ( ph  ->  ( 2  x.  ( X  x.  ( A  /  4 ) ) )  e.  CC )
17126, 170, 25addassd 8857 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( X ^ 2 )  +  ( 2  x.  ( X  x.  ( A  /  4 ) ) ) )  +  ( ( A  /  4
) ^ 2 ) )  =  ( ( X ^ 2 )  +  ( ( 2  x.  ( X  x.  ( A  /  4
) ) )  +  ( ( A  / 
4 ) ^ 2 ) ) ) )
172165, 167, 1713eqtrd 2319 . . . . . . . . 9  |-  ( ph  ->  ( Y ^ 2 )  =  ( ( X ^ 2 )  +  ( ( 2  x.  ( X  x.  ( A  /  4
) ) )  +  ( ( A  / 
4 ) ^ 2 ) ) ) )
173172oveq2d 5874 . . . . . . . 8  |-  ( ph  ->  ( P  x.  ( Y ^ 2 ) )  =  ( P  x.  ( ( X ^
2 )  +  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )
174170, 25addcld 8854 . . . . . . . . 9  |-  ( ph  ->  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) )  e.  CC )
175151, 26, 174adddid 8859 . . . . . . . 8  |-  ( ph  ->  ( P  x.  (
( X ^ 2 )  +  ( ( 2  x.  ( X  x.  ( A  / 
4 ) ) )  +  ( ( A  /  4 ) ^
2 ) ) ) )  =  ( ( P  x.  ( X ^ 2 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )
176173, 175eqtrd 2315 . . . . . . 7  |-  ( ph  ->  ( P  x.  ( Y ^ 2 ) )  =  ( ( P  x.  ( X ^
2 ) )  +  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )
177176oveq2d 5874 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) )  =  ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( ( P  x.  ( X ^ 2 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) ) )
178151, 26mulcld 8855 . . . . . . 7  |-  ( ph  ->  ( P  x.  ( X ^ 2 ) )  e.  CC )
179151, 174mulcld 8855 . . . . . . 7  |-  ( ph  ->  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) )  e.  CC )
180128, 142, 178, 179add4d 9035 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( ( P  x.  ( X ^ 2 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )  =  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( P  x.  ( X ^ 2 ) ) )  +  ( ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) ) )
181127, 151, 26adddird 8860 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  +  P )  x.  ( X ^ 2 ) )  =  ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( P  x.  ( X ^ 2 ) ) ) )
182147oveq2d 5874 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  +  P
)  =  ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  +  ( B  -  ( ( 3  / 
8 )  x.  ( A ^ 2 ) ) ) ) )
183127, 144pncan3d 9160 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  +  ( B  -  ( ( 3  /  8 )  x.  ( A ^
2 ) ) ) )  =  B )
184182, 183eqtrd 2315 . . . . . . . . 9  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  +  P
)  =  B )
185184oveq1d 5873 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  +  P )  x.  ( X ^ 2 ) )  =  ( B  x.  ( X ^ 2 ) ) )
186181, 185eqtr3d 2317 . . . . . . 7  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  ( X ^ 2 ) )  +  ( P  x.  ( X ^ 2 ) ) )  =  ( B  x.  ( X ^
2 ) ) )
187186oveq1d 5873 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( P  x.  ( X ^ 2 ) ) )  +  ( ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )  =  ( ( B  x.  ( X ^ 2 ) )  +  ( ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) ) )
188177, 180, 1873eqtrd 2319 . . . . 5  |-  ( ph  ->  ( ( ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) )  =  ( ( B  x.  ( X ^
2 ) )  +  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) ) )
189188oveq1d 5873 . . . 4  |-  ( ph  ->  ( ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) )  +  ( ( Q  x.  Y )  +  R ) )  =  ( ( ( B  x.  ( X ^
2 ) )  +  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )  +  ( ( Q  x.  Y )  +  R
) ) )
190144, 26mulcld 8855 . . . . 5  |-  ( ph  ->  ( B  x.  ( X ^ 2 ) )  e.  CC )
191142, 179addcld 8854 . . . . 5  |-  ( ph  ->  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) )  e.  CC )
192190, 191, 163addassd 8857 . . . 4  |-  ( ph  ->  ( ( ( B  x.  ( X ^
2 ) )  +  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) ) )  +  ( ( Q  x.  Y )  +  R
) )  =  ( ( B  x.  ( X ^ 2 ) )  +  ( ( ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) ) )
1934, 144mulcld 8855 . . . . . . . . . 10  |-  ( ph  ->  ( A  x.  B
)  e.  CC )
194193halfcld 9956 . . . . . . . . 9  |-  ( ph  ->  ( ( A  x.  B )  /  2
)  e.  CC )
195194, 129subcld 9157 . . . . . . . 8  |-  ( ph  ->  ( ( ( A  x.  B )  / 
2 )  -  (
( A ^ 3 )  /  8 ) )  e.  CC )
196195, 3mulcld 8855 . . . . . . 7  |-  ( ph  ->  ( ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) )  x.  X
)  e.  CC )
197151, 25mulcld 8855 . . . . . . . 8  |-  ( ph  ->  ( P  x.  (
( A  /  4
) ^ 2 ) )  e.  CC )
198141, 197addcld 8854 . . . . . . 7  |-  ( ph  ->  ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  ( ( A  / 
4 ) ^ 2 ) ) )  e.  CC )
199160, 3mulcld 8855 . . . . . . 7  |-  ( ph  ->  ( Q  x.  X
)  e.  CC )
200160, 10mulcld 8855 . . . . . . . 8  |-  ( ph  ->  ( Q  x.  ( A  /  4 ) )  e.  CC )
201200, 162addcld 8854 . . . . . . 7  |-  ( ph  ->  ( ( Q  x.  ( A  /  4
) )  +  R
)  e.  CC )
202196, 198, 199, 201add4d 9035 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) )  x.  X )  +  ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  ( ( A  / 
4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  X )  +  ( ( Q  x.  ( A  /  4
) )  +  R
) ) )  =  ( ( ( ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) )  x.  X )  +  ( Q  x.  X
) )  +  ( ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  ( ( A  / 
4 ) ^ 2 ) ) )  +  ( ( Q  x.  ( A  /  4
) )  +  R
) ) ) )
203151, 170, 25adddid 8859 . . . . . . . . 9  |-  ( ph  ->  ( P  x.  (
( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) )  =  ( ( P  x.  ( 2  x.  ( X  x.  ( A  /  4
) ) ) )  +  ( P  x.  ( ( A  / 
4 ) ^ 2 ) ) ) )
204203oveq2d 5874 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) )  =  ( ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( ( P  x.  ( 2  x.  ( X  x.  ( A  /  4 ) ) ) )  +  ( P  x.  ( ( A  /  4 ) ^ 2 ) ) ) ) )
205151, 170mulcld 8855 . . . . . . . . 9  |-  ( ph  ->  ( P  x.  (
2  x.  ( X  x.  ( A  / 
4 ) ) ) )  e.  CC )
206131, 141, 205, 197add4d 9035 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( ( P  x.  ( 2  x.  ( X  x.  ( A  /  4 ) ) ) )  +  ( P  x.  ( ( A  /  4 ) ^ 2 ) ) ) )  =  ( ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( P  x.  ( 2  x.  ( X  x.  ( A  /  4
) ) ) ) )  +  ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) ) ) )
2074, 91, 91, 93, 93divdiv1d 9567 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( ( A  / 
2 )  /  2
)  =  ( A  /  ( 2  x.  2 ) ) )
208 2t2e4 9871 . . . . . . . . . . . . . . . . . . 19  |-  ( 2  x.  2 )  =  4
209208oveq2i 5869 . . . . . . . . . . . . . . . . . 18  |-  ( A  /  ( 2  x.  2 ) )  =  ( A  /  4
)
210207, 209syl6eq 2331 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( ( A  / 
2 )  /  2
)  =  ( A  /  4 ) )
211210oveq2d 5874 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( 2  x.  (
( A  /  2
)  /  2 ) )  =  ( 2  x.  ( A  / 
4 ) ) )
2124halfcld 9956 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( A  /  2
)  e.  CC )
213212, 91, 93divcan2d 9538 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( 2  x.  (
( A  /  2
)  /  2 ) )  =  ( A  /  2 ) )
214211, 213eqtr3d 2317 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( 2  x.  ( A  /  4 ) )  =  ( A  / 
2 ) )
215214oveq2d 5874 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( X  x.  (
2  x.  ( A  /  4 ) ) )  =  ( X  x.  ( A  / 
2 ) ) )
2163, 212mulcomd 8856 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( X  x.  ( A  /  2 ) )  =  ( ( A  /  2 )  x.  X ) )
217215, 216eqtrd 2315 . . . . . . . . . . . . 13  |-  ( ph  ->  ( X  x.  (
2  x.  ( A  /  4 ) ) )  =  ( ( A  /  2 )  x.  X ) )
218217oveq2d 5874 . . . . . . . . . . . 12  |-  ( ph  ->  ( P  x.  ( X  x.  ( 2  x.  ( A  / 
4 ) ) ) )  =  ( P  x.  ( ( A  /  2 )  x.  X ) ) )
21991, 3, 10mul12d 9021 . . . . . . . . . . . . 13  |-  ( ph  ->  ( 2  x.  ( X  x.  ( A  /  4 ) ) )  =  ( X  x.  ( 2  x.  ( A  /  4
) ) ) )
220219oveq2d 5874 . . . . . . . . . . . 12  |-  ( ph  ->  ( P  x.  (
2  x.  ( X  x.  ( A  / 
4 ) ) ) )  =  ( P  x.  ( X  x.  ( 2  x.  ( A  /  4 ) ) ) ) )
221151, 212, 3mulassd 8858 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( P  x.  ( A  /  2
) )  x.  X
)  =  ( P  x.  ( ( A  /  2 )  x.  X ) ) )
222218, 220, 2213eqtr4d 2325 . . . . . . . . . . 11  |-  ( ph  ->  ( P  x.  (
2  x.  ( X  x.  ( A  / 
4 ) ) ) )  =  ( ( P  x.  ( A  /  2 ) )  x.  X ) )
223222oveq2d 5874 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( P  x.  ( 2  x.  ( X  x.  ( A  /  4
) ) ) ) )  =  ( ( ( ( ( A ^ 3 )  / 
8 )  /  2
)  x.  X )  +  ( ( P  x.  ( A  / 
2 ) )  x.  X ) ) )
224151, 212mulcld 8855 . . . . . . . . . . 11  |-  ( ph  ->  ( P  x.  ( A  /  2 ) )  e.  CC )
225130, 224, 3adddird 8860 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  +  ( P  x.  ( A  /  2 ) ) )  x.  X )  =  ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( P  x.  ( A  /  2
) )  x.  X
) ) )
226147oveq1d 5873 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( P  x.  ( A  /  2 ) )  =  ( ( B  -  ( ( 3  /  8 )  x.  ( A ^ 2 ) ) )  x.  ( A  /  2
) ) )
227144, 127, 212subdird 9236 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( B  -  ( ( 3  / 
8 )  x.  ( A ^ 2 ) ) )  x.  ( A  /  2 ) )  =  ( ( B  x.  ( A  / 
2 ) )  -  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  ( A  /  2 ) ) ) )
228144, 4, 91, 93divassd 9571 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( B  x.  A )  /  2
)  =  ( B  x.  ( A  / 
2 ) ) )
229144, 4mulcomd 8856 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( B  x.  A
)  =  ( A  x.  B ) )
230229oveq1d 5873 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( B  x.  A )  /  2
)  =  ( ( A  x.  B )  /  2 ) )
231228, 230eqtr3d 2317 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( B  x.  ( A  /  2 ) )  =  ( ( A  x.  B )  / 
2 ) )
23274oveq2i 5869 . . . . . . . . . . . . . . . . . . . . 21  |-  ( A ^ 3 )  =  ( A ^ (
2  +  1 ) )
233 expp1 11110 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( A  e.  CC  /\  2  e.  NN0 )  -> 
( A ^ (
2  +  1 ) )  =  ( ( A ^ 2 )  x.  A ) )
2344, 76, 233sylancl 643 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  ( A ^ (
2  +  1 ) )  =  ( ( A ^ 2 )  x.  A ) )
235232, 234syl5eq 2327 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  ( A ^ 3 )  =  ( ( A ^ 2 )  x.  A ) )
236235oveq2d 5874 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  ( ( 3  / 
8 )  x.  ( A ^ 3 ) )  =  ( ( 3  /  8 )  x.  ( ( A ^
2 )  x.  A
) ) )
23728a1i 10 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  3  e.  CC )
238237, 85, 90, 92div23d 9573 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  ( ( 3  x.  ( A ^ 3 ) )  /  8
)  =  ( ( 3  /  8 )  x.  ( A ^
3 ) ) )
23954a1i 10 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  ( 3  /  8
)  e.  CC )
240239, 45, 4mulassd 8858 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  A
)  =  ( ( 3  /  8 )  x.  ( ( A ^ 2 )  x.  A ) ) )
241236, 238, 2403eqtr4rd 2326 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  A
)  =  ( ( 3  x.  ( A ^ 3 ) )  /  8 ) )
242237, 85, 90, 92divassd 9571 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  ( ( 3  x.  ( A ^ 3 ) )  /  8
)  =  ( 3  x.  ( ( A ^ 3 )  / 
8 ) ) )
243241, 242eqtrd 2315 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  A
)  =  ( 3  x.  ( ( A ^ 3 )  / 
8 ) ) )
244243oveq1d 5873 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  A )  /  2
)  =  ( ( 3  x.  ( ( A ^ 3 )  /  8 ) )  /  2 ) )
245127, 4, 91, 93divassd 9571 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  A )  /  2
)  =  ( ( ( 3  /  8
)  x.  ( A ^ 2 ) )  x.  ( A  / 
2 ) ) )
246237, 129, 91, 93divassd 9571 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( 3  x.  ( ( A ^
3 )  /  8
) )  /  2
)  =  ( 3  x.  ( ( ( A ^ 3 )  /  8 )  / 
2 ) ) )
247244, 245, 2463eqtr3d 2323 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( ( ( 3  /  8 )  x.  ( A ^ 2 ) )  x.  ( A  /  2 ) )  =  ( 3  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) ) )
248231, 247oveq12d 5876 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( B  x.  ( A  /  2
) )  -  (
( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( A  / 
2 ) ) )  =  ( ( ( A  x.  B )  /  2 )  -  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) ) ) )
249226, 227, 2483eqtrd 2319 . . . . . . . . . . . . 13  |-  ( ph  ->  ( P  x.  ( A  /  2 ) )  =  ( ( ( A  x.  B )  /  2 )  -  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) ) ) )
250249oveq2d 5874 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  +  ( P  x.  ( A  /  2 ) ) )  =  ( ( ( ( A ^
3 )  /  8
)  /  2 )  +  ( ( ( A  x.  B )  /  2 )  -  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) ) ) ) )
251 mulcl 8821 . . . . . . . . . . . . . . 15  |-  ( ( 3  e.  CC  /\  ( ( ( A ^ 3 )  / 
8 )  /  2
)  e.  CC )  ->  ( 3  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) )  e.  CC )
25228, 130, 251sylancr 644 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  e.  CC )
253130, 194, 252addsub12d 9180 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  +  ( ( ( A  x.  B )  /  2
)  -  ( 3  x.  ( ( ( A ^ 3 )  /  8 )  / 
2 ) ) ) )  =  ( ( ( A  x.  B
)  /  2 )  +  ( ( ( ( A ^ 3 )  /  8 )  /  2 )  -  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) ) ) ) )
254194, 252, 130subsub2d 9186 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( ( A  x.  B )  / 
2 )  -  (
( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  -  ( ( ( A ^ 3 )  /  8 )  /  2 ) ) )  =  ( ( ( A  x.  B
)  /  2 )  +  ( ( ( ( A ^ 3 )  /  8 )  /  2 )  -  ( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) ) ) ) )
255130mulid2d 8853 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( 1  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  =  ( ( ( A ^ 3 )  /  8 )  /  2 ) )
256255oveq2d 5874 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( ( 3  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) )  -  (
1  x.  ( ( ( A ^ 3 )  /  8 )  /  2 ) ) )  =  ( ( 3  x.  ( ( ( A ^ 3 )  /  8 )  /  2 ) )  -  ( ( ( A ^ 3 )  /  8 )  / 
2 ) ) )
257 ax-1cn 8795 . . . . . . . . . . . . . . . . . 18  |-  1  e.  CC
258 2p1e3 9847 . . . . . . . . . . . . . . . . . . 19  |-  ( 2  +  1 )  =  3
25929, 257, 258addcomli 9004 . . . . . . . . . . . . . . . . . 18  |-  ( 1  +  2 )  =  3
26028, 257, 29, 259subaddrii 9135 . . . . . . . . . . . . . . . . 17  |-  ( 3  -  1 )  =  2
261260oveq1i 5868 . . . . . . . . . . . . . . . 16  |-  ( ( 3  -  1 )  x.  ( ( ( A ^ 3 )  /  8 )  / 
2 ) )  =  ( 2  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )
262257a1i 10 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  1  e.  CC )
263237, 262, 130subdird 9236 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( ( 3  -  1 )  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  =  ( ( 3  x.  ( ( ( A ^ 3 )  /  8 )  /  2 ) )  -  ( 1  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) ) ) )
264129, 91, 93divcan2d 9538 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( 2  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  =  ( ( A ^ 3 )  /  8 ) )
265261, 263, 2643eqtr3a 2339 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( ( 3  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) )  -  (
1  x.  ( ( ( A ^ 3 )  /  8 )  /  2 ) ) )  =  ( ( A ^ 3 )  /  8 ) )
266256, 265eqtr3d 2317 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( ( 3  x.  ( ( ( A ^ 3 )  / 
8 )  /  2
) )  -  (
( ( A ^
3 )  /  8
)  /  2 ) )  =  ( ( A ^ 3 )  /  8 ) )
267266oveq2d 5874 . . . . . . . . . . . . 13  |-  ( ph  ->  ( ( ( A  x.  B )  / 
2 )  -  (
( 3  x.  (
( ( A ^
3 )  /  8
)  /  2 ) )  -  ( ( ( A ^ 3 )  /  8 )  /  2 ) ) )  =  ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) ) )
268253, 254, 2673eqtr2d 2321 . . . . . . . . . . . 12  |-  ( ph  ->  ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  +  ( ( ( A  x.  B )  /  2
)  -  ( 3  x.  ( ( ( A ^ 3 )  /  8 )  / 
2 ) ) ) )  =  ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) ) )
269250, 268eqtrd 2315 . . . . . . . . . . 11  |-  ( ph  ->  ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  +  ( P  x.  ( A  /  2 ) ) )  =  ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) ) )
270269oveq1d 5873 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  +  ( P  x.  ( A  /  2 ) ) )  x.  X )  =  ( ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) )  x.  X ) )
271223, 225, 2703eqtr2d 2321 . . . . . . . . 9  |-  ( ph  ->  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( P  x.  ( 2  x.  ( X  x.  ( A  /  4
) ) ) ) )  =  ( ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) )  x.  X ) )
272271oveq1d 5873 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( P  x.  (
2  x.  ( X  x.  ( A  / 
4 ) ) ) ) )  +  ( ( ( A ^
4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) ) )  =  ( ( ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) )  x.  X )  +  ( ( ( A ^
4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) ) ) )
273204, 206, 2723eqtrd 2319 . . . . . . 7  |-  ( ph  ->  ( ( ( ( ( ( A ^
3 )  /  8
)  /  2 )  x.  X )  +  ( ( A ^
4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) )  =  ( ( ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) )  x.  X
)  +  ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) ) ) )
2741oveq2d 5874 . . . . . . . . . 10  |-  ( ph  ->  ( Q  x.  Y
)  =  ( Q  x.  ( X  +  ( A  /  4
) ) ) )
275160, 3, 10adddid 8859 . . . . . . . . . 10  |-  ( ph  ->  ( Q  x.  ( X  +  ( A  /  4 ) ) )  =  ( ( Q  x.  X )  +  ( Q  x.  ( A  /  4
) ) ) )
276274, 275eqtrd 2315 . . . . . . . . 9  |-  ( ph  ->  ( Q  x.  Y
)  =  ( ( Q  x.  X )  +  ( Q  x.  ( A  /  4
) ) ) )
277276oveq1d 5873 . . . . . . . 8  |-  ( ph  ->  ( ( Q  x.  Y )  +  R
)  =  ( ( ( Q  x.  X
)  +  ( Q  x.  ( A  / 
4 ) ) )  +  R ) )
278199, 200, 162addassd 8857 . . . . . . . 8  |-  ( ph  ->  ( ( ( Q  x.  X )  +  ( Q  x.  ( A  /  4 ) ) )  +  R )  =  ( ( Q  x.  X )  +  ( ( Q  x.  ( A  /  4
) )  +  R
) ) )
279277, 278eqtrd 2315 . . . . . . 7  |-  ( ph  ->  ( ( Q  x.  Y )  +  R
)  =  ( ( Q  x.  X )  +  ( ( Q  x.  ( A  / 
4 ) )  +  R ) ) )
280273, 279oveq12d 5876 . . . . . 6  |-  ( ph  ->  ( ( ( ( ( ( ( A ^ 3 )  / 
8 )  /  2
)  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4
) ) )  +  ( ( A  / 
4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  Y )  +  R ) )  =  ( ( ( ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) )  x.  X )  +  ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  ( ( A  / 
4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  X )  +  ( ( Q  x.  ( A  /  4
) )  +  R
) ) ) )
281195, 160addcomd 9014 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) )  +  Q
)  =  ( Q  +  ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) ) ) )
282148oveq1d 5873 . . . . . . . . . 10  |-  ( ph  ->  ( Q  +  ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) ) )  =  ( ( ( C  -  (
( A  x.  B
)  /  2 ) )  +  ( ( A ^ 3 )  /  8 ) )  +  ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) ) ) )
283145, 194subcld 9157 . . . . . . . . . . . 12  |-  ( ph  ->  ( C  -  (
( A  x.  B
)  /  2 ) )  e.  CC )
284283, 129, 194ppncand 9197 . . . . . . . . . . 11  |-  ( ph  ->  ( ( ( C  -  ( ( A  x.  B )  / 
2 ) )  +  ( ( A ^
3 )  /  8
) )  +  ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) ) )  =  ( ( C  -  ( ( A  x.  B )  /  2 ) )  +  ( ( A  x.  B )  / 
2 ) ) )
285145, 194npcand 9161 . . . . . . . . . . 11  |-  ( ph  ->  ( ( C  -  ( ( A  x.  B )  /  2
) )  +  ( ( A  x.  B
)  /  2 ) )  =  C )
286284, 285eqtrd 2315 . . . . . . . . . 10  |-  ( ph  ->  ( ( ( C  -  ( ( A  x.  B )  / 
2 ) )  +  ( ( A ^
3 )  /  8
) )  +  ( ( ( A  x.  B )  /  2
)  -  ( ( A ^ 3 )  /  8 ) ) )  =  C )
287281, 282, 2863eqtrd 2319 . . . . . . . . 9  |-  ( ph  ->  ( ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) )  +  Q
)  =  C )
288287oveq1d 5873 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) )  +  Q )  x.  X
)  =  ( C  x.  X ) )
289195, 160, 3adddird 8860 . . . . . . . 8  |-  ( ph  ->  ( ( ( ( ( A  x.  B
)  /  2 )  -  ( ( A ^ 3 )  / 
8 ) )  +  Q )  x.  X
)  =  ( ( ( ( ( A  x.  B )  / 
2 )  -  (
( A ^ 3 )  /  8 ) )  x.  X )  +  ( Q  x.  X ) ) )
290288, 289eqtr3d 2317 . . . . . . 7  |-  ( ph  ->  ( C  x.  X
)  =  ( ( ( ( ( A  x.  B )  / 
2 )  -  (
( A ^ 3 )  /  8 ) )  x.  X )  +  ( Q  x.  X ) ) )
2914, 144, 145, 146, 147, 148, 149, 3, 1quart1lem 20151 . . . . . . 7  |-  ( ph  ->  D  =  ( ( ( ( A ^
4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) )  +  ( ( Q  x.  ( A  /  4 ) )  +  R ) ) )
292290, 291oveq12d 5876 . . . . . 6  |-  ( ph  ->  ( ( C  x.  X )  +  D
)  =  ( ( ( ( ( ( A  x.  B )  /  2 )  -  ( ( A ^
3 )  /  8
) )  x.  X
)  +  ( Q  x.  X ) )  +  ( ( ( ( A ^ 4 )  / ;; 2 5 6 )  +  ( P  x.  (
( A  /  4
) ^ 2 ) ) )  +  ( ( Q  x.  ( A  /  4 ) )  +  R ) ) ) )
293202, 280, 2923eqtr4d 2325 . . . . 5  |-  ( ph  ->  ( ( ( ( ( ( ( A ^ 3 )  / 
8 )  /  2
)  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4
) ) )  +  ( ( A  / 
4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  Y )  +  R ) )  =  ( ( C  x.  X )  +  D
) )
294293oveq2d 5874 . . . 4  |-  ( ph  ->  ( ( B  x.  ( X ^ 2 ) )  +  ( ( ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) )  +  ( P  x.  ( ( 2  x.  ( X  x.  ( A  /  4 ) ) )  +  ( ( A  /  4 ) ^ 2 ) ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) )  =  ( ( B  x.  ( X ^ 2 ) )  +  ( ( C  x.  X )  +  D ) ) )
295189, 192, 2943eqtrd 2319 . . 3  |-  ( ph  ->  ( ( ( ( ( ( 3  / 
8 )  x.  ( A ^ 2 ) )  x.  ( X ^
2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  /  2 )  x.  X )  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^
2 ) ) )  +  ( ( Q  x.  Y )  +  R ) )  =  ( ( B  x.  ( X ^ 2 ) )  +  ( ( C  x.  X )  +  D ) ) )
296295oveq2d 5874 . 2  |-  ( ph  ->  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( ( ( ( ( 3  /  8 )  x.  ( A ^
2 ) )  x.  ( X ^ 2 ) )  +  ( ( ( ( ( A ^ 3 )  /  8 )  / 
2 )  x.  X
)  +  ( ( A ^ 4 )  / ;; 2 5 6 ) ) )  +  ( P  x.  ( Y ^ 2 ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) )  =  ( ( ( X ^
4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( B  x.  ( X ^ 2 ) )  +  ( ( C  x.  X )  +  D ) ) ) )
297158, 164, 2963eqtrrd 2320 1  |-  ( ph  ->  ( ( ( X ^ 4 )  +  ( A  x.  ( X ^ 3 ) ) )  +  ( ( B  x.  ( X ^ 2 ) )  +  ( ( C  x.  X )  +  D ) ) )  =  ( ( ( Y ^ 4 )  +  ( P  x.  ( Y ^ 2 ) ) )  +  ( ( Q  x.  Y
)  +  R ) ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 358    = wceq 1623    e. wcel 1684    =/= wne 2446  (class class class)co 5858   CCcc 8735   0cc0 8737   1c1 8738    + caddc 8740    x. cmul 8742    - cmin 9037    / cdiv 9423   2c2 9795   3c3 9796   4c4 9797   5c5 9798   6c6 9799   8c8 9801   NN0cn0 9965  ;cdc 10124   ^cexp 11104
This theorem is referenced by:  quart  20157
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1533  ax-5 1544  ax-17 1603  ax-9 1635  ax-8 1643  ax-13 1686  ax-14 1688  ax-6 1703  ax-7 1708  ax-11 1715  ax-12 1866  ax-ext 2264  ax-sep 4141  ax-nul 4149  ax-pow 4188  ax-pr 4214  ax-un 4512  ax-cnex 8793  ax-resscn 8794  ax-1cn 8795  ax-icn 8796  ax-addcl 8797  ax-addrcl 8798  ax-mulcl 8799  ax-mulrcl 8800  ax-mulcom 8801  ax-addass 8802  ax-mulass 8803  ax-distr 8804  ax-i2m1 8805  ax-1ne0 8806  ax-1rid 8807  ax-rnegex 8808  ax-rrecex 8809  ax-cnre 8810  ax-pre-lttri 8811  ax-pre-lttrn 8812  ax-pre-ltadd 8813  ax-pre-mulgt0 8814
This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3or 935  df-3an 936  df-tru 1310  df-ex 1529  df-nf 1532  df-sb 1630  df-eu 2147  df-mo 2148  df-clab 2270  df-cleq 2276  df-clel 2279  df-nfc 2408  df-ne 2448  df-nel 2449  df-ral 2548  df-rex 2549  df-reu 2550  df-rmo 2551  df-rab 2552  df-v 2790  df-sbc 2992  df-csb 3082  df-dif 3155  df-un 3157  df-in 3159  df-ss 3166  df-pss 3168  df-nul 3456  df-if 3566  df-pw 3627  df-sn 3646  df-pr 3647  df-tp 3648  df-op 3649  df-uni 3828  df-iun 3907  df-br 4024  df-opab 4078  df-mpt 4079  df-tr 4114  df-eprel 4305  df-id 4309  df-po 4314  df-so 4315  df-fr 4352  df-we 4354  df-ord 4395  df-on 4396  df-lim 4397  df-suc 4398  df-om 4657  df-xp 4695  df-rel 4696  df-cnv 4697  df-co 4698  df-dm 4699  df-rn 4700  df-res 4701  df-ima 4702  df-iota 5219  df-fun 5257  df-fn 5258  df-f 5259  df-f1 5260  df-fo 5261  df-f1o 5262  df-fv 5263  df-ov 5861  df-oprab 5862  df-mpt2 5863  df-2nd 6123  df-riota 6304  df-recs 6388  df-rdg 6423  df-er 6660  df-en 6864  df-dom 6865  df-sdom 6866  df-pnf 8869  df-mnf 8870  df-xr 8871  df-ltxr 8872  df-le 8873  df-sub 9039  df-neg 9040  df-div 9424  df-nn 9747  df-2 9804  df-3 9805  df-4 9806  df-5 9807  df-6 9808  df-7 9809  df-8 9810  df-9 9811  df-10 9812  df-n0 9966  df-z 10025  df-dec 10125  df-uz 10231  df-seq 11047  df-exp 11105
  Copyright terms: Public domain W3C validator