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

Theorem binom4 15526
Description: Work out a quartic binomial. (You would think that by this point it would be faster to use binom 11870, 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 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + 𝐵)↑4) = (((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) + ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))

Proof of Theorem binom4
StepHypRef Expression
1 df-4 9117 . . . 4 4 = (3 + 1)
21oveq2i 5968 . . 3 ((𝐴 + 𝐵)↑4) = ((𝐴 + 𝐵)↑(3 + 1))
3 addcl 8070 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 + 𝐵) ∈ ℂ)
4 3nn0 9333 . . . 4 3 ∈ ℕ0
5 expp1 10713 . . . 4 (((𝐴 + 𝐵) ∈ ℂ ∧ 3 ∈ ℕ0) → ((𝐴 + 𝐵)↑(3 + 1)) = (((𝐴 + 𝐵)↑3) · (𝐴 + 𝐵)))
63, 4, 5sylancl 413 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + 𝐵)↑(3 + 1)) = (((𝐴 + 𝐵)↑3) · (𝐴 + 𝐵)))
72, 6eqtrid 2251 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + 𝐵)↑4) = (((𝐴 + 𝐵)↑3) · (𝐴 + 𝐵)))
8 binom3 10824 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + 𝐵)↑3) = (((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))))
98oveq1d 5972 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴 + 𝐵)↑3) · (𝐴 + 𝐵)) = ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · (𝐴 + 𝐵)))
10 simpl 109 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → 𝐴 ∈ ℂ)
11 expcl 10724 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐴↑3) ∈ ℂ)
1210, 4, 11sylancl 413 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑3) ∈ ℂ)
13 3cn 9131 . . . . . . 7 3 ∈ ℂ
1410sqcld 10838 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑2) ∈ ℂ)
15 simpr 110 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → 𝐵 ∈ ℂ)
1614, 15mulcld 8113 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑2) · 𝐵) ∈ ℂ)
17 mulcl 8072 . . . . . . 7 ((3 ∈ ℂ ∧ ((𝐴↑2) · 𝐵) ∈ ℂ) → (3 · ((𝐴↑2) · 𝐵)) ∈ ℂ)
1813, 16, 17sylancr 414 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · ((𝐴↑2) · 𝐵)) ∈ ℂ)
1912, 18addcld 8112 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) ∈ ℂ)
2015sqcld 10838 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑2) ∈ ℂ)
2110, 20mulcld 8113 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 · (𝐵↑2)) ∈ ℂ)
22 mulcl 8072 . . . . . . 7 ((3 ∈ ℂ ∧ (𝐴 · (𝐵↑2)) ∈ ℂ) → (3 · (𝐴 · (𝐵↑2))) ∈ ℂ)
2313, 21, 22sylancr 414 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · (𝐴 · (𝐵↑2))) ∈ ℂ)
24 expcl 10724 . . . . . . 7 ((𝐵 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐵↑3) ∈ ℂ)
2515, 4, 24sylancl 413 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑3) ∈ ℂ)
2623, 25addcld 8112 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) ∈ ℂ)
2719, 26addcld 8112 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) ∈ ℂ)
2827, 10, 15adddid 8117 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · (𝐴 + 𝐵)) = (((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐴) + ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐵)))
291oveq2i 5968 . . . . . . . . 9 (𝐴↑4) = (𝐴↑(3 + 1))
30 expp1 10713 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐴↑(3 + 1)) = ((𝐴↑3) · 𝐴))
3110, 4, 30sylancl 413 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑(3 + 1)) = ((𝐴↑3) · 𝐴))
3229, 31eqtr2id 2252 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑3) · 𝐴) = (𝐴↑4))
3313a1i 9 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → 3 ∈ ℂ)
3433, 16, 10mulassd 8116 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · 𝐵)) · 𝐴) = (3 · (((𝐴↑2) · 𝐵) · 𝐴)))
3514, 15, 10mul32d 8245 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑2) · 𝐵) · 𝐴) = (((𝐴↑2) · 𝐴) · 𝐵))
36 df-3 9116 . . . . . . . . . . . . . 14 3 = (2 + 1)
3736oveq2i 5968 . . . . . . . . . . . . 13 (𝐴↑3) = (𝐴↑(2 + 1))
38 2nn0 9332 . . . . . . . . . . . . . 14 2 ∈ ℕ0
39 expp1 10713 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℂ ∧ 2 ∈ ℕ0) → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
4010, 38, 39sylancl 413 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
4137, 40eqtr2id 2252 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑2) · 𝐴) = (𝐴↑3))
4241oveq1d 5972 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑2) · 𝐴) · 𝐵) = ((𝐴↑3) · 𝐵))
4335, 42eqtrd 2239 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑2) · 𝐵) · 𝐴) = ((𝐴↑3) · 𝐵))
4443oveq2d 5973 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · (((𝐴↑2) · 𝐵) · 𝐴)) = (3 · ((𝐴↑3) · 𝐵)))
4534, 44eqtrd 2239 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · 𝐵)) · 𝐴) = (3 · ((𝐴↑3) · 𝐵)))
4632, 45oveq12d 5975 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑3) · 𝐴) + ((3 · ((𝐴↑2) · 𝐵)) · 𝐴)) = ((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))))
4712, 10, 18, 46joinlmuladdmuld 8120 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) · 𝐴) = ((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))))
4833, 21, 10mulassd 8116 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑2))) · 𝐴) = (3 · ((𝐴 · (𝐵↑2)) · 𝐴)))
4910, 20, 10mul32d 8245 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 · (𝐵↑2)) · 𝐴) = ((𝐴 · 𝐴) · (𝐵↑2)))
5010sqvald 10837 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑2) = (𝐴 · 𝐴))
5150oveq1d 5972 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑2) · (𝐵↑2)) = ((𝐴 · 𝐴) · (𝐵↑2)))
5249, 51eqtr4d 2242 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 · (𝐵↑2)) · 𝐴) = ((𝐴↑2) · (𝐵↑2)))
5352oveq2d 5973 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · ((𝐴 · (𝐵↑2)) · 𝐴)) = (3 · ((𝐴↑2) · (𝐵↑2))))
5448, 53eqtrd 2239 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑2))) · 𝐴) = (3 · ((𝐴↑2) · (𝐵↑2))))
5525, 10mulcomd 8114 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐵↑3) · 𝐴) = (𝐴 · (𝐵↑3)))
5654, 55oveq12d 5975 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · (𝐴 · (𝐵↑2))) · 𝐴) + ((𝐵↑3) · 𝐴)) = ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))))
5723, 10, 25, 56joinlmuladdmuld 8120 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) · 𝐴) = ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))))
5847, 57oveq12d 5975 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) · 𝐴) + (((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) · 𝐴)) = (((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3)))))
5919, 10, 26, 58joinlmuladdmuld 8120 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐴) = (((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3)))))
6019, 26, 15adddird 8118 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐵) = ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) · 𝐵) + (((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) · 𝐵)))
6133, 16, 15mulassd 8116 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · 𝐵)) · 𝐵) = (3 · (((𝐴↑2) · 𝐵) · 𝐵)))
6214, 15, 15mulassd 8116 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑2) · 𝐵) · 𝐵) = ((𝐴↑2) · (𝐵 · 𝐵)))
6315sqvald 10837 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑2) = (𝐵 · 𝐵))
6463oveq2d 5973 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑2) · (𝐵↑2)) = ((𝐴↑2) · (𝐵 · 𝐵)))
6562, 64eqtr4d 2242 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑2) · 𝐵) · 𝐵) = ((𝐴↑2) · (𝐵↑2)))
6665oveq2d 5973 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · (((𝐴↑2) · 𝐵) · 𝐵)) = (3 · ((𝐴↑2) · (𝐵↑2))))
6761, 66eqtrd 2239 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · 𝐵)) · 𝐵) = (3 · ((𝐴↑2) · (𝐵↑2))))
6867oveq2d 5973 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · 𝐵)) · 𝐵)) = (((𝐴↑3) · 𝐵) + (3 · ((𝐴↑2) · (𝐵↑2)))))
6912, 15, 18, 68joinlmuladdmuld 8120 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) · 𝐵) = (((𝐴↑3) · 𝐵) + (3 · ((𝐴↑2) · (𝐵↑2)))))
7033, 21, 15mulassd 8116 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑2))) · 𝐵) = (3 · ((𝐴 · (𝐵↑2)) · 𝐵)))
7110, 20, 15mulassd 8116 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 · (𝐵↑2)) · 𝐵) = (𝐴 · ((𝐵↑2) · 𝐵)))
7236oveq2i 5968 . . . . . . . . . . . . 13 (𝐵↑3) = (𝐵↑(2 + 1))
73 expp1 10713 . . . . . . . . . . . . . 14 ((𝐵 ∈ ℂ ∧ 2 ∈ ℕ0) → (𝐵↑(2 + 1)) = ((𝐵↑2) · 𝐵))
7415, 38, 73sylancl 413 . . . . . . . . . . . . 13 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑(2 + 1)) = ((𝐵↑2) · 𝐵))
7572, 74eqtr2id 2252 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐵↑2) · 𝐵) = (𝐵↑3))
7675oveq2d 5973 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 · ((𝐵↑2) · 𝐵)) = (𝐴 · (𝐵↑3)))
7771, 76eqtrd 2239 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 · (𝐵↑2)) · 𝐵) = (𝐴 · (𝐵↑3)))
7877oveq2d 5973 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · ((𝐴 · (𝐵↑2)) · 𝐵)) = (3 · (𝐴 · (𝐵↑3))))
7970, 78eqtrd 2239 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑2))) · 𝐵) = (3 · (𝐴 · (𝐵↑3))))
801oveq2i 5968 . . . . . . . . 9 (𝐵↑4) = (𝐵↑(3 + 1))
81 expp1 10713 . . . . . . . . . 10 ((𝐵 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐵↑(3 + 1)) = ((𝐵↑3) · 𝐵))
8215, 4, 81sylancl 413 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑(3 + 1)) = ((𝐵↑3) · 𝐵))
8380, 82eqtr2id 2252 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐵↑3) · 𝐵) = (𝐵↑4))
8479, 83oveq12d 5975 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · (𝐴 · (𝐵↑2))) · 𝐵) + ((𝐵↑3) · 𝐵)) = ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))
8523, 15, 25, 84joinlmuladdmuld 8120 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) · 𝐵) = ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))
8669, 85oveq12d 5975 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) · 𝐵) + (((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3)) · 𝐵)) = ((((𝐴↑3) · 𝐵) + (3 · ((𝐴↑2) · (𝐵↑2)))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))
8712, 15mulcld 8113 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑3) · 𝐵) ∈ ℂ)
8814, 20mulcld 8113 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑2) · (𝐵↑2)) ∈ ℂ)
89 mulcl 8072 . . . . . . 7 ((3 ∈ ℂ ∧ ((𝐴↑2) · (𝐵↑2)) ∈ ℂ) → (3 · ((𝐴↑2) · (𝐵↑2))) ∈ ℂ)
9013, 88, 89sylancr 414 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · ((𝐴↑2) · (𝐵↑2))) ∈ ℂ)
9110, 25mulcld 8113 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 · (𝐵↑3)) ∈ ℂ)
92 mulcl 8072 . . . . . . . 8 ((3 ∈ ℂ ∧ (𝐴 · (𝐵↑3)) ∈ ℂ) → (3 · (𝐴 · (𝐵↑3))) ∈ ℂ)
9313, 91, 92sylancr 414 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · (𝐴 · (𝐵↑3))) ∈ ℂ)
94 4nn0 9334 . . . . . . . 8 4 ∈ ℕ0
95 expcl 10724 . . . . . . . 8 ((𝐵 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝐵↑4) ∈ ℂ)
9615, 94, 95sylancl 413 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵↑4) ∈ ℂ)
9793, 96addcld 8112 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)) ∈ ℂ)
9887, 90, 97addassd 8115 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) · 𝐵) + (3 · ((𝐴↑2) · (𝐵↑2)))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))) = (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
9960, 86, 983eqtrd 2243 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐵) = (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
10059, 99oveq12d 5975 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐴) + ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · 𝐵)) = ((((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3)))) + (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))))
101 expcl 10724 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝐴↑4) ∈ ℂ)
10210, 94, 101sylancl 413 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴↑4) ∈ ℂ)
103 mulcl 8072 . . . . . . 7 ((3 ∈ ℂ ∧ ((𝐴↑3) · 𝐵) ∈ ℂ) → (3 · ((𝐴↑3) · 𝐵)) ∈ ℂ)
10413, 87, 103sylancr 414 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (3 · ((𝐴↑3) · 𝐵)) ∈ ℂ)
105102, 104addcld 8112 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) ∈ ℂ)
10690, 91addcld 8112 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))) ∈ ℂ)
10790, 97addcld 8112 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))) ∈ ℂ)
108105, 106, 87, 107add4d 8261 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3)))) + (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))) = ((((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((𝐴↑3) · 𝐵)) + (((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))))
109102, 104, 87addassd 8115 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((𝐴↑3) · 𝐵)) = ((𝐴↑4) + ((3 · ((𝐴↑3) · 𝐵)) + ((𝐴↑3) · 𝐵))))
1101oveq1i 5967 . . . . . . . . 9 (4 · ((𝐴↑3) · 𝐵)) = ((3 + 1) · ((𝐴↑3) · 𝐵))
111 ax-1cn 8038 . . . . . . . . . . 11 1 ∈ ℂ
112111a1i 9 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → 1 ∈ ℂ)
11333, 112, 87adddird 8118 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 + 1) · ((𝐴↑3) · 𝐵)) = ((3 · ((𝐴↑3) · 𝐵)) + (1 · ((𝐴↑3) · 𝐵))))
114110, 113eqtrid 2251 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (4 · ((𝐴↑3) · 𝐵)) = ((3 · ((𝐴↑3) · 𝐵)) + (1 · ((𝐴↑3) · 𝐵))))
11587mulid2d 8111 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (1 · ((𝐴↑3) · 𝐵)) = ((𝐴↑3) · 𝐵))
116115oveq2d 5973 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 · ((𝐴↑3) · 𝐵)) + (1 · ((𝐴↑3) · 𝐵))) = ((3 · ((𝐴↑3) · 𝐵)) + ((𝐴↑3) · 𝐵)))
117114, 116eqtrd 2239 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (4 · ((𝐴↑3) · 𝐵)) = ((3 · ((𝐴↑3) · 𝐵)) + ((𝐴↑3) · 𝐵)))
118117oveq2d 5973 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) = ((𝐴↑4) + ((3 · ((𝐴↑3) · 𝐵)) + ((𝐴↑3) · 𝐵))))
119109, 118eqtr4d 2242 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((𝐴↑3) · 𝐵)) = ((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))))
12090, 91, 90, 97add4d 8261 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))) = (((3 · ((𝐴↑2) · (𝐵↑2))) + (3 · ((𝐴↑2) · (𝐵↑2)))) + ((𝐴 · (𝐵↑3)) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
121 3p3e6 9199 . . . . . . . . 9 (3 + 3) = 6
122121oveq1i 5967 . . . . . . . 8 ((3 + 3) · ((𝐴↑2) · (𝐵↑2))) = (6 · ((𝐴↑2) · (𝐵↑2)))
12333, 33, 88adddird 8118 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((3 + 3) · ((𝐴↑2) · (𝐵↑2))) = ((3 · ((𝐴↑2) · (𝐵↑2))) + (3 · ((𝐴↑2) · (𝐵↑2)))))
124122, 123eqtr3id 2253 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (6 · ((𝐴↑2) · (𝐵↑2))) = ((3 · ((𝐴↑2) · (𝐵↑2))) + (3 · ((𝐴↑2) · (𝐵↑2)))))
125 3p1e4 9192 . . . . . . . . . . . . 13 (3 + 1) = 4
12613, 111, 125addcomli 8237 . . . . . . . . . . . 12 (1 + 3) = 4
127126oveq1i 5967 . . . . . . . . . . 11 ((1 + 3) · (𝐴 · (𝐵↑3))) = (4 · (𝐴 · (𝐵↑3)))
128112, 33, 91adddird 8118 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((1 + 3) · (𝐴 · (𝐵↑3))) = ((1 · (𝐴 · (𝐵↑3))) + (3 · (𝐴 · (𝐵↑3)))))
129127, 128eqtr3id 2253 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (4 · (𝐴 · (𝐵↑3))) = ((1 · (𝐴 · (𝐵↑3))) + (3 · (𝐴 · (𝐵↑3)))))
13091mulid2d 8111 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (1 · (𝐴 · (𝐵↑3))) = (𝐴 · (𝐵↑3)))
131130oveq1d 5972 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((1 · (𝐴 · (𝐵↑3))) + (3 · (𝐴 · (𝐵↑3)))) = ((𝐴 · (𝐵↑3)) + (3 · (𝐴 · (𝐵↑3)))))
132129, 131eqtrd 2239 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (4 · (𝐴 · (𝐵↑3))) = ((𝐴 · (𝐵↑3)) + (3 · (𝐴 · (𝐵↑3)))))
133132oveq1d 5972 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)) = (((𝐴 · (𝐵↑3)) + (3 · (𝐴 · (𝐵↑3)))) + (𝐵↑4)))
13491, 93, 96addassd 8115 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((𝐴 · (𝐵↑3)) + (3 · (𝐴 · (𝐵↑3)))) + (𝐵↑4)) = ((𝐴 · (𝐵↑3)) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))
135133, 134eqtrd 2239 . . . . . . 7 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)) = ((𝐴 · (𝐵↑3)) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))
136124, 135oveq12d 5975 . . . . . 6 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4))) = (((3 · ((𝐴↑2) · (𝐵↑2))) + (3 · ((𝐴↑2) · (𝐵↑2)))) + ((𝐴 · (𝐵↑3)) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
137120, 136eqtr4d 2242 . . . . 5 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))) = ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))
138119, 137oveq12d 5975 . . . 4 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((𝐴↑3) · 𝐵)) + (((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))) = (((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) + ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
139108, 138eqtrd 2239 . . 3 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑4) + (3 · ((𝐴↑3) · 𝐵))) + ((3 · ((𝐴↑2) · (𝐵↑2))) + (𝐴 · (𝐵↑3)))) + (((𝐴↑3) · 𝐵) + ((3 · ((𝐴↑2) · (𝐵↑2))) + ((3 · (𝐴 · (𝐵↑3))) + (𝐵↑4))))) = (((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) + ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
14028, 100, 1393eqtrd 2243 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((((𝐴↑3) + (3 · ((𝐴↑2) · 𝐵))) + ((3 · (𝐴 · (𝐵↑2))) + (𝐵↑3))) · (𝐴 + 𝐵)) = (((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) + ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
1417, 9, 1403eqtrd 2243 1 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + 𝐵)↑4) = (((𝐴↑4) + (4 · ((𝐴↑3) · 𝐵))) + ((6 · ((𝐴↑2) · (𝐵↑2))) + ((4 · (𝐴 · (𝐵↑3))) + (𝐵↑4)))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104   = wceq 1373  wcel 2177  (class class class)co 5957  cc 7943  1c1 7946   + caddc 7948   · cmul 7950  2c2 9107  3c3 9108  4c4 9109  6c6 9111  0cn0 9315  cexp 10705
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 2179  ax-14 2180  ax-ext 2188  ax-coll 4167  ax-sep 4170  ax-nul 4178  ax-pow 4226  ax-pr 4261  ax-un 4488  ax-setind 4593  ax-iinf 4644  ax-cnex 8036  ax-resscn 8037  ax-1cn 8038  ax-1re 8039  ax-icn 8040  ax-addcl 8041  ax-addrcl 8042  ax-mulcl 8043  ax-mulrcl 8044  ax-addcom 8045  ax-mulcom 8046  ax-addass 8047  ax-mulass 8048  ax-distr 8049  ax-i2m1 8050  ax-0lt1 8051  ax-1rid 8052  ax-0id 8053  ax-rnegex 8054  ax-precex 8055  ax-cnre 8056  ax-pre-ltirr 8057  ax-pre-ltwlin 8058  ax-pre-lttrn 8059  ax-pre-apti 8060  ax-pre-ltadd 8061  ax-pre-mulgt0 8062  ax-pre-mulext 8063
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 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-nel 2473  df-ral 2490  df-rex 2491  df-reu 2492  df-rmo 2493  df-rab 2494  df-v 2775  df-sbc 3003  df-csb 3098  df-dif 3172  df-un 3174  df-in 3176  df-ss 3183  df-nul 3465  df-if 3576  df-pw 3623  df-sn 3644  df-pr 3645  df-op 3647  df-uni 3857  df-int 3892  df-iun 3935  df-br 4052  df-opab 4114  df-mpt 4115  df-tr 4151  df-id 4348  df-po 4351  df-iso 4352  df-iord 4421  df-on 4423  df-ilim 4424  df-suc 4426  df-iom 4647  df-xp 4689  df-rel 4690  df-cnv 4691  df-co 4692  df-dm 4693  df-rn 4694  df-res 4695  df-ima 4696  df-iota 5241  df-fun 5282  df-fn 5283  df-f 5284  df-f1 5285  df-fo 5286  df-f1o 5287  df-fv 5288  df-riota 5912  df-ov 5960  df-oprab 5961  df-mpo 5962  df-1st 6239  df-2nd 6240  df-recs 6404  df-frec 6490  df-pnf 8129  df-mnf 8130  df-xr 8131  df-ltxr 8132  df-le 8133  df-sub 8265  df-neg 8266  df-reap 8668  df-ap 8675  df-div 8766  df-inn 9057  df-2 9115  df-3 9116  df-4 9117  df-5 9118  df-6 9119  df-n0 9316  df-z 9393  df-uz 9669  df-seqfrec 10615  df-exp 10706
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator