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

Theorem quart1 27189
Description: Depress a quartic equation. (Contributed by Mario Carneiro, 6-May-2015.)
Hypotheses
Ref Expression
quart1.a (𝜑 → 𝐴 ∈ ℂ)
quart1.b (𝜑 → 𝐵 ∈ ℂ)
quart1.c (𝜑 → 𝐶 ∈ ℂ)
quart1.d (𝜑 → 𝐷 ∈ ℂ)
quart1.p (𝜑 → 𝑃 = (𝐵 − ((3 / 8) · (𝐴↑2))))
quart1.q (𝜑 → 𝑄 = ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)))
quart1.r (𝜑 → 𝑅 = ((𝐷 − ((𝐶 · 𝐴) / 4)) + ((((𝐴↑2) · 𝐵) / 16) − ((3 / 256) · (𝐴↑4)))))
quart1.x (𝜑 → 𝑋 ∈ ℂ)
quart1.y (𝜑 → 𝑌 = (𝑋 + (𝐴 / 4)))
Assertion
Ref Expression
quart1 (𝜑 → (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷))) = (((𝑌↑4) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)))

Proof of Theorem quart1
StepHypRef Expression
1 quart1.y . . . . . . 7 (𝜑 → 𝑌 = (𝑋 + (𝐴 / 4)))
21oveq1d 7435 . . . . . 6 (𝜑 → (𝑌↑4) = ((𝑋 + (𝐴 / 4))↑4))
3 quart1.x . . . . . . 7 (𝜑 → 𝑋 ∈ ℂ)
4 quart1.a . . . . . . . 8 (𝜑 → 𝐴 ∈ ℂ)
5 4cn 12431 . . . . . . . . 9 4 ∈ ℂ
65a1i 11 . . . . . . . 8 (𝜑 → 4 ∈ ℂ)
7 4ne0 12457 . . . . . . . . 9 4 ≠ 0
87a1i 11 . . . . . . . 8 (𝜑 → 4 ≠ 0)
94, 6, 8divcld 12096 . . . . . . 7 (𝜑 → (𝐴 / 4) ∈ ℂ)
10 binom4 27183 . . . . . . 7 ((𝑋 ∈ ℂ ∧ (𝐴 / 4) ∈ ℂ) → ((𝑋 + (𝐴 / 4))↑4) = (((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) + ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)))))
113, 9, 10syl2anc 596 . . . . . 6 (𝜑 → ((𝑋 + (𝐴 / 4))↑4) = (((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) + ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)))))
12 3nn0 12627 . . . . . . . . . . 11 3 ∈ ℕ0
13 expcl 14225 . . . . . . . . . . 11 ((𝑋 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑋↑3) ∈ ℂ)
143, 12, 13sylancl 598 . . . . . . . . . 10 (𝜑 → (𝑋↑3) ∈ ℂ)
156, 14, 9mul12d 11522 . . . . . . . . 9 (𝜑 → (4 · ((𝑋↑3) · (𝐴 / 4))) = ((𝑋↑3) · (4 · (𝐴 / 4))))
164, 6, 8divcan2d 12098 . . . . . . . . . 10 (𝜑 → (4 · (𝐴 / 4)) = 𝐴)
1716oveq2d 7436 . . . . . . . . 9 (𝜑 → ((𝑋↑3) · (4 · (𝐴 / 4))) = ((𝑋↑3) · 𝐴))
1814, 4mulcomd 11333 . . . . . . . . 9 (𝜑 → ((𝑋↑3) · 𝐴) = (𝐴 · (𝑋↑3)))
1915, 17, 183eqtrd 2799 . . . . . . . 8 (𝜑 → (4 · ((𝑋↑3) · (𝐴 / 4))) = (𝐴 · (𝑋↑3)))
2019oveq2d 7436 . . . . . . 7 (𝜑 → ((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) = ((𝑋↑4) + (𝐴 · (𝑋↑3))))
21 6nn 12435 . . . . . . . . . . . 12 6 ∈ ℕ
2221nncni 12348 . . . . . . . . . . 11 6 ∈ ℂ
2322a1i 11 . . . . . . . . . 10 (𝜑 → 6 ∈ ℂ)
249sqcld 14290 . . . . . . . . . 10 (𝜑 → ((𝐴 / 4)↑2) ∈ ℂ)
253sqcld 14290 . . . . . . . . . 10 (𝜑 → (𝑋↑2) ∈ ℂ)
2623, 24, 25mulassd 11335 . . . . . . . . 9 (𝜑 → ((6 · ((𝐴 / 4)↑2)) · (𝑋↑2)) = (6 · (((𝐴 / 4)↑2) · (𝑋↑2))))
27 2t3e6 12512 . . . . . . . . . . . . . . 15 (2 · 3) = 6
28 8cn 12443 . . . . . . . . . . . . . . . 16 8 ∈ ℂ
29 2cn 12421 . . . . . . . . . . . . . . . 16 2 ∈ ℂ
30 8t2e16 12937 . . . . . . . . . . . . . . . 16 (8 · 2) = 16
3128, 29, 30mulcomli 11321 . . . . . . . . . . . . . . 15 (2 · 8) = 16
3227, 31oveq12i 7432 . . . . . . . . . . . . . 14 ((2 · 3) / (2 · 8)) = (6 / 16)
33 3cn 12427 . . . . . . . . . . . . . . 15 3 ∈ ℂ
34 8nn 12441 . . . . . . . . . . . . . . . . 17 8 ∈ ℕ
3534nnne0i 12381 . . . . . . . . . . . . . . . 16 8 ≠ 0
3628, 35pm3.2i 476 . . . . . . . . . . . . . . 15 (8 ∈ ℂ ∧ 8 ≠ 0)
37 2cnne0 12558 . . . . . . . . . . . . . . 15 (2 ∈ ℂ ∧ 2 ≠ 0)
38 divcan5 12022 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (8 ∈ ℂ ∧ 8 ≠ 0) ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → ((2 · 3) / (2 · 8)) = (3 / 8))
3933, 36, 37, 38mp3an 1490 . . . . . . . . . . . . . 14 ((2 · 3) / (2 · 8)) = (3 / 8)
4032, 39eqtr3i 2785 . . . . . . . . . . . . 13 (6 / 16) = (3 / 8)
4140oveq2i 7431 . . . . . . . . . . . 12 ((𝐴↑2) · (6 / 16)) = ((𝐴↑2) · (3 / 8))
424sqcld 14290 . . . . . . . . . . . . 13 (𝜑 → (𝐴↑2) ∈ ℂ)
43 1nn0 12625 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
4443, 21decnncl 12841 . . . . . . . . . . . . . . 15 16 ∈ ℕ
4544nncni 12348 . . . . . . . . . . . . . 14 16 ∈ ℂ
4645a1i 11 . . . . . . . . . . . . 13 (𝜑 → 16 ∈ ℂ)
4744nnne0i 12381 . . . . . . . . . . . . . 14 16 ≠ 0
4847a1i 11 . . . . . . . . . . . . 13 (𝜑 → 16 ≠ 0)
4942, 23, 46, 48div12d 12132 . . . . . . . . . . . 12 (𝜑 → ((𝐴↑2) · (6 / 16)) = (6 · ((𝐴↑2) / 16)))
5041, 49eqtr3id 2809 . . . . . . . . . . 11 (𝜑 → ((𝐴↑2) · (3 / 8)) = (6 · ((𝐴↑2) / 16)))
5133, 28, 35divcli 12062 . . . . . . . . . . . 12 (3 / 8) ∈ ℂ
52 mulcom 11289 . . . . . . . . . . . 12 (((3 / 8) ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((3 / 8) · (𝐴↑2)) = ((𝐴↑2) · (3 / 8)))
5351, 42, 52sylancr 599 . . . . . . . . . . 11 (𝜑 → ((3 / 8) · (𝐴↑2)) = ((𝐴↑2) · (3 / 8)))
544, 6, 8sqdivd 14305 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 / 4)↑2) = ((𝐴↑2) / (4↑2)))
555sqvali 14326 . . . . . . . . . . . . . . 15 (4↑2) = (4 · 4)
56 4t4e16 12921 . . . . . . . . . . . . . . 15 (4 · 4) = 16
5755, 56eqtri 2783 . . . . . . . . . . . . . 14 (4↑2) = 16
5857oveq2i 7431 . . . . . . . . . . . . 13 ((𝐴↑2) / (4↑2)) = ((𝐴↑2) / 16)
5954, 58eqtrdi 2811 . . . . . . . . . . . 12 (𝜑 → ((𝐴 / 4)↑2) = ((𝐴↑2) / 16))
6059oveq2d 7436 . . . . . . . . . . 11 (𝜑 → (6 · ((𝐴 / 4)↑2)) = (6 · ((𝐴↑2) / 16)))
6150, 53, 603eqtr4d 2805 . . . . . . . . . 10 (𝜑 → ((3 / 8) · (𝐴↑2)) = (6 · ((𝐴 / 4)↑2)))
6261oveq1d 7435 . . . . . . . . 9 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝑋↑2)) = ((6 · ((𝐴 / 4)↑2)) · (𝑋↑2)))
6325, 24mulcomd 11333 . . . . . . . . . 10 (𝜑 → ((𝑋↑2) · ((𝐴 / 4)↑2)) = (((𝐴 / 4)↑2) · (𝑋↑2)))
6463oveq2d 7436 . . . . . . . . 9 (𝜑 → (6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) = (6 · (((𝐴 / 4)↑2) · (𝑋↑2))))
6526, 62, 643eqtr4rd 2806 . . . . . . . 8 (𝜑 → (6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) = (((3 / 8) · (𝐴↑2)) · (𝑋↑2)))
66 expcl 14225 . . . . . . . . . . . 12 (((𝐴 / 4) ∈ ℂ ∧ 3 ∈ ℕ0) → ((𝐴 / 4)↑3) ∈ ℂ)
679, 12, 66sylancl 598 . . . . . . . . . . 11 (𝜑 → ((𝐴 / 4)↑3) ∈ ℂ)
686, 3, 67mul12d 11522 . . . . . . . . . 10 (𝜑 → (4 · (𝑋 · ((𝐴 / 4)↑3))) = (𝑋 · (4 · ((𝐴 / 4)↑3))))
696, 67mulcld 11332 . . . . . . . . . . 11 (𝜑 → (4 · ((𝐴 / 4)↑3)) ∈ ℂ)
703, 69mulcomd 11333 . . . . . . . . . 10 (𝜑 → (𝑋 · (4 · ((𝐴 / 4)↑3))) = ((4 · ((𝐴 / 4)↑3)) · 𝑋))
71 df-3 12409 . . . . . . . . . . . . . . . . 17 3 = (2 + 1)
7271oveq2i 7431 . . . . . . . . . . . . . . . 16 (4↑3) = (4↑(2 + 1))
73 2nn0 12626 . . . . . . . . . . . . . . . . 17 2 ∈ ℕ0
74 expp1 14214 . . . . . . . . . . . . . . . . 17 ((4 ∈ ℂ ∧ 2 ∈ ℕ0) → (4↑(2 + 1)) = ((4↑2) · 4))
755, 73, 74mp2an 705 . . . . . . . . . . . . . . . 16 (4↑(2 + 1)) = ((4↑2) · 4)
7657oveq1i 7430 . . . . . . . . . . . . . . . 16 ((4↑2) · 4) = (16 · 4)
7772, 75, 763eqtri 2787 . . . . . . . . . . . . . . 15 (4↑3) = (16 · 4)
7877oveq2i 7431 . . . . . . . . . . . . . 14 ((𝐴↑3) / (4↑3)) = ((𝐴↑3) / (16 · 4))
7912a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → 3 ∈ ℕ0)
804, 6, 8, 79expdivd 14306 . . . . . . . . . . . . . 14 (𝜑 → ((𝐴 / 4)↑3) = ((𝐴↑3) / (4↑3)))
81 expcl 14225 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐴↑3) ∈ ℂ)
824, 12, 81sylancl 598 . . . . . . . . . . . . . . 15 (𝜑 → (𝐴↑3) ∈ ℂ)
8382, 46, 6, 48, 8divdiv1d 12127 . . . . . . . . . . . . . 14 (𝜑 → (((𝐴↑3) / 16) / 4) = ((𝐴↑3) / (16 · 4)))
8478, 80, 833eqtr4a 2821 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 / 4)↑3) = (((𝐴↑3) / 16) / 4))
8584oveq2d 7436 . . . . . . . . . . . 12 (𝜑 → (4 · ((𝐴 / 4)↑3)) = (4 · (((𝐴↑3) / 16) / 4)))
8630oveq2i 7431 . . . . . . . . . . . . 13 ((𝐴↑3) / (8 · 2)) = ((𝐴↑3) / 16)
8728a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 8 ∈ ℂ)
8829a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ∈ ℂ)
8935a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 8 ≠ 0)
90 2ne0 12452 . . . . . . . . . . . . . . 15 2 ≠ 0
9190a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ≠ 0)
9282, 87, 88, 89, 91divdiv1d 12127 . . . . . . . . . . . . 13 (𝜑 → (((𝐴↑3) / 8) / 2) = ((𝐴↑3) / (8 · 2)))
9382, 46, 48divcld 12096 . . . . . . . . . . . . . 14 (𝜑 → ((𝐴↑3) / 16) ∈ ℂ)
9493, 6, 8divcan2d 12098 . . . . . . . . . . . . 13 (𝜑 → (4 · (((𝐴↑3) / 16) / 4)) = ((𝐴↑3) / 16))
9586, 92, 943eqtr4a 2821 . . . . . . . . . . . 12 (𝜑 → (((𝐴↑3) / 8) / 2) = (4 · (((𝐴↑3) / 16) / 4)))
9685, 95eqtr4d 2798 . . . . . . . . . . 11 (𝜑 → (4 · ((𝐴 / 4)↑3)) = (((𝐴↑3) / 8) / 2))
9796oveq1d 7435 . . . . . . . . . 10 (𝜑 → ((4 · ((𝐴 / 4)↑3)) · 𝑋) = ((((𝐴↑3) / 8) / 2) · 𝑋))
9868, 70, 973eqtrd 2799 . . . . . . . . 9 (𝜑 → (4 · (𝑋 · ((𝐴 / 4)↑3))) = ((((𝐴↑3) / 8) / 2) · 𝑋))
99 4nn0 12628 . . . . . . . . . . . 12 4 ∈ ℕ0
10099a1i 11 . . . . . . . . . . 11 (𝜑 → 4 ∈ ℕ0)
1014, 6, 8, 100expdivd 14306 . . . . . . . . . 10 (𝜑 → ((𝐴 / 4)↑4) = ((𝐴↑4) / (4↑4)))
102 expmul 14253 . . . . . . . . . . . . . . 15 ((2 ∈ ℂ ∧ 2 ∈ ℕ0 ∧ 4 ∈ ℕ0) → (2↑(2 · 4)) = ((2↑2)↑4))
10329, 73, 99, 102mp3an 1490 . . . . . . . . . . . . . 14 (2↑(2 · 4)) = ((2↑2)↑4)
104 2t4e8 12515 . . . . . . . . . . . . . . 15 (2 · 4) = 8
105104oveq2i 7431 . . . . . . . . . . . . . 14 (2↑(2 · 4)) = (2↑8)
106103, 105eqtr3i 2785 . . . . . . . . . . . . 13 ((2↑2)↑4) = (2↑8)
107 sq2 14343 . . . . . . . . . . . . . 14 (2↑2) = 4
108107oveq1i 7430 . . . . . . . . . . . . 13 ((2↑2)↑4) = (4↑4)
109106, 108eqtr3i 2785 . . . . . . . . . . . 12 (2↑8) = (4↑4)
110 2exp8 17271 . . . . . . . . . . . 12 (2↑8) = 256
111109, 110eqtr3i 2785 . . . . . . . . . . 11 (4↑4) = 256
112111oveq2i 7431 . . . . . . . . . 10 ((𝐴↑4) / (4↑4)) = ((𝐴↑4) / 256)
113101, 112eqtrdi 2811 . . . . . . . . 9 (𝜑 → ((𝐴 / 4)↑4) = ((𝐴↑4) / 256))
11498, 113oveq12d 7438 . . . . . . . 8 (𝜑 → ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))
11565, 114oveq12d 7438 . . . . . . 7 (𝜑 → ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4))) = ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))))
11620, 115oveq12d 7438 . . . . . 6 (𝜑 → (((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) + ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))))
1172, 11, 1163eqtrd 2799 . . . . 5 (𝜑 → (𝑌↑4) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))))
118117oveq1d 7435 . . . 4 (𝜑 → ((𝑌↑4) + (𝑃 · (𝑌↑2))) = ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))) + (𝑃 · (𝑌↑2))))
119 expcl 14225 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝑋↑4) ∈ ℂ)
1203, 99, 119sylancl 598 . . . . . 6 (𝜑 → (𝑋↑4) ∈ ℂ)
1214, 14mulcld 11332 . . . . . 6 (𝜑 → (𝐴 · (𝑋↑3)) ∈ ℂ)
122120, 121addcld 11331 . . . . 5 (𝜑 → ((𝑋↑4) + (𝐴 · (𝑋↑3))) ∈ ℂ)
123 mulcl 11287 . . . . . . . 8 (((3 / 8) ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((3 / 8) · (𝐴↑2)) ∈ ℂ)
12451, 42, 123sylancr 599 . . . . . . 7 (𝜑 → ((3 / 8) · (𝐴↑2)) ∈ ℂ)
125124, 25mulcld 11332 . . . . . 6 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝑋↑2)) ∈ ℂ)
12682, 87, 89divcld 12096 . . . . . . . . 9 (𝜑 → ((𝐴↑3) / 8) ∈ ℂ)
127126halfcld 12594 . . . . . . . 8 (𝜑 → (((𝐴↑3) / 8) / 2) ∈ ℂ)
128127, 3mulcld 11332 . . . . . . 7 (𝜑 → ((((𝐴↑3) / 8) / 2) · 𝑋) ∈ ℂ)
129 expcl 14225 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝐴↑4) ∈ ℂ)
1304, 99, 129sylancl 598 . . . . . . . 8 (𝜑 → (𝐴↑4) ∈ ℂ)
131 5nn0 12629 . . . . . . . . . . . 12 5 ∈ ℕ0
13273, 131deccl 12832 . . . . . . . . . . 11 25 ∈ ℕ0
133132, 21decnncl 12841 . . . . . . . . . 10 256 ∈ ℕ
134133nncni 12348 . . . . . . . . 9 256 ∈ ℂ
135134a1i 11 . . . . . . . 8 (𝜑 → 256 ∈ ℂ)
136133nnne0i 12381 . . . . . . . . 9 256 ≠ 0
137136a1i 11 . . . . . . . 8 (𝜑 → 256 ≠ 0)
138130, 135, 137divcld 12096 . . . . . . 7 (𝜑 → ((𝐴↑4) / 256) ∈ ℂ)
139128, 138addcld 11331 . . . . . 6 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) ∈ ℂ)
140125, 139addcld 11331 . . . . 5 (𝜑 → ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) ∈ ℂ)
141 quart1.b . . . . . . . 8 (𝜑 → 𝐵 ∈ ℂ)
142 quart1.c . . . . . . . 8 (𝜑 → 𝐶 ∈ ℂ)
143 quart1.d . . . . . . . 8 (𝜑 → 𝐷 ∈ ℂ)
144 quart1.p . . . . . . . 8 (𝜑 → 𝑃 = (𝐵 − ((3 / 8) · (𝐴↑2))))
145 quart1.q . . . . . . . 8 (𝜑 → 𝑄 = ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)))
146 quart1.r . . . . . . . 8 (𝜑 → 𝑅 = ((𝐷 − ((𝐶 · 𝐴) / 4)) + ((((𝐴↑2) · 𝐵) / 16) − ((3 / 256) · (𝐴↑4)))))
1474, 141, 142, 143, 144, 145, 146quart1cl 27187 . . . . . . 7 (𝜑 → (𝑃 ∈ ℂ ∧ 𝑄 ∈ ℂ ∧ 𝑅 ∈ ℂ))
148147simp1d 1160 . . . . . 6 (𝜑 → 𝑃 ∈ ℂ)
1493, 9addcld 11331 . . . . . . . 8 (𝜑 → (𝑋 + (𝐴 / 4)) ∈ ℂ)
1501, 149eqeltrd 2860 . . . . . . 7 (𝜑 → 𝑌 ∈ ℂ)
151150sqcld 14290 . . . . . 6 (𝜑 → (𝑌↑2) ∈ ℂ)
152148, 151mulcld 11332 . . . . 5 (𝜑 → (𝑃 · (𝑌↑2)) ∈ ℂ)
153122, 140, 152addassd 11334 . . . 4 (𝜑 → ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))) + (𝑃 · (𝑌↑2))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))))
154118, 153eqtrd 2795 . . 3 (𝜑 → ((𝑌↑4) + (𝑃 · (𝑌↑2))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))))
155154oveq1d 7435 . 2 (𝜑 → (((𝑌↑4) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))) + ((𝑄 · 𝑌) + 𝑅)))
156140, 152addcld 11331 . . 3 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) ∈ ℂ)
157147simp2d 1161 . . . . 5 (𝜑 → 𝑄 ∈ ℂ)
158157, 150mulcld 11332 . . . 4 (𝜑 → (𝑄 · 𝑌) ∈ ℂ)
159147simp3d 1162 . . . 4 (𝜑 → 𝑅 ∈ ℂ)
160158, 159addcld 11331 . . 3 (𝜑 → ((𝑄 · 𝑌) + 𝑅) ∈ ℂ)
161122, 156, 160addassd 11334 . 2 (𝜑 → ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))) + ((𝑄 · 𝑌) + 𝑅)) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅))))
1621oveq1d 7435 . . . . . . . . . 10 (𝜑 → (𝑌↑2) = ((𝑋 + (𝐴 / 4))↑2))
163 binom2 14364 . . . . . . . . . . 11 ((𝑋 ∈ ℂ ∧ (𝐴 / 4) ∈ ℂ) → ((𝑋 + (𝐴 / 4))↑2) = (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)))
1643, 9, 163syl2anc 596 . . . . . . . . . 10 (𝜑 → ((𝑋 + (𝐴 / 4))↑2) = (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)))
1653, 9mulcld 11332 . . . . . . . . . . . 12 (𝜑 → (𝑋 · (𝐴 / 4)) ∈ ℂ)
166 mulcl 11287 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ (𝑋 · (𝐴 / 4)) ∈ ℂ) → (2 · (𝑋 · (𝐴 / 4))) ∈ ℂ)
16729, 165, 166sylancr 599 . . . . . . . . . . 11 (𝜑 → (2 · (𝑋 · (𝐴 / 4))) ∈ ℂ)
16825, 167, 24addassd 11334 . . . . . . . . . 10 (𝜑 → (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)) = ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))
169162, 164, 1683eqtrd 2799 . . . . . . . . 9 (𝜑 → (𝑌↑2) = ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))
170169oveq2d 7436 . . . . . . . 8 (𝜑 → (𝑃 · (𝑌↑2)) = (𝑃 · ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
171167, 24addcld 11331 . . . . . . . . 9 (𝜑 → ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)) ∈ ℂ)
172148, 25, 171adddid 11336 . . . . . . . 8 (𝜑 → (𝑃 · ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
173170, 172eqtrd 2795 . . . . . . 7 (𝜑 → (𝑃 · (𝑌↑2)) = ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
174173oveq2d 7436 . . . . . 6 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) = (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))))
175148, 25mulcld 11332 . . . . . . 7 (𝜑 → (𝑃 · (𝑋↑2)) ∈ ℂ)
176148, 171mulcld 11332 . . . . . . 7 (𝜑 → (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))) ∈ ℂ)
177125, 139, 175, 176add4d 11542 . . . . . 6 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) = (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))))
178124, 148, 25adddird 11337 . . . . . . . 8 (𝜑 → ((((3 / 8) · (𝐴↑2)) + 𝑃) · (𝑋↑2)) = ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))))
179144oveq2d 7436 . . . . . . . . . 10 (𝜑 → (((3 / 8) · (𝐴↑2)) + 𝑃) = (((3 / 8) · (𝐴↑2)) + (𝐵 − ((3 / 8) · (𝐴↑2)))))
180124, 141pncan3d 11675 . . . . . . . . . 10 (𝜑 → (((3 / 8) · (𝐴↑2)) + (𝐵 − ((3 / 8) · (𝐴↑2)))) = 𝐵)
181179, 180eqtrd 2795 . . . . . . . . 9 (𝜑 → (((3 / 8) · (𝐴↑2)) + 𝑃) = 𝐵)
182181oveq1d 7435 . . . . . . . 8 (𝜑 → ((((3 / 8) · (𝐴↑2)) + 𝑃) · (𝑋↑2)) = (𝐵 · (𝑋↑2)))
183178, 182eqtr3d 2797 . . . . . . 7 (𝜑 → ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))) = (𝐵 · (𝑋↑2)))
184183oveq1d 7435 . . . . . 6 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) = ((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))))
185174, 177, 1843eqtrd 2799 . . . . 5 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) = ((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))))
186185oveq1d 7435 . . . 4 (𝜑 → ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = (((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) + ((𝑄 · 𝑌) + 𝑅)))
187141, 25mulcld 11332 . . . . 5 (𝜑 → (𝐵 · (𝑋↑2)) ∈ ℂ)
188139, 176addcld 11331 . . . . 5 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) ∈ ℂ)
189187, 188, 160addassd 11334 . . . 4 (𝜑 → (((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐵 · (𝑋↑2)) + (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅))))
1904, 141mulcld 11332 . . . . . . . . . 10 (𝜑 → (𝐴 · 𝐵) ∈ ℂ)
191190halfcld 12594 . . . . . . . . 9 (𝜑 → ((𝐴 · 𝐵) / 2) ∈ ℂ)
192191, 126subcld 11672 . . . . . . . 8 (𝜑 → (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) ∈ ℂ)
193192, 3mulcld 11332 . . . . . . 7 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) ∈ ℂ)
194148, 24mulcld 11332 . . . . . . . 8 (𝜑 → (𝑃 · ((𝐴 / 4)↑2)) ∈ ℂ)
195138, 194addcld 11331 . . . . . . 7 (𝜑 → (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) ∈ ℂ)
196157, 3mulcld 11332 . . . . . . 7 (𝜑 → (𝑄 · 𝑋) ∈ ℂ)
197157, 9mulcld 11332 . . . . . . . 8 (𝜑 → (𝑄 · (𝐴 / 4)) ∈ ℂ)
198197, 159addcld 11331 . . . . . . 7 (𝜑 → ((𝑄 · (𝐴 / 4)) + 𝑅) ∈ ℂ)
199193, 195, 196, 198add4d 11542 . . . . . 6 (𝜑 → ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅))) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)) + ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
200148, 167, 24adddid 11336 . . . . . . . . 9 (𝜑 → (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))) = ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2))))
201200oveq2d 7436 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2)))))
202148, 167mulcld 11332 . . . . . . . . 9 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) ∈ ℂ)
203128, 138, 202, 194add4d 11542 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2)))) = ((((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
2044, 88, 88, 91, 91divdiv1d 12127 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝐴 / 2) / 2) = (𝐴 / (2 · 2)))
205 2t2e4 12509 . . . . . . . . . . . . . . . . . . 19 (2 · 2) = 4
206205oveq2i 7431 . . . . . . . . . . . . . . . . . 18 (𝐴 / (2 · 2)) = (𝐴 / 4)
207204, 206eqtrdi 2811 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝐴 / 2) / 2) = (𝐴 / 4))
208207oveq2d 7436 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · ((𝐴 / 2) / 2)) = (2 · (𝐴 / 4)))
2094halfcld 12594 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐴 / 2) ∈ ℂ)
210209, 88, 91divcan2d 12098 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · ((𝐴 / 2) / 2)) = (𝐴 / 2))
211208, 210eqtr3d 2797 . . . . . . . . . . . . . . 15 (𝜑 → (2 · (𝐴 / 4)) = (𝐴 / 2))
212211oveq2d 7436 . . . . . . . . . . . . . 14 (𝜑 → (𝑋 · (2 · (𝐴 / 4))) = (𝑋 · (𝐴 / 2)))
2133, 209mulcomd 11333 . . . . . . . . . . . . . 14 (𝜑 → (𝑋 · (𝐴 / 2)) = ((𝐴 / 2) · 𝑋))
214212, 213eqtrd 2795 . . . . . . . . . . . . 13 (𝜑 → (𝑋 · (2 · (𝐴 / 4))) = ((𝐴 / 2) · 𝑋))
215214oveq2d 7436 . . . . . . . . . . . 12 (𝜑 → (𝑃 · (𝑋 · (2 · (𝐴 / 4)))) = (𝑃 · ((𝐴 / 2) · 𝑋)))
21688, 3, 9mul12d 11522 . . . . . . . . . . . . 13 (𝜑 → (2 · (𝑋 · (𝐴 / 4))) = (𝑋 · (2 · (𝐴 / 4))))
217216oveq2d 7436 . . . . . . . . . . . 12 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) = (𝑃 · (𝑋 · (2 · (𝐴 / 4)))))
218148, 209, 3mulassd 11335 . . . . . . . . . . . 12 (𝜑 → ((𝑃 · (𝐴 / 2)) · 𝑋) = (𝑃 · ((𝐴 / 2) · 𝑋)))
219215, 217, 2183eqtr4d 2805 . . . . . . . . . . 11 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) = ((𝑃 · (𝐴 / 2)) · 𝑋))
220219oveq2d 7436 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝑃 · (𝐴 / 2)) · 𝑋)))
221148, 209mulcld 11332 . . . . . . . . . . 11 (𝜑 → (𝑃 · (𝐴 / 2)) ∈ ℂ)
222127, 221, 3adddird 11337 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) · 𝑋) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝑃 · (𝐴 / 2)) · 𝑋)))
223144oveq1d 7435 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 · (𝐴 / 2)) = ((𝐵 − ((3 / 8) · (𝐴↑2))) · (𝐴 / 2)))
224141, 124, 209subdird 11776 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 − ((3 / 8) · (𝐴↑2))) · (𝐴 / 2)) = ((𝐵 · (𝐴 / 2)) − (((3 / 8) · (𝐴↑2)) · (𝐴 / 2))))
225141, 4, 88, 91divassd 12131 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵 · 𝐴) / 2) = (𝐵 · (𝐴 / 2)))
226141, 4mulcomd 11333 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵 · 𝐴) = (𝐴 · 𝐵))
227226oveq1d 7435 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵 · 𝐴) / 2) = ((𝐴 · 𝐵) / 2))
228225, 227eqtr3d 2797 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 · (𝐴 / 2)) = ((𝐴 · 𝐵) / 2))
22971oveq2i 7431 . . . . . . . . . . . . . . . . . . . . 21 (𝐴↑3) = (𝐴↑(2 + 1))
230 expp1 14214 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℂ ∧ 2 ∈ ℕ0) → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
2314, 73, 230sylancl 598 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
232229, 231eqtrid 2807 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴↑3) = ((𝐴↑2) · 𝐴))
233232oveq2d 7436 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((3 / 8) · (𝐴↑3)) = ((3 / 8) · ((𝐴↑2) · 𝐴)))
23433a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 3 ∈ ℂ)
235234, 82, 87, 89div23d 12133 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((3 · (𝐴↑3)) / 8) = ((3 / 8) · (𝐴↑3)))
23651a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (3 / 8) ∈ ℂ)
237236, 42, 4mulassd 11335 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = ((3 / 8) · ((𝐴↑2) · 𝐴)))
238233, 235, 2373eqtr4rd 2806 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = ((3 · (𝐴↑3)) / 8))
239234, 82, 87, 89divassd 12131 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((3 · (𝐴↑3)) / 8) = (3 · ((𝐴↑3) / 8)))
240238, 239eqtrd 2795 . . . . . . . . . . . . . . . . 17 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = (3 · ((𝐴↑3) / 8)))
241240oveq1d 7435 . . . . . . . . . . . . . . . 16 (𝜑 → ((((3 / 8) · (𝐴↑2)) · 𝐴) / 2) = ((3 · ((𝐴↑3) / 8)) / 2))
242124, 4, 88, 91divassd 12131 . . . . . . . . . . . . . . . 16 (𝜑 → ((((3 / 8) · (𝐴↑2)) · 𝐴) / 2) = (((3 / 8) · (𝐴↑2)) · (𝐴 / 2)))
243234, 126, 88, 91divassd 12131 . . . . . . . . . . . . . . . 16 (𝜑 → ((3 · ((𝐴↑3) / 8)) / 2) = (3 · (((𝐴↑3) / 8) / 2)))
244241, 242, 2433eqtr3d 2803 . . . . . . . . . . . . . . 15 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝐴 / 2)) = (3 · (((𝐴↑3) / 8) / 2)))
245228, 244oveq12d 7438 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 · (𝐴 / 2)) − (((3 / 8) · (𝐴↑2)) · (𝐴 / 2))) = (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2))))
246223, 224, 2453eqtrd 2799 . . . . . . . . . . . . 13 (𝜑 → (𝑃 · (𝐴 / 2)) = (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2))))
247246oveq2d 7436 . . . . . . . . . . . 12 (𝜑 → ((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) = ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
248 mulcl 11287 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (((𝐴↑3) / 8) / 2) ∈ ℂ) → (3 · (((𝐴↑3) / 8) / 2)) ∈ ℂ)
24933, 127, 248sylancr 599 . . . . . . . . . . . . . 14 (𝜑 → (3 · (((𝐴↑3) / 8) / 2)) ∈ ℂ)
250127, 191, 249addsub12d 11695 . . . . . . . . . . . . 13 (𝜑 → ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))) = (((𝐴 · 𝐵) / 2) + ((((𝐴↑3) / 8) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
251191, 249, 127subsub2d 11701 . . . . . . . . . . . . 13 (𝜑 → (((𝐴 · 𝐵) / 2) − ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2))) = (((𝐴 · 𝐵) / 2) + ((((𝐴↑3) / 8) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
252127mullidd 11330 . . . . . . . . . . . . . . . 16 (𝜑 → (1 · (((𝐴↑3) / 8) / 2)) = (((𝐴↑3) / 8) / 2))
253252oveq2d 7436 . . . . . . . . . . . . . . 15 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))) = ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2)))
254 3m1e2 12473 . . . . . . . . . . . . . . . . 17 (3 − 1) = 2
255254oveq1i 7430 . . . . . . . . . . . . . . . 16 ((3 − 1) · (((𝐴↑3) / 8) / 2)) = (2 · (((𝐴↑3) / 8) / 2))
256 1cnd 11305 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℂ)
257234, 256, 127subdird 11776 . . . . . . . . . . . . . . . 16 (𝜑 → ((3 − 1) · (((𝐴↑3) / 8) / 2)) = ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))))
258126, 88, 91divcan2d 12098 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · (((𝐴↑3) / 8) / 2)) = ((𝐴↑3) / 8))
259255, 257, 2583eqtr3a 2819 . . . . . . . . . . . . . . 15 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))) = ((𝐴↑3) / 8))
260253, 259eqtr3d 2797 . . . . . . . . . . . . . 14 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2)) = ((𝐴↑3) / 8))
261260oveq2d 7436 . . . . . . . . . . . . 13 (𝜑 → (((𝐴 · 𝐵) / 2) − ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
262250, 251, 2613eqtr2d 2801 . . . . . . . . . . . 12 (𝜑 → ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
263247, 262eqtrd 2795 . . . . . . . . . . 11 (𝜑 → ((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
264263oveq1d 7435 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) · 𝑋) = ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋))
265220, 222, 2643eqtr2d 2801 . . . . . . . . 9 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) = ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋))
266265oveq1d 7435 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
267201, 203, 2663eqtrd 2799 . . . . . . 7 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
2681oveq2d 7436 . . . . . . . . . 10 (𝜑 → (𝑄 · 𝑌) = (𝑄 · (𝑋 + (𝐴 / 4))))
269157, 3, 9adddid 11336 . . . . . . . . . 10 (𝜑 → (𝑄 · (𝑋 + (𝐴 / 4))) = ((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))))
270268, 269eqtrd 2795 . . . . . . . . 9 (𝜑 → (𝑄 · 𝑌) = ((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))))
271270oveq1d 7435 . . . . . . . 8 (𝜑 → ((𝑄 · 𝑌) + 𝑅) = (((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))) + 𝑅))
272196, 197, 159addassd 11334 . . . . . . . 8 (𝜑 → (((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))) + 𝑅) = ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
273271, 272eqtrd 2795 . . . . . . 7 (𝜑 → ((𝑄 · 𝑌) + 𝑅) = ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
274267, 273oveq12d 7438 . . . . . 6 (𝜑 → (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅)) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
275192, 157addcomd 11515 . . . . . . . . . 10 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) = (𝑄 + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))))
276145oveq1d 7435 . . . . . . . . . 10 (𝜑 → (𝑄 + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))))
277142, 191subcld 11672 . . . . . . . . . . . 12 (𝜑 → (𝐶 − ((𝐴 · 𝐵) / 2)) ∈ ℂ)
278277, 126, 191ppncand 11712 . . . . . . . . . . 11 (𝜑 → (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴 · 𝐵) / 2)))
279142, 191npcand 11676 . . . . . . . . . . 11 (𝜑 → ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴 · 𝐵) / 2)) = 𝐶)
280278, 279eqtrd 2795 . . . . . . . . . 10 (𝜑 → (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = 𝐶)
281275, 276, 2803eqtrd 2799 . . . . . . . . 9 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) = 𝐶)
282281oveq1d 7435 . . . . . . . 8 (𝜑 → (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) · 𝑋) = (𝐶 · 𝑋))
283192, 157, 3adddird 11337 . . . . . . . 8 (𝜑 → (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) · 𝑋) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)))
284282, 283eqtr3d 2797 . . . . . . 7 (𝜑 → (𝐶 · 𝑋) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)))
2854, 141, 142, 143, 144, 145, 146, 3, 1quart1lem 27188 . . . . . . 7 (𝜑 → 𝐷 = ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
286284, 285oveq12d 7438 . . . . . 6 (𝜑 → ((𝐶 · 𝑋) + 𝐷) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)) + ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
287199, 274, 2863eqtr4d 2805 . . . . 5 (𝜑 → (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐶 · 𝑋) + 𝐷))
288287oveq2d 7436 . . . 4 (𝜑 → ((𝐵 · (𝑋↑2)) + (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅))) = ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷)))
289186, 189, 2883eqtrd 2799 . . 3 (𝜑 → ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷)))
290289oveq2d 7436 . 2 (𝜑 → (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷))))
291155, 161, 2903eqtrrd 2800 1 (𝜑 → (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷))) = (((𝑌↑4) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  (class class class)co 7420  ℂcc 11201  0cc0 11203  1c1 11204   + caddc 11206   · cmul 11208   − cmin 11544   / cdiv 11976  2c2 12400  3c3 12401  4c4 12402  5c5 12403  6c6 12404  8c8 12406  ℕ0cn0 12609  cdc 12817  ↑cexp 14207
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-cnex 11259  ax-resscn 11260  ax-1cn 11261  ax-icn 11262  ax-addcl 11263  ax-addrcl 11264  ax-mulcl 11265  ax-mulrcl 11266  ax-mulcom 11267  ax-addass 11268  ax-mulass 11269  ax-distr 11270  ax-i2m1 11271  ax-1ne0 11272  ax-1rid 11273  ax-rnegex 11274  ax-rrecex 11275  ax-cnre 11276  ax-pre-lttri 11277  ax-pre-lttrn 11278  ax-pre-ltadd 11279  ax-pre-mulgt0 11280
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-2nd 8002  df-frecs 8302  df-wrecs 8333  df-recs 8382  df-rdg 8421  df-er 8720  df-en 8977  df-dom 8978  df-sdom 8979  df-pnf 11348  df-mnf 11349  df-xr 11350  df-ltxr 11351  df-le 11352  df-sub 11546  df-neg 11547  df-div 11977  df-nn 12339  df-2 12408  df-3 12409  df-4 12410  df-5 12411  df-6 12412  df-7 12413  df-8 12414  df-9 12415  df-n0 12610  df-z 12697  df-dec 12818  df-uz 12969  df-seq 14148  df-exp 14208
This theorem is used by:  quart  27194
  Copyright terms: Public domain W3C validator