ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  binom4 Unicode version

Theorem binom4 15451
Description: Work out a quartic binomial. (You would think that by this point it would be faster to use binom 11795, but it turns out to be just as much work to put it into this form after clearing all the sums and calculating binomial coefficients.) (Contributed by Mario Carneiro, 6-May-2015.)
Assertion
Ref Expression
binom4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ 4 )  =  ( ( ( A ^ 4 )  +  ( 4  x.  ( ( A ^ 3 )  x.  B ) ) )  +  ( ( 6  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )

Proof of Theorem binom4
StepHypRef Expression
1 df-4 9097 . . . 4  |-  4  =  ( 3  +  1 )
21oveq2i 5955 . . 3  |-  ( ( A  +  B ) ^ 4 )  =  ( ( A  +  B ) ^ (
3  +  1 ) )
3 addcl 8050 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  +  B
)  e.  CC )
4 3nn0 9313 . . . 4  |-  3  e.  NN0
5 expp1 10691 . . . 4  |-  ( ( ( A  +  B
)  e.  CC  /\  3  e.  NN0 )  -> 
( ( A  +  B ) ^ (
3  +  1 ) )  =  ( ( ( A  +  B
) ^ 3 )  x.  ( A  +  B ) ) )
63, 4, 5sylancl 413 . . 3  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ (
3  +  1 ) )  =  ( ( ( A  +  B
) ^ 3 )  x.  ( A  +  B ) ) )
72, 6eqtrid 2250 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ 4 )  =  ( ( ( A  +  B
) ^ 3 )  x.  ( A  +  B ) ) )
8 binom3 10802 . . 3  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ 3 )  =  ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) ) )
98oveq1d 5959 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A  +  B ) ^
3 )  x.  ( A  +  B )
)  =  ( ( ( ( A ^
3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^
2 ) ) )  +  ( B ^
3 ) ) )  x.  ( A  +  B ) ) )
10 simpl 109 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  A  e.  CC )
11 expcl 10702 . . . . . . 7  |-  ( ( A  e.  CC  /\  3  e.  NN0 )  -> 
( A ^ 3 )  e.  CC )
1210, 4, 11sylancl 413 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ 3 )  e.  CC )
13 3cn 9111 . . . . . . 7  |-  3  e.  CC
1410sqcld 10816 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ 2 )  e.  CC )
15 simpr 110 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  B  e.  CC )
1614, 15mulcld 8093 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  B
)  e.  CC )
17 mulcl 8052 . . . . . . 7  |-  ( ( 3  e.  CC  /\  ( ( A ^
2 )  x.  B
)  e.  CC )  ->  ( 3  x.  ( ( A ^
2 )  x.  B
) )  e.  CC )
1813, 16, 17sylancr 414 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A ^ 2 )  x.  B ) )  e.  CC )
1912, 18addcld 8092 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  e.  CC )
2015sqcld 10816 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 2 )  e.  CC )
2110, 20mulcld 8093 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  ( B ^ 2 ) )  e.  CC )
22 mulcl 8052 . . . . . . 7  |-  ( ( 3  e.  CC  /\  ( A  x.  ( B ^ 2 ) )  e.  CC )  -> 
( 3  x.  ( A  x.  ( B ^ 2 ) ) )  e.  CC )
2313, 21, 22sylancr 414 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  e.  CC )
24 expcl 10702 . . . . . . 7  |-  ( ( B  e.  CC  /\  3  e.  NN0 )  -> 
( B ^ 3 )  e.  CC )
2515, 4, 24sylancl 413 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 3 )  e.  CC )
2623, 25addcld 8092 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  e.  CC )
2719, 26addcld 8092 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 3 )  +  ( 3  x.  (
( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  e.  CC )
2827, 10, 15adddid 8097 . . 3  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  ( A  +  B ) )  =  ( ( ( ( ( A ^
3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^
2 ) ) )  +  ( B ^
3 ) ) )  x.  A )  +  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  B ) ) )
291oveq2i 5955 . . . . . . . . 9  |-  ( A ^ 4 )  =  ( A ^ (
3  +  1 ) )
30 expp1 10691 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  3  e.  NN0 )  -> 
( A ^ (
3  +  1 ) )  =  ( ( A ^ 3 )  x.  A ) )
3110, 4, 30sylancl 413 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ (
3  +  1 ) )  =  ( ( A ^ 3 )  x.  A ) )
3229, 31eqtr2id 2251 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
3 )  x.  A
)  =  ( A ^ 4 ) )
3313a1i 9 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  3  e.  CC )
3433, 16, 10mulassd 8096 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  A
)  =  ( 3  x.  ( ( ( A ^ 2 )  x.  B )  x.  A ) ) )
3514, 15, 10mul32d 8225 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  A
)  =  ( ( ( A ^ 2 )  x.  A )  x.  B ) )
36 df-3 9096 . . . . . . . . . . . . . 14  |-  3  =  ( 2  +  1 )
3736oveq2i 5955 . . . . . . . . . . . . 13  |-  ( A ^ 3 )  =  ( A ^ (
2  +  1 ) )
38 2nn0 9312 . . . . . . . . . . . . . 14  |-  2  e.  NN0
39 expp1 10691 . . . . . . . . . . . . . 14  |-  ( ( A  e.  CC  /\  2  e.  NN0 )  -> 
( A ^ (
2  +  1 ) )  =  ( ( A ^ 2 )  x.  A ) )
4010, 38, 39sylancl 413 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ (
2  +  1 ) )  =  ( ( A ^ 2 )  x.  A ) )
4137, 40eqtr2id 2251 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  A
)  =  ( A ^ 3 ) )
4241oveq1d 5959 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  A )  x.  B
)  =  ( ( A ^ 3 )  x.  B ) )
4335, 42eqtrd 2238 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  A
)  =  ( ( A ^ 3 )  x.  B ) )
4443oveq2d 5960 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( ( A ^
2 )  x.  B
)  x.  A ) )  =  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )
4534, 44eqtrd 2238 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  A
)  =  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )
4632, 45oveq12d 5962 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 3 )  x.  A )  +  ( ( 3  x.  (
( A ^ 2 )  x.  B ) )  x.  A ) )  =  ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) ) )
4712, 10, 18, 46joinlmuladdmuld 8100 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 3 )  +  ( 3  x.  (
( A ^ 2 )  x.  B ) ) )  x.  A
)  =  ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) ) )
4833, 21, 10mulassd 8096 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  A )  =  ( 3  x.  ( ( A  x.  ( B ^ 2 ) )  x.  A ) ) )
4910, 20, 10mul32d 8225 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  A )  =  ( ( A  x.  A )  x.  ( B ^ 2 ) ) )
5010sqvald 10815 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ 2 )  =  ( A  x.  A ) )
5150oveq1d 5959 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  =  ( ( A  x.  A )  x.  ( B ^ 2 ) ) )
5249, 51eqtr4d 2241 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  A )  =  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )
5352oveq2d 5960 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A  x.  ( B ^ 2 ) )  x.  A ) )  =  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )
5448, 53eqtrd 2238 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  A )  =  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )
5525, 10mulcomd 8094 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
3 )  x.  A
)  =  ( A  x.  ( B ^
3 ) ) )
5654, 55oveq12d 5962 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  A
)  +  ( ( B ^ 3 )  x.  A ) )  =  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^ 3 ) ) ) )
5723, 10, 25, 56joinlmuladdmuld 8100 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  x.  A )  =  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^ 3 ) ) ) )
5847, 57oveq12d 5962 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  x.  A )  +  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  x.  A ) )  =  ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) ) ) )
5919, 10, 26, 58joinlmuladdmuld 8100 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  A )  =  ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) ) ) )
6019, 26, 15adddird 8098 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  B )  =  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  x.  B )  +  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  x.  B ) ) )
6133, 16, 15mulassd 8096 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  B
)  =  ( 3  x.  ( ( ( A ^ 2 )  x.  B )  x.  B ) ) )
6214, 15, 15mulassd 8096 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  B
)  =  ( ( A ^ 2 )  x.  ( B  x.  B ) ) )
6315sqvald 10815 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 2 )  =  ( B  x.  B ) )
6463oveq2d 5960 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  =  ( ( A ^ 2 )  x.  ( B  x.  B
) ) )
6562, 64eqtr4d 2241 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  B
)  =  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )
6665oveq2d 5960 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( ( A ^
2 )  x.  B
)  x.  B ) )  =  ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) ) )
6761, 66eqtrd 2238 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  B
)  =  ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) ) )
6867oveq2d 5960 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 3 )  x.  B )  +  ( ( 3  x.  (
( A ^ 2 )  x.  B ) )  x.  B ) )  =  ( ( ( A ^ 3 )  x.  B )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) ) )
6912, 15, 18, 68joinlmuladdmuld 8100 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 3 )  +  ( 3  x.  (
( A ^ 2 )  x.  B ) ) )  x.  B
)  =  ( ( ( A ^ 3 )  x.  B )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) ) )
7033, 21, 15mulassd 8096 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  B )  =  ( 3  x.  ( ( A  x.  ( B ^ 2 ) )  x.  B ) ) )
7110, 20, 15mulassd 8096 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  B )  =  ( A  x.  ( ( B ^
2 )  x.  B
) ) )
7236oveq2i 5955 . . . . . . . . . . . . 13  |-  ( B ^ 3 )  =  ( B ^ (
2  +  1 ) )
73 expp1 10691 . . . . . . . . . . . . . 14  |-  ( ( B  e.  CC  /\  2  e.  NN0 )  -> 
( B ^ (
2  +  1 ) )  =  ( ( B ^ 2 )  x.  B ) )
7415, 38, 73sylancl 413 . . . . . . . . . . . . 13  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ (
2  +  1 ) )  =  ( ( B ^ 2 )  x.  B ) )
7572, 74eqtr2id 2251 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
2 )  x.  B
)  =  ( B ^ 3 ) )
7675oveq2d 5960 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  (
( B ^ 2 )  x.  B ) )  =  ( A  x.  ( B ^
3 ) ) )
7771, 76eqtrd 2238 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  B )  =  ( A  x.  ( B ^ 3 ) ) )
7877oveq2d 5960 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A  x.  ( B ^ 2 ) )  x.  B ) )  =  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )
7970, 78eqtrd 2238 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  B )  =  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )
801oveq2i 5955 . . . . . . . . 9  |-  ( B ^ 4 )  =  ( B ^ (
3  +  1 ) )
81 expp1 10691 . . . . . . . . . 10  |-  ( ( B  e.  CC  /\  3  e.  NN0 )  -> 
( B ^ (
3  +  1 ) )  =  ( ( B ^ 3 )  x.  B ) )
8215, 4, 81sylancl 413 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ (
3  +  1 ) )  =  ( ( B ^ 3 )  x.  B ) )
8380, 82eqtr2id 2251 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
3 )  x.  B
)  =  ( B ^ 4 ) )
8479, 83oveq12d 5962 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  B
)  +  ( ( B ^ 3 )  x.  B ) )  =  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) )
8523, 15, 25, 84joinlmuladdmuld 8100 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  x.  B )  =  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) )
8669, 85oveq12d 5962 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  x.  B )  +  ( ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  x.  B ) )  =  ( ( ( ( A ^ 3 )  x.  B )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) )
8712, 15mulcld 8093 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
3 )  x.  B
)  e.  CC )
8814, 20mulcld 8093 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  e.  CC )
89 mulcl 8052 . . . . . . 7  |-  ( ( 3  e.  CC  /\  ( ( A ^
2 )  x.  ( B ^ 2 ) )  e.  CC )  -> 
( 3  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  e.  CC )
9013, 88, 89sylancr 414 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  e.  CC )
9110, 25mulcld 8093 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  ( B ^ 3 ) )  e.  CC )
92 mulcl 8052 . . . . . . . 8  |-  ( ( 3  e.  CC  /\  ( A  x.  ( B ^ 3 ) )  e.  CC )  -> 
( 3  x.  ( A  x.  ( B ^ 3 ) ) )  e.  CC )
9313, 91, 92sylancr 414 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  e.  CC )
94 4nn0 9314 . . . . . . . 8  |-  4  e.  NN0
95 expcl 10702 . . . . . . . 8  |-  ( ( B  e.  CC  /\  4  e.  NN0 )  -> 
( B ^ 4 )  e.  CC )
9615, 94, 95sylancl 413 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 4 )  e.  CC )
9793, 96addcld 8092 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) )  e.  CC )
9887, 90, 97addassd 8095 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  x.  B )  +  ( 3  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) )  =  ( ( ( A ^ 3 )  x.  B )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )
9960, 86, 983eqtrd 2242 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  B )  =  ( ( ( A ^ 3 )  x.  B )  +  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) ) ) )
10059, 99oveq12d 5962 . . 3  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  A
)  +  ( ( ( ( A ^
3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^
2 ) ) )  +  ( B ^
3 ) ) )  x.  B ) )  =  ( ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^ 3 ) ) ) )  +  ( ( ( A ^
3 )  x.  B
)  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) ) )
101 expcl 10702 . . . . . . 7  |-  ( ( A  e.  CC  /\  4  e.  NN0 )  -> 
( A ^ 4 )  e.  CC )
10210, 94, 101sylancl 413 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ 4 )  e.  CC )
103 mulcl 8052 . . . . . . 7  |-  ( ( 3  e.  CC  /\  ( ( A ^
3 )  x.  B
)  e.  CC )  ->  ( 3  x.  ( ( A ^
3 )  x.  B
) )  e.  CC )
10413, 87, 103sylancr 414 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A ^ 3 )  x.  B ) )  e.  CC )
105102, 104addcld 8092 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
4 )  +  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )  e.  CC )
10690, 91addcld 8092 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) )  e.  CC )
10790, 97addcld 8092 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) )  e.  CC )
108105, 106, 87, 107add4d 8241 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) ) )  +  ( ( ( A ^ 3 )  x.  B )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )  =  ( ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( A ^
3 )  x.  B
) )  +  ( ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) ) )
109102, 104, 87addassd 8095 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 4 )  +  ( 3  x.  (
( A ^ 3 )  x.  B ) ) )  +  ( ( A ^ 3 )  x.  B ) )  =  ( ( A ^ 4 )  +  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( ( A ^
3 )  x.  B
) ) ) )
1101oveq1i 5954 . . . . . . . . 9  |-  ( 4  x.  ( ( A ^ 3 )  x.  B ) )  =  ( ( 3  +  1 )  x.  (
( A ^ 3 )  x.  B ) )
111 ax-1cn 8018 . . . . . . . . . . 11  |-  1  e.  CC
112111a1i 9 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  1  e.  CC )
11333, 112, 87adddird 8098 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  +  1 )  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( 1  x.  ( ( A ^
3 )  x.  B
) ) ) )
114110, 113eqtrid 2250 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( 1  x.  ( ( A ^
3 )  x.  B
) ) ) )
11587mulid2d 8091 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 1  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( A ^ 3 )  x.  B ) )
116115oveq2d 5960 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
3 )  x.  B
) )  +  ( 1  x.  ( ( A ^ 3 )  x.  B ) ) )  =  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( ( A ^ 3 )  x.  B ) ) )
117114, 116eqtrd 2238 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( ( A ^ 3 )  x.  B ) ) )
118117oveq2d 5960 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
4 )  +  ( 4  x.  ( ( A ^ 3 )  x.  B ) ) )  =  ( ( A ^ 4 )  +  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( ( A ^
3 )  x.  B
) ) ) )
119109, 118eqtr4d 2241 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 4 )  +  ( 3  x.  (
( A ^ 3 )  x.  B ) ) )  +  ( ( A ^ 3 )  x.  B ) )  =  ( ( A ^ 4 )  +  ( 4  x.  ( ( A ^
3 )  x.  B
) ) ) )
12090, 91, 90, 97add4d 8241 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^ 3 ) ) )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) )  =  ( ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( 3  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) ) )  +  ( ( A  x.  ( B ^ 3 ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )
121 3p3e6 9179 . . . . . . . . 9  |-  ( 3  +  3 )  =  6
122121oveq1i 5954 . . . . . . . 8  |-  ( ( 3  +  3 )  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  =  ( 6  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )
12333, 33, 88adddird 8098 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  +  3 )  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  =  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) ) )
124122, 123eqtr3id 2252 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 6  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  =  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) ) )
125 3p1e4 9172 . . . . . . . . . . . . 13  |-  ( 3  +  1 )  =  4
12613, 111, 125addcomli 8217 . . . . . . . . . . . 12  |-  ( 1  +  3 )  =  4
127126oveq1i 5954 . . . . . . . . . . 11  |-  ( ( 1  +  3 )  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( 4  x.  ( A  x.  ( B ^
3 ) ) )
128112, 33, 91adddird 8098 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 1  +  3 )  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( ( 1  x.  ( A  x.  ( B ^
3 ) ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) ) )
129127, 128eqtr3id 2252 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( ( 1  x.  ( A  x.  ( B ^
3 ) ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) ) )
13091mulid2d 8091 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 1  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( A  x.  ( B ^
3 ) ) )
131130oveq1d 5959 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 1  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )  =  ( ( A  x.  ( B ^ 3 ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) ) )
132129, 131eqtrd 2238 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( ( A  x.  ( B ^ 3 ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) ) )
133132oveq1d 5959 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) )  =  ( ( ( A  x.  ( B ^ 3 ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )  +  ( B ^ 4 ) ) )
13491, 93, 96addassd 8095 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A  x.  ( B ^
3 ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )  +  ( B ^ 4 ) )  =  ( ( A  x.  ( B ^ 3 ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) )
135133, 134eqtrd 2238 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) )  =  ( ( A  x.  ( B ^
3 ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) )
136124, 135oveq12d 5962 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 6  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) )  =  ( ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )  +  ( ( A  x.  ( B ^ 3 ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )
137120, 136eqtr4d 2241 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^ 3 ) ) )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) )  =  ( ( 6  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) ) )
138119, 137oveq12d 5962 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( A ^
3 )  x.  B
) )  +  ( ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )  =  ( ( ( A ^ 4 )  +  ( 4  x.  (
( A ^ 3 )  x.  B ) ) )  +  ( ( 6  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) ) ) )
139108, 138eqtrd 2238 . . 3  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 4 )  +  ( 3  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) ) )  +  ( ( ( A ^ 3 )  x.  B )  +  ( ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )  =  ( ( ( A ^ 4 )  +  ( 4  x.  (
( A ^ 3 )  x.  B ) ) )  +  ( ( 6  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) ) ) )
14028, 100, 1393eqtrd 2242 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( ( A ^ 3 )  +  ( 3  x.  ( ( A ^
2 )  x.  B
) ) )  +  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) ) )  x.  ( A  +  B ) )  =  ( ( ( A ^ 4 )  +  ( 4  x.  ( ( A ^
3 )  x.  B
) ) )  +  ( ( 6  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^
3 ) ) )  +  ( B ^
4 ) ) ) ) )
1417, 9, 1403eqtrd 2242 1  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ 4 )  =  ( ( ( A ^ 4 )  +  ( 4  x.  ( ( A ^ 3 )  x.  B ) ) )  +  ( ( 6  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  +  ( ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) ) ) ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    = wceq 1373    e. wcel 2176  (class class class)co 5944   CCcc 7923   1c1 7926    + caddc 7928    x. cmul 7930   2c2 9087   3c3 9088   4c4 9089   6c6 9091   NN0cn0 9295   ^cexp 10683
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-13 2178  ax-14 2179  ax-ext 2187  ax-coll 4159  ax-sep 4162  ax-nul 4170  ax-pow 4218  ax-pr 4253  ax-un 4480  ax-setind 4585  ax-iinf 4636  ax-cnex 8016  ax-resscn 8017  ax-1cn 8018  ax-1re 8019  ax-icn 8020  ax-addcl 8021  ax-addrcl 8022  ax-mulcl 8023  ax-mulrcl 8024  ax-addcom 8025  ax-mulcom 8026  ax-addass 8027  ax-mulass 8028  ax-distr 8029  ax-i2m1 8030  ax-0lt1 8031  ax-1rid 8032  ax-0id 8033  ax-rnegex 8034  ax-precex 8035  ax-cnre 8036  ax-pre-ltirr 8037  ax-pre-ltwlin 8038  ax-pre-lttrn 8039  ax-pre-apti 8040  ax-pre-ltadd 8041  ax-pre-mulgt0 8042  ax-pre-mulext 8043
This theorem depends on definitions:  df-bi 117  df-dc 837  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1484  df-sb 1786  df-eu 2057  df-mo 2058  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ne 2377  df-nel 2472  df-ral 2489  df-rex 2490  df-reu 2491  df-rmo 2492  df-rab 2493  df-v 2774  df-sbc 2999  df-csb 3094  df-dif 3168  df-un 3170  df-in 3172  df-ss 3179  df-nul 3461  df-if 3572  df-pw 3618  df-sn 3639  df-pr 3640  df-op 3642  df-uni 3851  df-int 3886  df-iun 3929  df-br 4045  df-opab 4106  df-mpt 4107  df-tr 4143  df-id 4340  df-po 4343  df-iso 4344  df-iord 4413  df-on 4415  df-ilim 4416  df-suc 4418  df-iom 4639  df-xp 4681  df-rel 4682  df-cnv 4683  df-co 4684  df-dm 4685  df-rn 4686  df-res 4687  df-ima 4688  df-iota 5232  df-fun 5273  df-fn 5274  df-f 5275  df-f1 5276  df-fo 5277  df-f1o 5278  df-fv 5279  df-riota 5899  df-ov 5947  df-oprab 5948  df-mpo 5949  df-1st 6226  df-2nd 6227  df-recs 6391  df-frec 6477  df-pnf 8109  df-mnf 8110  df-xr 8111  df-ltxr 8112  df-le 8113  df-sub 8245  df-neg 8246  df-reap 8648  df-ap 8655  df-div 8746  df-inn 9037  df-2 9095  df-3 9096  df-4 9097  df-5 9098  df-6 9099  df-n0 9296  df-z 9373  df-uz 9649  df-seqfrec 10593  df-exp 10684
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator