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

Theorem binom4 15566
Description: Work out a quartic binomial. (You would think that by this point it would be faster to use binom 11910, 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 9132 . . . 4  |-  4  =  ( 3  +  1 )
21oveq2i 5978 . . 3  |-  ( ( A  +  B ) ^ 4 )  =  ( ( A  +  B ) ^ (
3  +  1 ) )
3 addcl 8085 . . . 4  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  +  B
)  e.  CC )
4 3nn0 9348 . . . 4  |-  3  e.  NN0
5 expp1 10728 . . . 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 2252 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  +  B ) ^ 4 )  =  ( ( ( A  +  B
) ^ 3 )  x.  ( A  +  B ) ) )
8 binom3 10839 . . 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 5982 . 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 10739 . . . . . . 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 9146 . . . . . . 7  |-  3  e.  CC
1410sqcld 10853 . . . . . . . 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 8128 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  B
)  e.  CC )
17 mulcl 8087 . . . . . . 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 8127 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
3 )  +  ( 3  x.  ( ( A ^ 2 )  x.  B ) ) )  e.  CC )
2015sqcld 10853 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 2 )  e.  CC )
2110, 20mulcld 8128 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  ( B ^ 2 ) )  e.  CC )
22 mulcl 8087 . . . . . . 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 10739 . . . . . . 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 8127 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  +  ( B ^ 3 ) )  e.  CC )
2719, 26addcld 8127 . . . 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 8132 . . 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 5978 . . . . . . . . 9  |-  ( A ^ 4 )  =  ( A ^ (
3  +  1 ) )
30 expp1 10728 . . . . . . . . . 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 2253 . . . . . . . 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 8131 . . . . . . . . 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 8260 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  A
)  =  ( ( ( A ^ 2 )  x.  A )  x.  B ) )
36 df-3 9131 . . . . . . . . . . . . . 14  |-  3  =  ( 2  +  1 )
3736oveq2i 5978 . . . . . . . . . . . . 13  |-  ( A ^ 3 )  =  ( A ^ (
2  +  1 ) )
38 2nn0 9347 . . . . . . . . . . . . . 14  |-  2  e.  NN0
39 expp1 10728 . . . . . . . . . . . . . 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 2253 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  A
)  =  ( A ^ 3 ) )
4241oveq1d 5982 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  A )  x.  B
)  =  ( ( A ^ 3 )  x.  B ) )
4335, 42eqtrd 2240 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  A
)  =  ( ( A ^ 3 )  x.  B ) )
4443oveq2d 5983 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( ( A ^
2 )  x.  B
)  x.  A ) )  =  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )
4534, 44eqtrd 2240 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  A
)  =  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )
4632, 45oveq12d 5985 . . . . . . 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 8135 . . . . . 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 8131 . . . . . . . . 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 8260 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  A )  =  ( ( A  x.  A )  x.  ( B ^ 2 ) ) )
5010sqvald 10852 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A ^ 2 )  =  ( A  x.  A ) )
5150oveq1d 5982 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  =  ( ( A  x.  A )  x.  ( B ^ 2 ) ) )
5249, 51eqtr4d 2243 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  A )  =  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )
5352oveq2d 5983 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A  x.  ( B ^ 2 ) )  x.  A ) )  =  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )
5448, 53eqtrd 2240 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  A )  =  ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) ) )
5525, 10mulcomd 8129 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
3 )  x.  A
)  =  ( A  x.  ( B ^
3 ) ) )
5654, 55oveq12d 5985 . . . . . . 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 8135 . . . . . 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 5985 . . . . 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 8135 . . . 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 8133 . . . . 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 8131 . . . . . . . . 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 8131 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  B
)  =  ( ( A ^ 2 )  x.  ( B  x.  B ) ) )
6315sqvald 10852 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( B ^ 2 )  =  ( B  x.  B ) )
6463oveq2d 5983 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  =  ( ( A ^ 2 )  x.  ( B  x.  B
) ) )
6562, 64eqtr4d 2243 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( ( A ^ 2 )  x.  B )  x.  B
)  =  ( ( A ^ 2 )  x.  ( B ^
2 ) ) )
6665oveq2d 5983 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( ( A ^
2 )  x.  B
)  x.  B ) )  =  ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) ) )
6761, 66eqtrd 2240 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  B
) )  x.  B
)  =  ( 3  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) ) )
6867oveq2d 5983 . . . . . . 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 8135 . . . . . 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 8131 . . . . . . . . 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 8131 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  B )  =  ( A  x.  ( ( B ^
2 )  x.  B
) ) )
7236oveq2i 5978 . . . . . . . . . . . . 13  |-  ( B ^ 3 )  =  ( B ^ (
2  +  1 ) )
73 expp1 10728 . . . . . . . . . . . . . 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 2253 . . . . . . . . . . . 12  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
2 )  x.  B
)  =  ( B ^ 3 ) )
7675oveq2d 5983 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  (
( B ^ 2 )  x.  B ) )  =  ( A  x.  ( B ^
3 ) ) )
7771, 76eqtrd 2240 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A  x.  ( B ^ 2 ) )  x.  B )  =  ( A  x.  ( B ^ 3 ) ) )
7877oveq2d 5983 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 3  x.  (
( A  x.  ( B ^ 2 ) )  x.  B ) )  =  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )
7970, 78eqtrd 2240 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 2 ) ) )  x.  B )  =  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) )
801oveq2i 5978 . . . . . . . . 9  |-  ( B ^ 4 )  =  ( B ^ (
3  +  1 ) )
81 expp1 10728 . . . . . . . . . 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 2253 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( B ^
3 )  x.  B
)  =  ( B ^ 4 ) )
8479, 83oveq12d 5985 . . . . . . 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 8135 . . . . . 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 5985 . . . . 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 8128 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
3 )  x.  B
)  e.  CC )
8814, 20mulcld 8128 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
2 )  x.  ( B ^ 2 ) )  e.  CC )
89 mulcl 8087 . . . . . . 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 8128 . . . . . . . 8  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( A  x.  ( B ^ 3 ) )  e.  CC )
92 mulcl 8087 . . . . . . . 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 9349 . . . . . . . 8  |-  4  e.  NN0
95 expcl 10739 . . . . . . . 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 8127 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( A  x.  ( B ^ 3 ) ) )  +  ( B ^ 4 ) )  e.  CC )
9887, 90, 97addassd 8130 . . . . 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 2244 . . . 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 5985 . . 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 10739 . . . . . . 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 8087 . . . . . . 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 8127 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( A ^
4 )  +  ( 3  x.  ( ( A ^ 3 )  x.  B ) ) )  e.  CC )
10690, 91addcld 8127 . . . . 5  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( ( 3  x.  ( ( A ^
2 )  x.  ( B ^ 2 ) ) )  +  ( A  x.  ( B ^
3 ) ) )  e.  CC )
10790, 97addcld 8127 . . . . 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 8276 . . . 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 8130 . . . . . 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 5977 . . . . . . . . 9  |-  ( 4  x.  ( ( A ^ 3 )  x.  B ) )  =  ( ( 3  +  1 )  x.  (
( A ^ 3 )  x.  B ) )
111 ax-1cn 8053 . . . . . . . . . . 11  |-  1  e.  CC
112111a1i 9 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  1  e.  CC )
11333, 112, 87adddird 8133 . . . . . . . . 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 2252 . . . . . . . 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 8126 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 1  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( A ^ 3 )  x.  B ) )
116115oveq2d 5983 . . . . . . . 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 2240 . . . . . . 7  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  (
( A ^ 3 )  x.  B ) )  =  ( ( 3  x.  ( ( A ^ 3 )  x.  B ) )  +  ( ( A ^ 3 )  x.  B ) ) )
118117oveq2d 5983 . . . . . 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 2243 . . . . 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 8276 . . . . . 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 9214 . . . . . . . . 9  |-  ( 3  +  3 )  =  6
122121oveq1i 5977 . . . . . . . 8  |-  ( ( 3  +  3 )  x.  ( ( A ^ 2 )  x.  ( B ^ 2 ) ) )  =  ( 6  x.  (
( A ^ 2 )  x.  ( B ^ 2 ) ) )
12333, 33, 88adddird 8133 . . . . . . . 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 2254 . . . . . . 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 9207 . . . . . . . . . . . . 13  |-  ( 3  +  1 )  =  4
12613, 111, 125addcomli 8252 . . . . . . . . . . . 12  |-  ( 1  +  3 )  =  4
127126oveq1i 5977 . . . . . . . . . . 11  |-  ( ( 1  +  3 )  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( 4  x.  ( A  x.  ( B ^
3 ) ) )
128112, 33, 91adddird 8133 . . . . . . . . . . 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 2254 . . . . . . . . . 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 8126 . . . . . . . . . . 11  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 1  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( A  x.  ( B ^
3 ) ) )
131130oveq1d 5982 . . . . . . . . . 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 2240 . . . . . . . . 9  |-  ( ( A  e.  CC  /\  B  e.  CC )  ->  ( 4  x.  ( A  x.  ( B ^ 3 ) ) )  =  ( ( A  x.  ( B ^ 3 ) )  +  ( 3  x.  ( A  x.  ( B ^ 3 ) ) ) ) )
133132oveq1d 5982 . . . . . . . 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 8130 . . . . . . . 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 2240 . . . . . . 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 5985 . . . . . 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 2243 . . . . 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 5985 . . . 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 2240 . . 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 2244 . 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 2244 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 2178  (class class class)co 5967   CCcc 7958   1c1 7961    + caddc 7963    x. cmul 7965   2c2 9122   3c3 9123   4c4 9124   6c6 9126   NN0cn0 9330   ^cexp 10720
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 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2180  ax-14 2181  ax-ext 2189  ax-coll 4175  ax-sep 4178  ax-nul 4186  ax-pow 4234  ax-pr 4269  ax-un 4498  ax-setind 4603  ax-iinf 4654  ax-cnex 8051  ax-resscn 8052  ax-1cn 8053  ax-1re 8054  ax-icn 8055  ax-addcl 8056  ax-addrcl 8057  ax-mulcl 8058  ax-mulrcl 8059  ax-addcom 8060  ax-mulcom 8061  ax-addass 8062  ax-mulass 8063  ax-distr 8064  ax-i2m1 8065  ax-0lt1 8066  ax-1rid 8067  ax-0id 8068  ax-rnegex 8069  ax-precex 8070  ax-cnre 8071  ax-pre-ltirr 8072  ax-pre-ltwlin 8073  ax-pre-lttrn 8074  ax-pre-apti 8075  ax-pre-ltadd 8076  ax-pre-mulgt0 8077  ax-pre-mulext 8078
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 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ne 2379  df-nel 2474  df-ral 2491  df-rex 2492  df-reu 2493  df-rmo 2494  df-rab 2495  df-v 2778  df-sbc 3006  df-csb 3102  df-dif 3176  df-un 3178  df-in 3180  df-ss 3187  df-nul 3469  df-if 3580  df-pw 3628  df-sn 3649  df-pr 3650  df-op 3652  df-uni 3865  df-int 3900  df-iun 3943  df-br 4060  df-opab 4122  df-mpt 4123  df-tr 4159  df-id 4358  df-po 4361  df-iso 4362  df-iord 4431  df-on 4433  df-ilim 4434  df-suc 4436  df-iom 4657  df-xp 4699  df-rel 4700  df-cnv 4701  df-co 4702  df-dm 4703  df-rn 4704  df-res 4705  df-ima 4706  df-iota 5251  df-fun 5292  df-fn 5293  df-f 5294  df-f1 5295  df-fo 5296  df-f1o 5297  df-fv 5298  df-riota 5922  df-ov 5970  df-oprab 5971  df-mpo 5972  df-1st 6249  df-2nd 6250  df-recs 6414  df-frec 6500  df-pnf 8144  df-mnf 8145  df-xr 8146  df-ltxr 8147  df-le 8148  df-sub 8280  df-neg 8281  df-reap 8683  df-ap 8690  df-div 8781  df-inn 9072  df-2 9130  df-3 9131  df-4 9132  df-5 9133  df-6 9134  df-n0 9331  df-z 9408  df-uz 9684  df-seqfrec 10630  df-exp 10721
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator