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

Theorem dcubic1lem 25898
Description: Lemma for dcubic1 25900 and dcubic2 25899: simplify the cubic equation under the substitution 𝑋 = 𝑈𝑀 / 𝑈. (Contributed by Mario Carneiro, 26-Apr-2015.)
Hypotheses
Ref Expression
dcubic.c (𝜑𝑃 ∈ ℂ)
dcubic.d (𝜑𝑄 ∈ ℂ)
dcubic.x (𝜑𝑋 ∈ ℂ)
dcubic.t (𝜑𝑇 ∈ ℂ)
dcubic.3 (𝜑 → (𝑇↑3) = (𝐺𝑁))
dcubic.g (𝜑𝐺 ∈ ℂ)
dcubic.2 (𝜑 → (𝐺↑2) = ((𝑁↑2) + (𝑀↑3)))
dcubic.m (𝜑𝑀 = (𝑃 / 3))
dcubic.n (𝜑𝑁 = (𝑄 / 2))
dcubic.0 (𝜑𝑇 ≠ 0)
dcubic2.u (𝜑𝑈 ∈ ℂ)
dcubic2.z (𝜑𝑈 ≠ 0)
dcubic2.2 (𝜑𝑋 = (𝑈 − (𝑀 / 𝑈)))
Assertion
Ref Expression
dcubic1lem (𝜑 → (((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = 0 ↔ (((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) = 0))

Proof of Theorem dcubic1lem
StepHypRef Expression
1 dcubic2.u . . . . . . . . 9 (𝜑𝑈 ∈ ℂ)
2 3nn0 12181 . . . . . . . . 9 3 ∈ ℕ0
3 expcl 13728 . . . . . . . . 9 ((𝑈 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑈↑3) ∈ ℂ)
41, 2, 3sylancl 585 . . . . . . . 8 (𝜑 → (𝑈↑3) ∈ ℂ)
54sqvald 13789 . . . . . . 7 (𝜑 → ((𝑈↑3)↑2) = ((𝑈↑3) · (𝑈↑3)))
65oveq1d 7270 . . . . . 6 (𝜑 → (((𝑈↑3)↑2) / (𝑈↑3)) = (((𝑈↑3) · (𝑈↑3)) / (𝑈↑3)))
7 dcubic2.z . . . . . . . 8 (𝜑𝑈 ≠ 0)
8 3z 12283 . . . . . . . . 9 3 ∈ ℤ
98a1i 11 . . . . . . . 8 (𝜑 → 3 ∈ ℤ)
101, 7, 9expne0d 13798 . . . . . . 7 (𝜑 → (𝑈↑3) ≠ 0)
114, 4, 10divcan4d 11687 . . . . . 6 (𝜑 → (((𝑈↑3) · (𝑈↑3)) / (𝑈↑3)) = (𝑈↑3))
126, 11eqtr2d 2779 . . . . 5 (𝜑 → (𝑈↑3) = (((𝑈↑3)↑2) / (𝑈↑3)))
13 dcubic.d . . . . . . . 8 (𝜑𝑄 ∈ ℂ)
14 dcubic.m . . . . . . . . . . 11 (𝜑𝑀 = (𝑃 / 3))
15 dcubic.c . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℂ)
16 3cn 11984 . . . . . . . . . . . . 13 3 ∈ ℂ
1716a1i 11 . . . . . . . . . . . 12 (𝜑 → 3 ∈ ℂ)
18 3ne0 12009 . . . . . . . . . . . . 13 3 ≠ 0
1918a1i 11 . . . . . . . . . . . 12 (𝜑 → 3 ≠ 0)
2015, 17, 19divcld 11681 . . . . . . . . . . 11 (𝜑 → (𝑃 / 3) ∈ ℂ)
2114, 20eqeltrd 2839 . . . . . . . . . 10 (𝜑𝑀 ∈ ℂ)
22 expcl 13728 . . . . . . . . . 10 ((𝑀 ∈ ℂ ∧ 3 ∈ ℕ0) → (𝑀↑3) ∈ ℂ)
2321, 2, 22sylancl 585 . . . . . . . . 9 (𝜑 → (𝑀↑3) ∈ ℂ)
2423, 4, 10divcld 11681 . . . . . . . 8 (𝜑 → ((𝑀↑3) / (𝑈↑3)) ∈ ℂ)
2513, 24negsubd 11268 . . . . . . 7 (𝜑 → (𝑄 + -((𝑀↑3) / (𝑈↑3))) = (𝑄 − ((𝑀↑3) / (𝑈↑3))))
2613, 4, 10divcan4d 11687 . . . . . . . 8 (𝜑 → ((𝑄 · (𝑈↑3)) / (𝑈↑3)) = 𝑄)
2726oveq1d 7270 . . . . . . 7 (𝜑 → (((𝑄 · (𝑈↑3)) / (𝑈↑3)) − ((𝑀↑3) / (𝑈↑3))) = (𝑄 − ((𝑀↑3) / (𝑈↑3))))
2825, 27eqtr4d 2781 . . . . . 6 (𝜑 → (𝑄 + -((𝑀↑3) / (𝑈↑3))) = (((𝑄 · (𝑈↑3)) / (𝑈↑3)) − ((𝑀↑3) / (𝑈↑3))))
29 dcubic.x . . . . . . . . . 10 (𝜑𝑋 ∈ ℂ)
3015, 29mulcld 10926 . . . . . . . . 9 (𝜑 → (𝑃 · 𝑋) ∈ ℂ)
3130negcld 11249 . . . . . . . 8 (𝜑 → -(𝑃 · 𝑋) ∈ ℂ)
3224negcld 11249 . . . . . . . 8 (𝜑 → -((𝑀↑3) / (𝑈↑3)) ∈ ℂ)
3331, 32, 30, 13add42d 11134 . . . . . . 7 (𝜑 → ((-(𝑃 · 𝑋) + -((𝑀↑3) / (𝑈↑3))) + ((𝑃 · 𝑋) + 𝑄)) = ((-(𝑃 · 𝑋) + (𝑃 · 𝑋)) + (𝑄 + -((𝑀↑3) / (𝑈↑3)))))
3415, 29mulneg2d 11359 . . . . . . . . . . . 12 (𝜑 → (𝑃 · -𝑋) = -(𝑃 · 𝑋))
35 dcubic2.2 . . . . . . . . . . . . . . 15 (𝜑𝑋 = (𝑈 − (𝑀 / 𝑈)))
3635negeqd 11145 . . . . . . . . . . . . . 14 (𝜑 → -𝑋 = -(𝑈 − (𝑀 / 𝑈)))
3721, 1, 7divcld 11681 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 / 𝑈) ∈ ℂ)
381, 37negsubdid 11277 . . . . . . . . . . . . . 14 (𝜑 → -(𝑈 − (𝑀 / 𝑈)) = (-𝑈 + (𝑀 / 𝑈)))
3936, 38eqtrd 2778 . . . . . . . . . . . . 13 (𝜑 → -𝑋 = (-𝑈 + (𝑀 / 𝑈)))
4039oveq2d 7271 . . . . . . . . . . . 12 (𝜑 → (𝑃 · -𝑋) = (𝑃 · (-𝑈 + (𝑀 / 𝑈))))
4134, 40eqtr3d 2780 . . . . . . . . . . 11 (𝜑 → -(𝑃 · 𝑋) = (𝑃 · (-𝑈 + (𝑀 / 𝑈))))
421negcld 11249 . . . . . . . . . . . 12 (𝜑 → -𝑈 ∈ ℂ)
4315, 42, 37adddid 10930 . . . . . . . . . . 11 (𝜑 → (𝑃 · (-𝑈 + (𝑀 / 𝑈))) = ((𝑃 · -𝑈) + (𝑃 · (𝑀 / 𝑈))))
4415, 1mulneg2d 11359 . . . . . . . . . . . 12 (𝜑 → (𝑃 · -𝑈) = -(𝑃 · 𝑈))
4544oveq1d 7270 . . . . . . . . . . 11 (𝜑 → ((𝑃 · -𝑈) + (𝑃 · (𝑀 / 𝑈))) = (-(𝑃 · 𝑈) + (𝑃 · (𝑀 / 𝑈))))
4641, 43, 453eqtrd 2782 . . . . . . . . . 10 (𝜑 → -(𝑃 · 𝑋) = (-(𝑃 · 𝑈) + (𝑃 · (𝑀 / 𝑈))))
4746oveq1d 7270 . . . . . . . . 9 (𝜑 → (-(𝑃 · 𝑋) + -((𝑀↑3) / (𝑈↑3))) = ((-(𝑃 · 𝑈) + (𝑃 · (𝑀 / 𝑈))) + -((𝑀↑3) / (𝑈↑3))))
4815, 1mulcld 10926 . . . . . . . . . . 11 (𝜑 → (𝑃 · 𝑈) ∈ ℂ)
4948negcld 11249 . . . . . . . . . 10 (𝜑 → -(𝑃 · 𝑈) ∈ ℂ)
5015, 37mulcld 10926 . . . . . . . . . 10 (𝜑 → (𝑃 · (𝑀 / 𝑈)) ∈ ℂ)
5149, 50, 32addassd 10928 . . . . . . . . 9 (𝜑 → ((-(𝑃 · 𝑈) + (𝑃 · (𝑀 / 𝑈))) + -((𝑀↑3) / (𝑈↑3))) = (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))))
5247, 51eqtrd 2778 . . . . . . . 8 (𝜑 → (-(𝑃 · 𝑋) + -((𝑀↑3) / (𝑈↑3))) = (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))))
5352oveq1d 7270 . . . . . . 7 (𝜑 → ((-(𝑃 · 𝑋) + -((𝑀↑3) / (𝑈↑3))) + ((𝑃 · 𝑋) + 𝑄)) = ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄)))
5431, 30addcomd 11107 . . . . . . . . . 10 (𝜑 → (-(𝑃 · 𝑋) + (𝑃 · 𝑋)) = ((𝑃 · 𝑋) + -(𝑃 · 𝑋)))
5530negidd 11252 . . . . . . . . . 10 (𝜑 → ((𝑃 · 𝑋) + -(𝑃 · 𝑋)) = 0)
5654, 55eqtrd 2778 . . . . . . . . 9 (𝜑 → (-(𝑃 · 𝑋) + (𝑃 · 𝑋)) = 0)
5756oveq1d 7270 . . . . . . . 8 (𝜑 → ((-(𝑃 · 𝑋) + (𝑃 · 𝑋)) + (𝑄 + -((𝑀↑3) / (𝑈↑3)))) = (0 + (𝑄 + -((𝑀↑3) / (𝑈↑3)))))
5813, 32addcld 10925 . . . . . . . . 9 (𝜑 → (𝑄 + -((𝑀↑3) / (𝑈↑3))) ∈ ℂ)
5958addid2d 11106 . . . . . . . 8 (𝜑 → (0 + (𝑄 + -((𝑀↑3) / (𝑈↑3)))) = (𝑄 + -((𝑀↑3) / (𝑈↑3))))
6057, 59eqtrd 2778 . . . . . . 7 (𝜑 → ((-(𝑃 · 𝑋) + (𝑃 · 𝑋)) + (𝑄 + -((𝑀↑3) / (𝑈↑3)))) = (𝑄 + -((𝑀↑3) / (𝑈↑3))))
6133, 53, 603eqtr3d 2786 . . . . . 6 (𝜑 → ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄)) = (𝑄 + -((𝑀↑3) / (𝑈↑3))))
6213, 4mulcld 10926 . . . . . . 7 (𝜑 → (𝑄 · (𝑈↑3)) ∈ ℂ)
6362, 23, 4, 10divsubdird 11720 . . . . . 6 (𝜑 → (((𝑄 · (𝑈↑3)) − (𝑀↑3)) / (𝑈↑3)) = (((𝑄 · (𝑈↑3)) / (𝑈↑3)) − ((𝑀↑3) / (𝑈↑3))))
6428, 61, 633eqtr4d 2788 . . . . 5 (𝜑 → ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄)) = (((𝑄 · (𝑈↑3)) − (𝑀↑3)) / (𝑈↑3)))
6512, 64oveq12d 7273 . . . 4 (𝜑 → ((𝑈↑3) + ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄))) = ((((𝑈↑3)↑2) / (𝑈↑3)) + (((𝑄 · (𝑈↑3)) − (𝑀↑3)) / (𝑈↑3))))
661, 37negsubd 11268 . . . . . . . . . 10 (𝜑 → (𝑈 + -(𝑀 / 𝑈)) = (𝑈 − (𝑀 / 𝑈)))
6735, 66eqtr4d 2781 . . . . . . . . 9 (𝜑𝑋 = (𝑈 + -(𝑀 / 𝑈)))
6867oveq1d 7270 . . . . . . . 8 (𝜑 → (𝑋↑3) = ((𝑈 + -(𝑀 / 𝑈))↑3))
6937negcld 11249 . . . . . . . . 9 (𝜑 → -(𝑀 / 𝑈) ∈ ℂ)
70 binom3 13867 . . . . . . . . 9 ((𝑈 ∈ ℂ ∧ -(𝑀 / 𝑈) ∈ ℂ) → ((𝑈 + -(𝑀 / 𝑈))↑3) = (((𝑈↑3) + (3 · ((𝑈↑2) · -(𝑀 / 𝑈)))) + ((3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) + (-(𝑀 / 𝑈)↑3))))
711, 69, 70syl2anc 583 . . . . . . . 8 (𝜑 → ((𝑈 + -(𝑀 / 𝑈))↑3) = (((𝑈↑3) + (3 · ((𝑈↑2) · -(𝑀 / 𝑈)))) + ((3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) + (-(𝑀 / 𝑈)↑3))))
721sqcld 13790 . . . . . . . . . . . . . 14 (𝜑 → (𝑈↑2) ∈ ℂ)
7372, 37mulneg2d 11359 . . . . . . . . . . . . 13 (𝜑 → ((𝑈↑2) · -(𝑀 / 𝑈)) = -((𝑈↑2) · (𝑀 / 𝑈)))
7472, 21, 1, 7div12d 11717 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑈↑2) · (𝑀 / 𝑈)) = (𝑀 · ((𝑈↑2) / 𝑈)))
751sqvald 13789 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑈↑2) = (𝑈 · 𝑈))
7675oveq1d 7270 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑈↑2) / 𝑈) = ((𝑈 · 𝑈) / 𝑈))
771, 1, 7divcan4d 11687 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑈 · 𝑈) / 𝑈) = 𝑈)
7876, 77eqtrd 2778 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑈↑2) / 𝑈) = 𝑈)
7978oveq2d 7271 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 · ((𝑈↑2) / 𝑈)) = (𝑀 · 𝑈))
8074, 79eqtrd 2778 . . . . . . . . . . . . . 14 (𝜑 → ((𝑈↑2) · (𝑀 / 𝑈)) = (𝑀 · 𝑈))
8180negeqd 11145 . . . . . . . . . . . . 13 (𝜑 → -((𝑈↑2) · (𝑀 / 𝑈)) = -(𝑀 · 𝑈))
8273, 81eqtrd 2778 . . . . . . . . . . . 12 (𝜑 → ((𝑈↑2) · -(𝑀 / 𝑈)) = -(𝑀 · 𝑈))
8382oveq2d 7271 . . . . . . . . . . 11 (𝜑 → (3 · ((𝑈↑2) · -(𝑀 / 𝑈))) = (3 · -(𝑀 · 𝑈)))
8421, 1mulcld 10926 . . . . . . . . . . . 12 (𝜑 → (𝑀 · 𝑈) ∈ ℂ)
8517, 84mulneg2d 11359 . . . . . . . . . . 11 (𝜑 → (3 · -(𝑀 · 𝑈)) = -(3 · (𝑀 · 𝑈)))
8617, 21, 1mulassd 10929 . . . . . . . . . . . . 13 (𝜑 → ((3 · 𝑀) · 𝑈) = (3 · (𝑀 · 𝑈)))
8714oveq2d 7271 . . . . . . . . . . . . . . 15 (𝜑 → (3 · 𝑀) = (3 · (𝑃 / 3)))
8815, 17, 19divcan2d 11683 . . . . . . . . . . . . . . 15 (𝜑 → (3 · (𝑃 / 3)) = 𝑃)
8987, 88eqtrd 2778 . . . . . . . . . . . . . 14 (𝜑 → (3 · 𝑀) = 𝑃)
9089oveq1d 7270 . . . . . . . . . . . . 13 (𝜑 → ((3 · 𝑀) · 𝑈) = (𝑃 · 𝑈))
9186, 90eqtr3d 2780 . . . . . . . . . . . 12 (𝜑 → (3 · (𝑀 · 𝑈)) = (𝑃 · 𝑈))
9291negeqd 11145 . . . . . . . . . . 11 (𝜑 → -(3 · (𝑀 · 𝑈)) = -(𝑃 · 𝑈))
9383, 85, 923eqtrd 2782 . . . . . . . . . 10 (𝜑 → (3 · ((𝑈↑2) · -(𝑀 / 𝑈))) = -(𝑃 · 𝑈))
9493oveq2d 7271 . . . . . . . . 9 (𝜑 → ((𝑈↑3) + (3 · ((𝑈↑2) · -(𝑀 / 𝑈)))) = ((𝑈↑3) + -(𝑃 · 𝑈)))
95 sqneg 13764 . . . . . . . . . . . . . . . 16 ((𝑀 / 𝑈) ∈ ℂ → (-(𝑀 / 𝑈)↑2) = ((𝑀 / 𝑈)↑2))
9637, 95syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (-(𝑀 / 𝑈)↑2) = ((𝑀 / 𝑈)↑2))
9737sqvald 13789 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑀 / 𝑈)↑2) = ((𝑀 / 𝑈) · (𝑀 / 𝑈)))
9896, 97eqtrd 2778 . . . . . . . . . . . . . 14 (𝜑 → (-(𝑀 / 𝑈)↑2) = ((𝑀 / 𝑈) · (𝑀 / 𝑈)))
9998oveq2d 7271 . . . . . . . . . . . . 13 (𝜑 → (𝑈 · (-(𝑀 / 𝑈)↑2)) = (𝑈 · ((𝑀 / 𝑈) · (𝑀 / 𝑈))))
1001, 37, 37mulassd 10929 . . . . . . . . . . . . 13 (𝜑 → ((𝑈 · (𝑀 / 𝑈)) · (𝑀 / 𝑈)) = (𝑈 · ((𝑀 / 𝑈) · (𝑀 / 𝑈))))
10121, 1, 7divcan2d 11683 . . . . . . . . . . . . . 14 (𝜑 → (𝑈 · (𝑀 / 𝑈)) = 𝑀)
102101oveq1d 7270 . . . . . . . . . . . . 13 (𝜑 → ((𝑈 · (𝑀 / 𝑈)) · (𝑀 / 𝑈)) = (𝑀 · (𝑀 / 𝑈)))
10399, 100, 1023eqtr2d 2784 . . . . . . . . . . . 12 (𝜑 → (𝑈 · (-(𝑀 / 𝑈)↑2)) = (𝑀 · (𝑀 / 𝑈)))
104103oveq2d 7271 . . . . . . . . . . 11 (𝜑 → (3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) = (3 · (𝑀 · (𝑀 / 𝑈))))
10517, 21, 37mulassd 10929 . . . . . . . . . . 11 (𝜑 → ((3 · 𝑀) · (𝑀 / 𝑈)) = (3 · (𝑀 · (𝑀 / 𝑈))))
10689oveq1d 7270 . . . . . . . . . . 11 (𝜑 → ((3 · 𝑀) · (𝑀 / 𝑈)) = (𝑃 · (𝑀 / 𝑈)))
107104, 105, 1063eqtr2d 2784 . . . . . . . . . 10 (𝜑 → (3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) = (𝑃 · (𝑀 / 𝑈)))
108 3nn 11982 . . . . . . . . . . . . 13 3 ∈ ℕ
109108a1i 11 . . . . . . . . . . . 12 (𝜑 → 3 ∈ ℕ)
110 n2dvds3 16008 . . . . . . . . . . . . 13 ¬ 2 ∥ 3
111110a1i 11 . . . . . . . . . . . 12 (𝜑 → ¬ 2 ∥ 3)
112 oexpneg 15982 . . . . . . . . . . . 12 (((𝑀 / 𝑈) ∈ ℂ ∧ 3 ∈ ℕ ∧ ¬ 2 ∥ 3) → (-(𝑀 / 𝑈)↑3) = -((𝑀 / 𝑈)↑3))
11337, 109, 111, 112syl3anc 1369 . . . . . . . . . . 11 (𝜑 → (-(𝑀 / 𝑈)↑3) = -((𝑀 / 𝑈)↑3))
1142a1i 11 . . . . . . . . . . . . 13 (𝜑 → 3 ∈ ℕ0)
11521, 1, 7, 114expdivd 13806 . . . . . . . . . . . 12 (𝜑 → ((𝑀 / 𝑈)↑3) = ((𝑀↑3) / (𝑈↑3)))
116115negeqd 11145 . . . . . . . . . . 11 (𝜑 → -((𝑀 / 𝑈)↑3) = -((𝑀↑3) / (𝑈↑3)))
117113, 116eqtrd 2778 . . . . . . . . . 10 (𝜑 → (-(𝑀 / 𝑈)↑3) = -((𝑀↑3) / (𝑈↑3)))
118107, 117oveq12d 7273 . . . . . . . . 9 (𝜑 → ((3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) + (-(𝑀 / 𝑈)↑3)) = ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))))
11994, 118oveq12d 7273 . . . . . . . 8 (𝜑 → (((𝑈↑3) + (3 · ((𝑈↑2) · -(𝑀 / 𝑈)))) + ((3 · (𝑈 · (-(𝑀 / 𝑈)↑2))) + (-(𝑀 / 𝑈)↑3))) = (((𝑈↑3) + -(𝑃 · 𝑈)) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))))
12068, 71, 1193eqtrd 2782 . . . . . . 7 (𝜑 → (𝑋↑3) = (((𝑈↑3) + -(𝑃 · 𝑈)) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))))
12150, 32addcld 10925 . . . . . . . 8 (𝜑 → ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))) ∈ ℂ)
1224, 49, 121addassd 10928 . . . . . . 7 (𝜑 → (((𝑈↑3) + -(𝑃 · 𝑈)) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) = ((𝑈↑3) + (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))))))
123120, 122eqtrd 2778 . . . . . 6 (𝜑 → (𝑋↑3) = ((𝑈↑3) + (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))))))
124123oveq1d 7270 . . . . 5 (𝜑 → ((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = (((𝑈↑3) + (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))))) + ((𝑃 · 𝑋) + 𝑄)))
12549, 121addcld 10925 . . . . . 6 (𝜑 → (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) ∈ ℂ)
12630, 13addcld 10925 . . . . . 6 (𝜑 → ((𝑃 · 𝑋) + 𝑄) ∈ ℂ)
1274, 125, 126addassd 10928 . . . . 5 (𝜑 → (((𝑈↑3) + (-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3))))) + ((𝑃 · 𝑋) + 𝑄)) = ((𝑈↑3) + ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄))))
128124, 127eqtrd 2778 . . . 4 (𝜑 → ((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = ((𝑈↑3) + ((-(𝑃 · 𝑈) + ((𝑃 · (𝑀 / 𝑈)) + -((𝑀↑3) / (𝑈↑3)))) + ((𝑃 · 𝑋) + 𝑄))))
1294sqcld 13790 . . . . 5 (𝜑 → ((𝑈↑3)↑2) ∈ ℂ)
13062, 23subcld 11262 . . . . 5 (𝜑 → ((𝑄 · (𝑈↑3)) − (𝑀↑3)) ∈ ℂ)
131129, 130, 4, 10divdird 11719 . . . 4 (𝜑 → ((((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) / (𝑈↑3)) = ((((𝑈↑3)↑2) / (𝑈↑3)) + (((𝑄 · (𝑈↑3)) − (𝑀↑3)) / (𝑈↑3))))
13265, 128, 1313eqtr4d 2788 . . 3 (𝜑 → ((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = ((((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) / (𝑈↑3)))
133132eqeq1d 2740 . 2 (𝜑 → (((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = 0 ↔ ((((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) / (𝑈↑3)) = 0))
134129, 130addcld 10925 . . 3 (𝜑 → (((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) ∈ ℂ)
135134, 4, 10diveq0ad 11691 . 2 (𝜑 → (((((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) / (𝑈↑3)) = 0 ↔ (((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) = 0))
136133, 135bitrd 278 1 (𝜑 → (((𝑋↑3) + ((𝑃 · 𝑋) + 𝑄)) = 0 ↔ (((𝑈↑3)↑2) + ((𝑄 · (𝑈↑3)) − (𝑀↑3))) = 0))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205   = wceq 1539  wcel 2108  wne 2942   class class class wbr 5070  (class class class)co 7255  cc 10800  0cc0 10802   + caddc 10805   · cmul 10807  cmin 11135  -cneg 11136   / cdiv 11562  cn 11903  2c2 11958  3c3 11959  0cn0 12163  cz 12249  cexp 13710  cdvds 15891
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-er 8456  df-en 8692  df-dom 8693  df-sdom 8694  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-4 11968  df-n0 12164  df-z 12250  df-uz 12512  df-rp 12660  df-seq 13650  df-exp 13711  df-dvds 15892
This theorem is referenced by:  dcubic2  25899  dcubic1  25900
  Copyright terms: Public domain W3C validator