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

Theorem quart1 25546
 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 7170 . . . . . 6 (𝜑 → (𝑌↑4) = ((𝑋 + (𝐴 / 4))↑4))
3 quart1.x . . . . . . 7 (𝜑𝑋 ∈ ℂ)
4 quart1.a . . . . . . . 8 (𝜑𝐴 ∈ ℂ)
5 4cn 11764 . . . . . . . . 9 4 ∈ ℂ
65a1i 11 . . . . . . . 8 (𝜑 → 4 ∈ ℂ)
7 4ne0 11787 . . . . . . . . 9 4 ≠ 0
87a1i 11 . . . . . . . 8 (𝜑 → 4 ≠ 0)
94, 6, 8divcld 11459 . . . . . . 7 (𝜑 → (𝐴 / 4) ∈ ℂ)
10 binom4 25540 . . . . . . 7 ((𝑋 ∈ ℂ ∧ (𝐴 / 4) ∈ ℂ) → ((𝑋 + (𝐴 / 4))↑4) = (((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) + ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)))))
113, 9, 10syl2anc 587 . . . . . 6 (𝜑 → ((𝑋 + (𝐴 / 4))↑4) = (((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) + ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)))))
12 3nn0 11957 . . . . . . . . . . 11 3 ∈ ℕ0
13 expcl 13502 . . . . . . . . . . 11 ((𝑋 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑋↑3) ∈ ℂ)
143, 12, 13sylancl 589 . . . . . . . . . 10 (𝜑 → (𝑋↑3) ∈ ℂ)
156, 14, 9mul12d 10892 . . . . . . . . 9 (𝜑 → (4 · ((𝑋↑3) · (𝐴 / 4))) = ((𝑋↑3) · (4 · (𝐴 / 4))))
164, 6, 8divcan2d 11461 . . . . . . . . . 10 (𝜑 → (4 · (𝐴 / 4)) = 𝐴)
1716oveq2d 7171 . . . . . . . . 9 (𝜑 → ((𝑋↑3) · (4 · (𝐴 / 4))) = ((𝑋↑3) · 𝐴))
1814, 4mulcomd 10705 . . . . . . . . 9 (𝜑 → ((𝑋↑3) · 𝐴) = (𝐴 · (𝑋↑3)))
1915, 17, 183eqtrd 2797 . . . . . . . 8 (𝜑 → (4 · ((𝑋↑3) · (𝐴 / 4))) = (𝐴 · (𝑋↑3)))
2019oveq2d 7171 . . . . . . 7 (𝜑 → ((𝑋↑4) + (4 · ((𝑋↑3) · (𝐴 / 4)))) = ((𝑋↑4) + (𝐴 · (𝑋↑3))))
21 6nn 11768 . . . . . . . . . . . 12 6 ∈ ℕ
2221nncni 11689 . . . . . . . . . . 11 6 ∈ ℂ
2322a1i 11 . . . . . . . . . 10 (𝜑 → 6 ∈ ℂ)
249sqcld 13563 . . . . . . . . . 10 (𝜑 → ((𝐴 / 4)↑2) ∈ ℂ)
253sqcld 13563 . . . . . . . . . 10 (𝜑 → (𝑋↑2) ∈ ℂ)
2623, 24, 25mulassd 10707 . . . . . . . . 9 (𝜑 → ((6 · ((𝐴 / 4)↑2)) · (𝑋↑2)) = (6 · (((𝐴 / 4)↑2) · (𝑋↑2))))
27 3cn 11760 . . . . . . . . . . . . . . . 16 3 ∈ ℂ
28 2cn 11754 . . . . . . . . . . . . . . . 16 2 ∈ ℂ
29 3t2e6 11845 . . . . . . . . . . . . . . . 16 (3 · 2) = 6
3027, 28, 29mulcomli 10693 . . . . . . . . . . . . . . 15 (2 · 3) = 6
31 8cn 11776 . . . . . . . . . . . . . . . 16 8 ∈ ℂ
32 8t2e16 12257 . . . . . . . . . . . . . . . 16 (8 · 2) = 16
3331, 28, 32mulcomli 10693 . . . . . . . . . . . . . . 15 (2 · 8) = 16
3430, 33oveq12i 7167 . . . . . . . . . . . . . 14 ((2 · 3) / (2 · 8)) = (6 / 16)
35 8nn 11774 . . . . . . . . . . . . . . . . 17 8 ∈ ℕ
3635nnne0i 11719 . . . . . . . . . . . . . . . 16 8 ≠ 0
3731, 36pm3.2i 474 . . . . . . . . . . . . . . 15 (8 ∈ ℂ ∧ 8 ≠ 0)
38 2cnne0 11889 . . . . . . . . . . . . . . 15 (2 ∈ ℂ ∧ 2 ≠ 0)
39 divcan5 11385 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (8 ∈ ℂ ∧ 8 ≠ 0) ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → ((2 · 3) / (2 · 8)) = (3 / 8))
4027, 37, 38, 39mp3an 1458 . . . . . . . . . . . . . 14 ((2 · 3) / (2 · 8)) = (3 / 8)
4134, 40eqtr3i 2783 . . . . . . . . . . . . 13 (6 / 16) = (3 / 8)
4241oveq2i 7166 . . . . . . . . . . . 12 ((𝐴↑2) · (6 / 16)) = ((𝐴↑2) · (3 / 8))
434sqcld 13563 . . . . . . . . . . . . 13 (𝜑 → (𝐴↑2) ∈ ℂ)
44 1nn0 11955 . . . . . . . . . . . . . . . 16 1 ∈ ℕ0
4544, 21decnncl 12162 . . . . . . . . . . . . . . 15 16 ∈ ℕ
4645nncni 11689 . . . . . . . . . . . . . 14 16 ∈ ℂ
4746a1i 11 . . . . . . . . . . . . 13 (𝜑16 ∈ ℂ)
4845nnne0i 11719 . . . . . . . . . . . . . 14 16 ≠ 0
4948a1i 11 . . . . . . . . . . . . 13 (𝜑16 ≠ 0)
5043, 23, 47, 49div12d 11495 . . . . . . . . . . . 12 (𝜑 → ((𝐴↑2) · (6 / 16)) = (6 · ((𝐴↑2) / 16)))
5142, 50syl5eqr 2807 . . . . . . . . . . 11 (𝜑 → ((𝐴↑2) · (3 / 8)) = (6 · ((𝐴↑2) / 16)))
5227, 31, 36divcli 11425 . . . . . . . . . . . 12 (3 / 8) ∈ ℂ
53 mulcom 10666 . . . . . . . . . . . 12 (((3 / 8) ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((3 / 8) · (𝐴↑2)) = ((𝐴↑2) · (3 / 8)))
5452, 43, 53sylancr 590 . . . . . . . . . . 11 (𝜑 → ((3 / 8) · (𝐴↑2)) = ((𝐴↑2) · (3 / 8)))
554, 6, 8sqdivd 13578 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 / 4)↑2) = ((𝐴↑2) / (4↑2)))
565sqvali 13598 . . . . . . . . . . . . . . 15 (4↑2) = (4 · 4)
57 4t4e16 12241 . . . . . . . . . . . . . . 15 (4 · 4) = 16
5856, 57eqtri 2781 . . . . . . . . . . . . . 14 (4↑2) = 16
5958oveq2i 7166 . . . . . . . . . . . . 13 ((𝐴↑2) / (4↑2)) = ((𝐴↑2) / 16)
6055, 59eqtrdi 2809 . . . . . . . . . . . 12 (𝜑 → ((𝐴 / 4)↑2) = ((𝐴↑2) / 16))
6160oveq2d 7171 . . . . . . . . . . 11 (𝜑 → (6 · ((𝐴 / 4)↑2)) = (6 · ((𝐴↑2) / 16)))
6251, 54, 613eqtr4d 2803 . . . . . . . . . 10 (𝜑 → ((3 / 8) · (𝐴↑2)) = (6 · ((𝐴 / 4)↑2)))
6362oveq1d 7170 . . . . . . . . 9 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝑋↑2)) = ((6 · ((𝐴 / 4)↑2)) · (𝑋↑2)))
6425, 24mulcomd 10705 . . . . . . . . . 10 (𝜑 → ((𝑋↑2) · ((𝐴 / 4)↑2)) = (((𝐴 / 4)↑2) · (𝑋↑2)))
6564oveq2d 7171 . . . . . . . . 9 (𝜑 → (6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) = (6 · (((𝐴 / 4)↑2) · (𝑋↑2))))
6626, 63, 653eqtr4rd 2804 . . . . . . . 8 (𝜑 → (6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) = (((3 / 8) · (𝐴↑2)) · (𝑋↑2)))
67 expcl 13502 . . . . . . . . . . . 12 (((𝐴 / 4) ∈ ℂ ∧ 3 ∈ ℕ0) → ((𝐴 / 4)↑3) ∈ ℂ)
689, 12, 67sylancl 589 . . . . . . . . . . 11 (𝜑 → ((𝐴 / 4)↑3) ∈ ℂ)
696, 3, 68mul12d 10892 . . . . . . . . . 10 (𝜑 → (4 · (𝑋 · ((𝐴 / 4)↑3))) = (𝑋 · (4 · ((𝐴 / 4)↑3))))
706, 68mulcld 10704 . . . . . . . . . . 11 (𝜑 → (4 · ((𝐴 / 4)↑3)) ∈ ℂ)
713, 70mulcomd 10705 . . . . . . . . . 10 (𝜑 → (𝑋 · (4 · ((𝐴 / 4)↑3))) = ((4 · ((𝐴 / 4)↑3)) · 𝑋))
72 df-3 11743 . . . . . . . . . . . . . . . . 17 3 = (2 + 1)
7372oveq2i 7166 . . . . . . . . . . . . . . . 16 (4↑3) = (4↑(2 + 1))
74 2nn0 11956 . . . . . . . . . . . . . . . . 17 2 ∈ ℕ0
75 expp1 13491 . . . . . . . . . . . . . . . . 17 ((4 ∈ ℂ ∧ 2 ∈ ℕ0) → (4↑(2 + 1)) = ((4↑2) · 4))
765, 74, 75mp2an 691 . . . . . . . . . . . . . . . 16 (4↑(2 + 1)) = ((4↑2) · 4)
7758oveq1i 7165 . . . . . . . . . . . . . . . 16 ((4↑2) · 4) = (16 · 4)
7873, 76, 773eqtri 2785 . . . . . . . . . . . . . . 15 (4↑3) = (16 · 4)
7978oveq2i 7166 . . . . . . . . . . . . . 14 ((𝐴↑3) / (4↑3)) = ((𝐴↑3) / (16 · 4))
8012a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → 3 ∈ ℕ0)
814, 6, 8, 80expdivd 13579 . . . . . . . . . . . . . 14 (𝜑 → ((𝐴 / 4)↑3) = ((𝐴↑3) / (4↑3)))
82 expcl 13502 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝐴↑3) ∈ ℂ)
834, 12, 82sylancl 589 . . . . . . . . . . . . . . 15 (𝜑 → (𝐴↑3) ∈ ℂ)
8483, 47, 6, 49, 8divdiv1d 11490 . . . . . . . . . . . . . 14 (𝜑 → (((𝐴↑3) / 16) / 4) = ((𝐴↑3) / (16 · 4)))
8579, 81, 843eqtr4a 2819 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 / 4)↑3) = (((𝐴↑3) / 16) / 4))
8685oveq2d 7171 . . . . . . . . . . . 12 (𝜑 → (4 · ((𝐴 / 4)↑3)) = (4 · (((𝐴↑3) / 16) / 4)))
8732oveq2i 7166 . . . . . . . . . . . . 13 ((𝐴↑3) / (8 · 2)) = ((𝐴↑3) / 16)
8831a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 8 ∈ ℂ)
8928a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ∈ ℂ)
9036a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 8 ≠ 0)
91 2ne0 11783 . . . . . . . . . . . . . . 15 2 ≠ 0
9291a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ≠ 0)
9383, 88, 89, 90, 92divdiv1d 11490 . . . . . . . . . . . . 13 (𝜑 → (((𝐴↑3) / 8) / 2) = ((𝐴↑3) / (8 · 2)))
9483, 47, 49divcld 11459 . . . . . . . . . . . . . 14 (𝜑 → ((𝐴↑3) / 16) ∈ ℂ)
9594, 6, 8divcan2d 11461 . . . . . . . . . . . . 13 (𝜑 → (4 · (((𝐴↑3) / 16) / 4)) = ((𝐴↑3) / 16))
9687, 93, 953eqtr4a 2819 . . . . . . . . . . . 12 (𝜑 → (((𝐴↑3) / 8) / 2) = (4 · (((𝐴↑3) / 16) / 4)))
9786, 96eqtr4d 2796 . . . . . . . . . . 11 (𝜑 → (4 · ((𝐴 / 4)↑3)) = (((𝐴↑3) / 8) / 2))
9897oveq1d 7170 . . . . . . . . . 10 (𝜑 → ((4 · ((𝐴 / 4)↑3)) · 𝑋) = ((((𝐴↑3) / 8) / 2) · 𝑋))
9969, 71, 983eqtrd 2797 . . . . . . . . 9 (𝜑 → (4 · (𝑋 · ((𝐴 / 4)↑3))) = ((((𝐴↑3) / 8) / 2) · 𝑋))
100 4nn0 11958 . . . . . . . . . . . 12 4 ∈ ℕ0
101100a1i 11 . . . . . . . . . . 11 (𝜑 → 4 ∈ ℕ0)
1024, 6, 8, 101expdivd 13579 . . . . . . . . . 10 (𝜑 → ((𝐴 / 4)↑4) = ((𝐴↑4) / (4↑4)))
103 expmul 13529 . . . . . . . . . . . . . . 15 ((2 ∈ ℂ ∧ 2 ∈ ℕ0 ∧ 4 ∈ ℕ0) → (2↑(2 · 4)) = ((2↑2)↑4))
10428, 74, 100, 103mp3an 1458 . . . . . . . . . . . . . 14 (2↑(2 · 4)) = ((2↑2)↑4)
105 4t2e8 11847 . . . . . . . . . . . . . . . 16 (4 · 2) = 8
1065, 28, 105mulcomli 10693 . . . . . . . . . . . . . . 15 (2 · 4) = 8
107106oveq2i 7166 . . . . . . . . . . . . . 14 (2↑(2 · 4)) = (2↑8)
108104, 107eqtr3i 2783 . . . . . . . . . . . . 13 ((2↑2)↑4) = (2↑8)
109 sq2 13615 . . . . . . . . . . . . . 14 (2↑2) = 4
110109oveq1i 7165 . . . . . . . . . . . . 13 ((2↑2)↑4) = (4↑4)
111108, 110eqtr3i 2783 . . . . . . . . . . . 12 (2↑8) = (4↑4)
112 2exp8 16485 . . . . . . . . . . . 12 (2↑8) = 256
113111, 112eqtr3i 2783 . . . . . . . . . . 11 (4↑4) = 256
114113oveq2i 7166 . . . . . . . . . 10 ((𝐴↑4) / (4↑4)) = ((𝐴↑4) / 256)
115102, 114eqtrdi 2809 . . . . . . . . 9 (𝜑 → ((𝐴 / 4)↑4) = ((𝐴↑4) / 256))
11699, 115oveq12d 7173 . . . . . . . 8 (𝜑 → ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4)) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))
11766, 116oveq12d 7173 . . . . . . 7 (𝜑 → ((6 · ((𝑋↑2) · ((𝐴 / 4)↑2))) + ((4 · (𝑋 · ((𝐴 / 4)↑3))) + ((𝐴 / 4)↑4))) = ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))))
11820, 117oveq12d 7173 . . . . . 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)))))
1192, 11, 1183eqtrd 2797 . . . . 5 (𝜑 → (𝑌↑4) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))))
120119oveq1d 7170 . . . 4 (𝜑 → ((𝑌↑4) + (𝑃 · (𝑌↑2))) = ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)))) + (𝑃 · (𝑌↑2))))
121 expcl 13502 . . . . . . 7 ((𝑋 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝑋↑4) ∈ ℂ)
1223, 100, 121sylancl 589 . . . . . 6 (𝜑 → (𝑋↑4) ∈ ℂ)
1234, 14mulcld 10704 . . . . . 6 (𝜑 → (𝐴 · (𝑋↑3)) ∈ ℂ)
124122, 123addcld 10703 . . . . 5 (𝜑 → ((𝑋↑4) + (𝐴 · (𝑋↑3))) ∈ ℂ)
125 mulcl 10664 . . . . . . . 8 (((3 / 8) ∈ ℂ ∧ (𝐴↑2) ∈ ℂ) → ((3 / 8) · (𝐴↑2)) ∈ ℂ)
12652, 43, 125sylancr 590 . . . . . . 7 (𝜑 → ((3 / 8) · (𝐴↑2)) ∈ ℂ)
127126, 25mulcld 10704 . . . . . 6 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝑋↑2)) ∈ ℂ)
12883, 88, 90divcld 11459 . . . . . . . . 9 (𝜑 → ((𝐴↑3) / 8) ∈ ℂ)
129128halfcld 11924 . . . . . . . 8 (𝜑 → (((𝐴↑3) / 8) / 2) ∈ ℂ)
130129, 3mulcld 10704 . . . . . . 7 (𝜑 → ((((𝐴↑3) / 8) / 2) · 𝑋) ∈ ℂ)
131 expcl 13502 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ 4 ∈ ℕ0) → (𝐴↑4) ∈ ℂ)
1324, 100, 131sylancl 589 . . . . . . . 8 (𝜑 → (𝐴↑4) ∈ ℂ)
133 5nn0 11959 . . . . . . . . . . . 12 5 ∈ ℕ0
13474, 133deccl 12157 . . . . . . . . . . 11 25 ∈ ℕ0
135134, 21decnncl 12162 . . . . . . . . . 10 256 ∈ ℕ
136135nncni 11689 . . . . . . . . 9 256 ∈ ℂ
137136a1i 11 . . . . . . . 8 (𝜑256 ∈ ℂ)
138135nnne0i 11719 . . . . . . . . 9 256 ≠ 0
139138a1i 11 . . . . . . . 8 (𝜑256 ≠ 0)
140132, 137, 139divcld 11459 . . . . . . 7 (𝜑 → ((𝐴↑4) / 256) ∈ ℂ)
141130, 140addcld 10703 . . . . . 6 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) ∈ ℂ)
142127, 141addcld 10703 . . . . 5 (𝜑 → ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) ∈ ℂ)
143 quart1.b . . . . . . . 8 (𝜑𝐵 ∈ ℂ)
144 quart1.c . . . . . . . 8 (𝜑𝐶 ∈ ℂ)
145 quart1.d . . . . . . . 8 (𝜑𝐷 ∈ ℂ)
146 quart1.p . . . . . . . 8 (𝜑𝑃 = (𝐵 − ((3 / 8) · (𝐴↑2))))
147 quart1.q . . . . . . . 8 (𝜑𝑄 = ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)))
148 quart1.r . . . . . . . 8 (𝜑𝑅 = ((𝐷 − ((𝐶 · 𝐴) / 4)) + ((((𝐴↑2) · 𝐵) / 16) − ((3 / 256) · (𝐴↑4)))))
1494, 143, 144, 145, 146, 147, 148quart1cl 25544 . . . . . . 7 (𝜑 → (𝑃 ∈ ℂ ∧ 𝑄 ∈ ℂ ∧ 𝑅 ∈ ℂ))
150149simp1d 1139 . . . . . 6 (𝜑𝑃 ∈ ℂ)
1513, 9addcld 10703 . . . . . . . 8 (𝜑 → (𝑋 + (𝐴 / 4)) ∈ ℂ)
1521, 151eqeltrd 2852 . . . . . . 7 (𝜑𝑌 ∈ ℂ)
153152sqcld 13563 . . . . . 6 (𝜑 → (𝑌↑2) ∈ ℂ)
154150, 153mulcld 10704 . . . . 5 (𝜑 → (𝑃 · (𝑌↑2)) ∈ ℂ)
155124, 142, 154addassd 10706 . . . 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)))))
156120, 155eqtrd 2793 . . 3 (𝜑 → ((𝑌↑4) + (𝑃 · (𝑌↑2))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))))
157156oveq1d 7170 . 2 (𝜑 → (((𝑌↑4) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = ((((𝑋↑4) + (𝐴 · (𝑋↑3))) + (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2)))) + ((𝑄 · 𝑌) + 𝑅)))
158142, 154addcld 10703 . . 3 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) ∈ ℂ)
159149simp2d 1140 . . . . 5 (𝜑𝑄 ∈ ℂ)
160159, 152mulcld 10704 . . . 4 (𝜑 → (𝑄 · 𝑌) ∈ ℂ)
161149simp3d 1141 . . . 4 (𝜑𝑅 ∈ ℂ)
162160, 161addcld 10703 . . 3 (𝜑 → ((𝑄 · 𝑌) + 𝑅) ∈ ℂ)
163124, 158, 162addassd 10706 . 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))) + ((𝑄 · 𝑌) + 𝑅))))
1641oveq1d 7170 . . . . . . . . . 10 (𝜑 → (𝑌↑2) = ((𝑋 + (𝐴 / 4))↑2))
165 binom2 13634 . . . . . . . . . . 11 ((𝑋 ∈ ℂ ∧ (𝐴 / 4) ∈ ℂ) → ((𝑋 + (𝐴 / 4))↑2) = (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)))
1663, 9, 165syl2anc 587 . . . . . . . . . 10 (𝜑 → ((𝑋 + (𝐴 / 4))↑2) = (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)))
1673, 9mulcld 10704 . . . . . . . . . . . 12 (𝜑 → (𝑋 · (𝐴 / 4)) ∈ ℂ)
168 mulcl 10664 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ (𝑋 · (𝐴 / 4)) ∈ ℂ) → (2 · (𝑋 · (𝐴 / 4))) ∈ ℂ)
16928, 167, 168sylancr 590 . . . . . . . . . . 11 (𝜑 → (2 · (𝑋 · (𝐴 / 4))) ∈ ℂ)
17025, 169, 24addassd 10706 . . . . . . . . . 10 (𝜑 → (((𝑋↑2) + (2 · (𝑋 · (𝐴 / 4)))) + ((𝐴 / 4)↑2)) = ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))
171164, 166, 1703eqtrd 2797 . . . . . . . . 9 (𝜑 → (𝑌↑2) = ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))
172171oveq2d 7171 . . . . . . . 8 (𝜑 → (𝑃 · (𝑌↑2)) = (𝑃 · ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
173169, 24addcld 10703 . . . . . . . . 9 (𝜑 → ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)) ∈ ℂ)
174150, 25, 173adddid 10708 . . . . . . . 8 (𝜑 → (𝑃 · ((𝑋↑2) + ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
175172, 174eqtrd 2793 . . . . . . 7 (𝜑 → (𝑃 · (𝑌↑2)) = ((𝑃 · (𝑋↑2)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))))
176175oveq2d 7171 . . . . . 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))))))
177150, 25mulcld 10704 . . . . . . 7 (𝜑 → (𝑃 · (𝑋↑2)) ∈ ℂ)
178150, 173mulcld 10704 . . . . . . 7 (𝜑 → (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))) ∈ ℂ)
179127, 141, 177, 178add4d 10911 . . . . . 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))))))
180126, 150, 25adddird 10709 . . . . . . . 8 (𝜑 → ((((3 / 8) · (𝐴↑2)) + 𝑃) · (𝑋↑2)) = ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))))
181146oveq2d 7171 . . . . . . . . . 10 (𝜑 → (((3 / 8) · (𝐴↑2)) + 𝑃) = (((3 / 8) · (𝐴↑2)) + (𝐵 − ((3 / 8) · (𝐴↑2)))))
182126, 143pncan3d 11043 . . . . . . . . . 10 (𝜑 → (((3 / 8) · (𝐴↑2)) + (𝐵 − ((3 / 8) · (𝐴↑2)))) = 𝐵)
183181, 182eqtrd 2793 . . . . . . . . 9 (𝜑 → (((3 / 8) · (𝐴↑2)) + 𝑃) = 𝐵)
184183oveq1d 7170 . . . . . . . 8 (𝜑 → ((((3 / 8) · (𝐴↑2)) + 𝑃) · (𝑋↑2)) = (𝐵 · (𝑋↑2)))
185180, 184eqtr3d 2795 . . . . . . 7 (𝜑 → ((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (𝑃 · (𝑋↑2))) = (𝐵 · (𝑋↑2)))
186185oveq1d 7170 . . . . . 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))))))
187176, 179, 1863eqtrd 2797 . . . . 5 (𝜑 → (((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) = ((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))))
188187oveq1d 7170 . . . 4 (𝜑 → ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = (((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) + ((𝑄 · 𝑌) + 𝑅)))
189143, 25mulcld 10704 . . . . 5 (𝜑 → (𝐵 · (𝑋↑2)) ∈ ℂ)
190141, 178addcld 10703 . . . . 5 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) ∈ ℂ)
191189, 190, 162addassd 10706 . . . 4 (𝜑 → (((𝐵 · (𝑋↑2)) + ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐵 · (𝑋↑2)) + (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅))))
1924, 143mulcld 10704 . . . . . . . . . 10 (𝜑 → (𝐴 · 𝐵) ∈ ℂ)
193192halfcld 11924 . . . . . . . . 9 (𝜑 → ((𝐴 · 𝐵) / 2) ∈ ℂ)
194193, 128subcld 11040 . . . . . . . 8 (𝜑 → (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) ∈ ℂ)
195194, 3mulcld 10704 . . . . . . 7 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) ∈ ℂ)
196150, 24mulcld 10704 . . . . . . . 8 (𝜑 → (𝑃 · ((𝐴 / 4)↑2)) ∈ ℂ)
197140, 196addcld 10703 . . . . . . 7 (𝜑 → (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) ∈ ℂ)
198159, 3mulcld 10704 . . . . . . 7 (𝜑 → (𝑄 · 𝑋) ∈ ℂ)
199159, 9mulcld 10704 . . . . . . . 8 (𝜑 → (𝑄 · (𝐴 / 4)) ∈ ℂ)
200199, 161addcld 10703 . . . . . . 7 (𝜑 → ((𝑄 · (𝐴 / 4)) + 𝑅) ∈ ℂ)
201195, 197, 198, 200add4d 10911 . . . . . 6 (𝜑 → ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅))) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)) + ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
202150, 169, 24adddid 10708 . . . . . . . . 9 (𝜑 → (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2))) = ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2))))
203202oveq2d 7171 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2)))))
204150, 169mulcld 10704 . . . . . . . . 9 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) ∈ ℂ)
205130, 140, 204, 196add4d 10911 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + ((𝑃 · (2 · (𝑋 · (𝐴 / 4)))) + (𝑃 · ((𝐴 / 4)↑2)))) = ((((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
2064, 89, 89, 92, 92divdiv1d 11490 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝐴 / 2) / 2) = (𝐴 / (2 · 2)))
207 2t2e4 11843 . . . . . . . . . . . . . . . . . . 19 (2 · 2) = 4
208207oveq2i 7166 . . . . . . . . . . . . . . . . . 18 (𝐴 / (2 · 2)) = (𝐴 / 4)
209206, 208eqtrdi 2809 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝐴 / 2) / 2) = (𝐴 / 4))
210209oveq2d 7171 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · ((𝐴 / 2) / 2)) = (2 · (𝐴 / 4)))
2114halfcld 11924 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐴 / 2) ∈ ℂ)
212211, 89, 92divcan2d 11461 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · ((𝐴 / 2) / 2)) = (𝐴 / 2))
213210, 212eqtr3d 2795 . . . . . . . . . . . . . . 15 (𝜑 → (2 · (𝐴 / 4)) = (𝐴 / 2))
214213oveq2d 7171 . . . . . . . . . . . . . 14 (𝜑 → (𝑋 · (2 · (𝐴 / 4))) = (𝑋 · (𝐴 / 2)))
2153, 211mulcomd 10705 . . . . . . . . . . . . . 14 (𝜑 → (𝑋 · (𝐴 / 2)) = ((𝐴 / 2) · 𝑋))
216214, 215eqtrd 2793 . . . . . . . . . . . . 13 (𝜑 → (𝑋 · (2 · (𝐴 / 4))) = ((𝐴 / 2) · 𝑋))
217216oveq2d 7171 . . . . . . . . . . . 12 (𝜑 → (𝑃 · (𝑋 · (2 · (𝐴 / 4)))) = (𝑃 · ((𝐴 / 2) · 𝑋)))
21889, 3, 9mul12d 10892 . . . . . . . . . . . . 13 (𝜑 → (2 · (𝑋 · (𝐴 / 4))) = (𝑋 · (2 · (𝐴 / 4))))
219218oveq2d 7171 . . . . . . . . . . . 12 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) = (𝑃 · (𝑋 · (2 · (𝐴 / 4)))))
220150, 211, 3mulassd 10707 . . . . . . . . . . . 12 (𝜑 → ((𝑃 · (𝐴 / 2)) · 𝑋) = (𝑃 · ((𝐴 / 2) · 𝑋)))
221217, 219, 2203eqtr4d 2803 . . . . . . . . . . 11 (𝜑 → (𝑃 · (2 · (𝑋 · (𝐴 / 4)))) = ((𝑃 · (𝐴 / 2)) · 𝑋))
222221oveq2d 7171 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝑃 · (𝐴 / 2)) · 𝑋)))
223150, 211mulcld 10704 . . . . . . . . . . 11 (𝜑 → (𝑃 · (𝐴 / 2)) ∈ ℂ)
224129, 223, 3adddird 10709 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) · 𝑋) = (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝑃 · (𝐴 / 2)) · 𝑋)))
225146oveq1d 7170 . . . . . . . . . . . . . 14 (𝜑 → (𝑃 · (𝐴 / 2)) = ((𝐵 − ((3 / 8) · (𝐴↑2))) · (𝐴 / 2)))
226143, 126, 211subdird 11140 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 − ((3 / 8) · (𝐴↑2))) · (𝐴 / 2)) = ((𝐵 · (𝐴 / 2)) − (((3 / 8) · (𝐴↑2)) · (𝐴 / 2))))
227143, 4, 89, 92divassd 11494 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵 · 𝐴) / 2) = (𝐵 · (𝐴 / 2)))
228143, 4mulcomd 10705 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵 · 𝐴) = (𝐴 · 𝐵))
229228oveq1d 7170 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵 · 𝐴) / 2) = ((𝐴 · 𝐵) / 2))
230227, 229eqtr3d 2795 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 · (𝐴 / 2)) = ((𝐴 · 𝐵) / 2))
23172oveq2i 7166 . . . . . . . . . . . . . . . . . . . . 21 (𝐴↑3) = (𝐴↑(2 + 1))
232 expp1 13491 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℂ ∧ 2 ∈ ℕ0) → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
2334, 74, 232sylancl 589 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐴↑(2 + 1)) = ((𝐴↑2) · 𝐴))
234231, 233syl5eq 2805 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴↑3) = ((𝐴↑2) · 𝐴))
235234oveq2d 7171 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((3 / 8) · (𝐴↑3)) = ((3 / 8) · ((𝐴↑2) · 𝐴)))
23627a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 3 ∈ ℂ)
237236, 83, 88, 90div23d 11496 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((3 · (𝐴↑3)) / 8) = ((3 / 8) · (𝐴↑3)))
23852a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (3 / 8) ∈ ℂ)
239238, 43, 4mulassd 10707 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = ((3 / 8) · ((𝐴↑2) · 𝐴)))
240235, 237, 2393eqtr4rd 2804 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = ((3 · (𝐴↑3)) / 8))
241236, 83, 88, 90divassd 11494 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((3 · (𝐴↑3)) / 8) = (3 · ((𝐴↑3) / 8)))
242240, 241eqtrd 2793 . . . . . . . . . . . . . . . . 17 (𝜑 → (((3 / 8) · (𝐴↑2)) · 𝐴) = (3 · ((𝐴↑3) / 8)))
243242oveq1d 7170 . . . . . . . . . . . . . . . 16 (𝜑 → ((((3 / 8) · (𝐴↑2)) · 𝐴) / 2) = ((3 · ((𝐴↑3) / 8)) / 2))
244126, 4, 89, 92divassd 11494 . . . . . . . . . . . . . . . 16 (𝜑 → ((((3 / 8) · (𝐴↑2)) · 𝐴) / 2) = (((3 / 8) · (𝐴↑2)) · (𝐴 / 2)))
245236, 128, 89, 92divassd 11494 . . . . . . . . . . . . . . . 16 (𝜑 → ((3 · ((𝐴↑3) / 8)) / 2) = (3 · (((𝐴↑3) / 8) / 2)))
246243, 244, 2453eqtr3d 2801 . . . . . . . . . . . . . . 15 (𝜑 → (((3 / 8) · (𝐴↑2)) · (𝐴 / 2)) = (3 · (((𝐴↑3) / 8) / 2)))
247230, 246oveq12d 7173 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 · (𝐴 / 2)) − (((3 / 8) · (𝐴↑2)) · (𝐴 / 2))) = (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2))))
248225, 226, 2473eqtrd 2797 . . . . . . . . . . . . 13 (𝜑 → (𝑃 · (𝐴 / 2)) = (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2))))
249248oveq2d 7171 . . . . . . . . . . . 12 (𝜑 → ((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) = ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
250 mulcl 10664 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (((𝐴↑3) / 8) / 2) ∈ ℂ) → (3 · (((𝐴↑3) / 8) / 2)) ∈ ℂ)
25127, 129, 250sylancr 590 . . . . . . . . . . . . . 14 (𝜑 → (3 · (((𝐴↑3) / 8) / 2)) ∈ ℂ)
252129, 193, 251addsub12d 11063 . . . . . . . . . . . . 13 (𝜑 → ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))) = (((𝐴 · 𝐵) / 2) + ((((𝐴↑3) / 8) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
253193, 251, 129subsub2d 11069 . . . . . . . . . . . . 13 (𝜑 → (((𝐴 · 𝐵) / 2) − ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2))) = (((𝐴 · 𝐵) / 2) + ((((𝐴↑3) / 8) / 2) − (3 · (((𝐴↑3) / 8) / 2)))))
254129mulid2d 10702 . . . . . . . . . . . . . . . 16 (𝜑 → (1 · (((𝐴↑3) / 8) / 2)) = (((𝐴↑3) / 8) / 2))
255254oveq2d 7171 . . . . . . . . . . . . . . 15 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))) = ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2)))
256 3m1e2 11807 . . . . . . . . . . . . . . . . 17 (3 − 1) = 2
257256oveq1i 7165 . . . . . . . . . . . . . . . 16 ((3 − 1) · (((𝐴↑3) / 8) / 2)) = (2 · (((𝐴↑3) / 8) / 2))
258 1cnd 10679 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℂ)
259236, 258, 129subdird 11140 . . . . . . . . . . . . . . . 16 (𝜑 → ((3 − 1) · (((𝐴↑3) / 8) / 2)) = ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))))
260128, 89, 92divcan2d 11461 . . . . . . . . . . . . . . . 16 (𝜑 → (2 · (((𝐴↑3) / 8) / 2)) = ((𝐴↑3) / 8))
261257, 259, 2603eqtr3a 2817 . . . . . . . . . . . . . . 15 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (1 · (((𝐴↑3) / 8) / 2))) = ((𝐴↑3) / 8))
262255, 261eqtr3d 2795 . . . . . . . . . . . . . 14 (𝜑 → ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2)) = ((𝐴↑3) / 8))
263262oveq2d 7171 . . . . . . . . . . . . 13 (𝜑 → (((𝐴 · 𝐵) / 2) − ((3 · (((𝐴↑3) / 8) / 2)) − (((𝐴↑3) / 8) / 2))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
264252, 253, 2633eqtr2d 2799 . . . . . . . . . . . 12 (𝜑 → ((((𝐴↑3) / 8) / 2) + (((𝐴 · 𝐵) / 2) − (3 · (((𝐴↑3) / 8) / 2)))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
265249, 264eqtrd 2793 . . . . . . . . . . 11 (𝜑 → ((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) = (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)))
266265oveq1d 7170 . . . . . . . . . 10 (𝜑 → (((((𝐴↑3) / 8) / 2) + (𝑃 · (𝐴 / 2))) · 𝑋) = ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋))
267222, 224, 2663eqtr2d 2799 . . . . . . . . 9 (𝜑 → (((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) = ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋))
268267oveq1d 7170 . . . . . . . 8 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + (𝑃 · (2 · (𝑋 · (𝐴 / 4))))) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
269203, 205, 2683eqtrd 2797 . . . . . . 7 (𝜑 → ((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))))
2701oveq2d 7171 . . . . . . . . . 10 (𝜑 → (𝑄 · 𝑌) = (𝑄 · (𝑋 + (𝐴 / 4))))
271159, 3, 9adddid 10708 . . . . . . . . . 10 (𝜑 → (𝑄 · (𝑋 + (𝐴 / 4))) = ((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))))
272270, 271eqtrd 2793 . . . . . . . . 9 (𝜑 → (𝑄 · 𝑌) = ((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))))
273272oveq1d 7170 . . . . . . . 8 (𝜑 → ((𝑄 · 𝑌) + 𝑅) = (((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))) + 𝑅))
274198, 199, 161addassd 10706 . . . . . . . 8 (𝜑 → (((𝑄 · 𝑋) + (𝑄 · (𝐴 / 4))) + 𝑅) = ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
275273, 274eqtrd 2793 . . . . . . 7 (𝜑 → ((𝑄 · 𝑌) + 𝑅) = ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
276269, 275oveq12d 7173 . . . . . 6 (𝜑 → (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅)) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑋) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
277194, 159addcomd 10885 . . . . . . . . . 10 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) = (𝑄 + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))))
278147oveq1d 7170 . . . . . . . . . 10 (𝜑 → (𝑄 + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))))
279144, 193subcld 11040 . . . . . . . . . . . 12 (𝜑 → (𝐶 − ((𝐴 · 𝐵) / 2)) ∈ ℂ)
280279, 128, 193ppncand 11080 . . . . . . . . . . 11 (𝜑 → (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴 · 𝐵) / 2)))
281144, 193npcand 11044 . . . . . . . . . . 11 (𝜑 → ((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴 · 𝐵) / 2)) = 𝐶)
282280, 281eqtrd 2793 . . . . . . . . . 10 (𝜑 → (((𝐶 − ((𝐴 · 𝐵) / 2)) + ((𝐴↑3) / 8)) + (((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8))) = 𝐶)
283277, 278, 2823eqtrd 2797 . . . . . . . . 9 (𝜑 → ((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) = 𝐶)
284283oveq1d 7170 . . . . . . . 8 (𝜑 → (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) · 𝑋) = (𝐶 · 𝑋))
285194, 159, 3adddird 10709 . . . . . . . 8 (𝜑 → (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) + 𝑄) · 𝑋) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)))
286284, 285eqtr3d 2795 . . . . . . 7 (𝜑 → (𝐶 · 𝑋) = (((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)))
2874, 143, 144, 145, 146, 147, 148, 3, 1quart1lem 25545 . . . . . . 7 (𝜑𝐷 = ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅)))
288286, 287oveq12d 7173 . . . . . 6 (𝜑 → ((𝐶 · 𝑋) + 𝐷) = ((((((𝐴 · 𝐵) / 2) − ((𝐴↑3) / 8)) · 𝑋) + (𝑄 · 𝑋)) + ((((𝐴↑4) / 256) + (𝑃 · ((𝐴 / 4)↑2))) + ((𝑄 · (𝐴 / 4)) + 𝑅))))
289201, 276, 2883eqtr4d 2803 . . . . 5 (𝜑 → (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐶 · 𝑋) + 𝐷))
290289oveq2d 7171 . . . 4 (𝜑 → ((𝐵 · (𝑋↑2)) + (((((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256)) + (𝑃 · ((2 · (𝑋 · (𝐴 / 4))) + ((𝐴 / 4)↑2)))) + ((𝑄 · 𝑌) + 𝑅))) = ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷)))
291188, 191, 2903eqtrd 2797 . . 3 (𝜑 → ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)) = ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷)))
292291oveq2d 7171 . 2 (𝜑 → (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((((((3 / 8) · (𝐴↑2)) · (𝑋↑2)) + (((((𝐴↑3) / 8) / 2) · 𝑋) + ((𝐴↑4) / 256))) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅))) = (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷))))
293157, 163, 2923eqtrrd 2798 1 (𝜑 → (((𝑋↑4) + (𝐴 · (𝑋↑3))) + ((𝐵 · (𝑋↑2)) + ((𝐶 · 𝑋) + 𝐷))) = (((𝑌↑4) + (𝑃 · (𝑌↑2))) + ((𝑄 · 𝑌) + 𝑅)))
 Colors of variables: wff setvar class Syntax hints:   → wi 4   ∧ wa 399   = wceq 1538   ∈ wcel 2111   ≠ wne 2951  (class class class)co 7155  ℂcc 10578  0cc0 10580  1c1 10581   + caddc 10583   · cmul 10585   − cmin 10913   / cdiv 11340  2c2 11734  3c3 11735  4c4 11736  5c5 11737  6c6 11738  8c8 11740  ℕ0cn0 11939  ;cdc 12142  ↑cexp 13484 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2729  ax-sep 5172  ax-nul 5179  ax-pow 5237  ax-pr 5301  ax-un 7464  ax-cnex 10636  ax-resscn 10637  ax-1cn 10638  ax-icn 10639  ax-addcl 10640  ax-addrcl 10641  ax-mulcl 10642  ax-mulrcl 10643  ax-mulcom 10644  ax-addass 10645  ax-mulass 10646  ax-distr 10647  ax-i2m1 10648  ax-1ne0 10649  ax-1rid 10650  ax-rnegex 10651  ax-rrecex 10652  ax-cnre 10653  ax-pre-lttri 10654  ax-pre-lttrn 10655  ax-pre-ltadd 10656  ax-pre-mulgt0 10657 This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2557  df-eu 2588  df-clab 2736  df-cleq 2750  df-clel 2830  df-nfc 2901  df-ne 2952  df-nel 3056  df-ral 3075  df-rex 3076  df-reu 3077  df-rmo 3078  df-rab 3079  df-v 3411  df-sbc 3699  df-csb 3808  df-dif 3863  df-un 3865  df-in 3867  df-ss 3877  df-pss 3879  df-nul 4228  df-if 4424  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4802  df-iun 4888  df-br 5036  df-opab 5098  df-mpt 5116  df-tr 5142  df-id 5433  df-eprel 5438  df-po 5446  df-so 5447  df-fr 5486  df-we 5488  df-xp 5533  df-rel 5534  df-cnv 5535  df-co 5536  df-dm 5537  df-rn 5538  df-res 5539  df-ima 5540  df-pred 6130  df-ord 6176  df-on 6177  df-lim 6178  df-suc 6179  df-iota 6298  df-fun 6341  df-fn 6342  df-f 6343  df-f1 6344  df-fo 6345  df-f1o 6346  df-fv 6347  df-riota 7113  df-ov 7158  df-oprab 7159  df-mpo 7160  df-om 7585  df-2nd 7699  df-wrecs 7962  df-recs 8023  df-rdg 8061  df-er 8304  df-en 8533  df-dom 8534  df-sdom 8535  df-pnf 10720  df-mnf 10721  df-xr 10722  df-ltxr 10723  df-le 10724  df-sub 10915  df-neg 10916  df-div 11341  df-nn 11680  df-2 11742  df-3 11743  df-4 11744  df-5 11745  df-6 11746  df-7 11747  df-8 11748  df-9 11749  df-n0 11940  df-z 12026  df-dec 12143  df-uz 12288  df-seq 13424  df-exp 13485 This theorem is referenced by:  quart  25551
 Copyright terms: Public domain W3C validator