Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  constrrtcclem Structured version   Visualization version   GIF version

Theorem constrrtcclem 33773
Description: In the construction of constructible numbers, circle-circle intersections are roots of a quadratic equation. Case of non-degenerate circles. (Contributed by Thierry Arnoux, 6-Jul-2025.)
Hypotheses
Ref Expression
constrrtcc.s (𝜑𝑆 ⊆ ℂ)
constrrtcc.a (𝜑𝐴𝑆)
constrrtcc.b (𝜑𝐵𝑆)
constrrtcc.c (𝜑𝐶𝑆)
constrrtcc.d (𝜑𝐷𝑆)
constrrtcc.e (𝜑𝐸𝑆)
constrrtcc.f (𝜑𝐹𝑆)
constrrtcc.x (𝜑𝑋 ∈ ℂ)
constrrtcc.1 (𝜑𝐴𝐷)
constrrtcc.2 (𝜑 → (abs‘(𝑋𝐴)) = (abs‘(𝐵𝐶)))
constrrtcc.3 (𝜑 → (abs‘(𝑋𝐷)) = (abs‘(𝐸𝐹)))
constrrtcc.4 𝑃 = ((𝐵𝐶) · (∗‘(𝐵𝐶)))
constrrtcc.5 𝑄 = ((𝐸𝐹) · (∗‘(𝐸𝐹)))
constrrtcc.m 𝑀 = (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴)))
constrrtcc.n 𝑁 = -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴)))
constrrtcclem.1 (𝜑𝐵𝐶)
constrrtcclem.2 (𝜑𝐸𝐹)
Assertion
Ref Expression
constrrtcclem (𝜑 → ((𝑋↑2) + ((𝑀 · 𝑋) + 𝑁)) = 0)

Proof of Theorem constrrtcclem
StepHypRef Expression
1 constrrtcc.x . . . 4 (𝜑𝑋 ∈ ℂ)
21sqcld 14167 . . 3 (𝜑 → (𝑋↑2) ∈ ℂ)
3 constrrtcc.m . . . . 5 𝑀 = (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴)))
4 constrrtcc.5 . . . . . . . . 9 𝑄 = ((𝐸𝐹) · (∗‘(𝐸𝐹)))
5 constrrtcc.s . . . . . . . . . . . 12 (𝜑𝑆 ⊆ ℂ)
6 constrrtcc.e . . . . . . . . . . . 12 (𝜑𝐸𝑆)
75, 6sseldd 3964 . . . . . . . . . . 11 (𝜑𝐸 ∈ ℂ)
8 constrrtcc.f . . . . . . . . . . . 12 (𝜑𝐹𝑆)
95, 8sseldd 3964 . . . . . . . . . . 11 (𝜑𝐹 ∈ ℂ)
107, 9subcld 11599 . . . . . . . . . 10 (𝜑 → (𝐸𝐹) ∈ ℂ)
1110cjcld 15220 . . . . . . . . . 10 (𝜑 → (∗‘(𝐸𝐹)) ∈ ℂ)
1210, 11mulcld 11260 . . . . . . . . 9 (𝜑 → ((𝐸𝐹) · (∗‘(𝐸𝐹))) ∈ ℂ)
134, 12eqeltrid 2839 . . . . . . . 8 (𝜑𝑄 ∈ ℂ)
14 constrrtcc.d . . . . . . . . . . 11 (𝜑𝐷𝑆)
155, 14sseldd 3964 . . . . . . . . . 10 (𝜑𝐷 ∈ ℂ)
1615cjcld 15220 . . . . . . . . 9 (𝜑 → (∗‘𝐷) ∈ ℂ)
17 constrrtcc.a . . . . . . . . . . 11 (𝜑𝐴𝑆)
185, 17sseldd 3964 . . . . . . . . . 10 (𝜑𝐴 ∈ ℂ)
1915, 18addcld 11259 . . . . . . . . 9 (𝜑 → (𝐷 + 𝐴) ∈ ℂ)
2016, 19mulcld 11260 . . . . . . . 8 (𝜑 → ((∗‘𝐷) · (𝐷 + 𝐴)) ∈ ℂ)
2113, 20subcld 11599 . . . . . . 7 (𝜑 → (𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) ∈ ℂ)
22 constrrtcc.4 . . . . . . . . 9 𝑃 = ((𝐵𝐶) · (∗‘(𝐵𝐶)))
23 constrrtcc.b . . . . . . . . . . . 12 (𝜑𝐵𝑆)
245, 23sseldd 3964 . . . . . . . . . . 11 (𝜑𝐵 ∈ ℂ)
25 constrrtcc.c . . . . . . . . . . . 12 (𝜑𝐶𝑆)
265, 25sseldd 3964 . . . . . . . . . . 11 (𝜑𝐶 ∈ ℂ)
2724, 26subcld 11599 . . . . . . . . . 10 (𝜑 → (𝐵𝐶) ∈ ℂ)
2827cjcld 15220 . . . . . . . . . 10 (𝜑 → (∗‘(𝐵𝐶)) ∈ ℂ)
2927, 28mulcld 11260 . . . . . . . . 9 (𝜑 → ((𝐵𝐶) · (∗‘(𝐵𝐶))) ∈ ℂ)
3022, 29eqeltrid 2839 . . . . . . . 8 (𝜑𝑃 ∈ ℂ)
3118cjcld 15220 . . . . . . . . 9 (𝜑 → (∗‘𝐴) ∈ ℂ)
3231, 19mulcld 11260 . . . . . . . 8 (𝜑 → ((∗‘𝐴) · (𝐷 + 𝐴)) ∈ ℂ)
3330, 32subcld 11599 . . . . . . 7 (𝜑 → (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) ∈ ℂ)
3421, 33subcld 11599 . . . . . 6 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) ∈ ℂ)
3516, 31subcld 11599 . . . . . 6 (𝜑 → ((∗‘𝐷) − (∗‘𝐴)) ∈ ℂ)
3615, 18cjsubd 32725 . . . . . . 7 (𝜑 → (∗‘(𝐷𝐴)) = ((∗‘𝐷) − (∗‘𝐴)))
3715, 18subcld 11599 . . . . . . . 8 (𝜑 → (𝐷𝐴) ∈ ℂ)
38 constrrtcc.1 . . . . . . . . . 10 (𝜑𝐴𝐷)
3938necomd 2988 . . . . . . . . 9 (𝜑𝐷𝐴)
4015, 18, 39subne0d 11608 . . . . . . . 8 (𝜑 → (𝐷𝐴) ≠ 0)
4137, 40cjne0d 15227 . . . . . . 7 (𝜑 → (∗‘(𝐷𝐴)) ≠ 0)
4236, 41eqnetrrd 3001 . . . . . 6 (𝜑 → ((∗‘𝐷) − (∗‘𝐴)) ≠ 0)
4334, 35, 42divcld 12022 . . . . 5 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
443, 43eqeltrid 2839 . . . 4 (𝜑𝑀 ∈ ℂ)
4544, 1mulcld 11260 . . 3 (𝜑 → (𝑀 · 𝑋) ∈ ℂ)
46 constrrtcc.n . . . 4 𝑁 = -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴)))
4715, 18mulcld 11260 . . . . . . . . 9 (𝜑 → (𝐷 · 𝐴) ∈ ℂ)
4831, 47mulcld 11260 . . . . . . . 8 (𝜑 → ((∗‘𝐴) · (𝐷 · 𝐴)) ∈ ℂ)
4930, 15mulcld 11260 . . . . . . . 8 (𝜑 → (𝑃 · 𝐷) ∈ ℂ)
5048, 49subcld 11599 . . . . . . 7 (𝜑 → (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) ∈ ℂ)
5116, 47mulcld 11260 . . . . . . . 8 (𝜑 → ((∗‘𝐷) · (𝐷 · 𝐴)) ∈ ℂ)
5213, 18mulcld 11260 . . . . . . . 8 (𝜑 → (𝑄 · 𝐴) ∈ ℂ)
5351, 52subcld 11599 . . . . . . 7 (𝜑 → (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴)) ∈ ℂ)
5450, 53subcld 11599 . . . . . 6 (𝜑 → ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) ∈ ℂ)
5554, 35, 42divcld 12022 . . . . 5 (𝜑 → (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
5655negcld 11586 . . . 4 (𝜑 → -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
5746, 56eqeltrid 2839 . . 3 (𝜑𝑁 ∈ ℂ)
582, 45, 57addassd 11262 . 2 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = ((𝑋↑2) + ((𝑀 · 𝑋) + 𝑁)))
5935, 2mulcld 11260 . . . . . . 7 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) ∈ ℂ)
6034, 1mulcld 11260 . . . . . . 7 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) ∈ ℂ)
6116, 31, 2subdird 11699 . . . . . . . . 9 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) = (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))))
6221, 33, 1subdird 11699 . . . . . . . . 9 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) = (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)))
6361, 62oveq12d 7428 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) = ((((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))))
6416, 2mulcld 11260 . . . . . . . . 9 (𝜑 → ((∗‘𝐷) · (𝑋↑2)) ∈ ℂ)
6521, 1mulcld 11260 . . . . . . . . 9 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) ∈ ℂ)
6631, 2mulcld 11260 . . . . . . . . 9 (𝜑 → ((∗‘𝐴) · (𝑋↑2)) ∈ ℂ)
6733, 1mulcld 11260 . . . . . . . . 9 (𝜑 → ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋) ∈ ℂ)
6864, 65, 66, 67addsub4d 11646 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))))
691, 18subcld 11599 . . . . . . . . . . . 12 (𝜑 → (𝑋𝐴) ∈ ℂ)
701, 15subcld 11599 . . . . . . . . . . . 12 (𝜑 → (𝑋𝐷) ∈ ℂ)
7169, 70mulcomd 11261 . . . . . . . . . . 11 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = ((𝑋𝐷) · (𝑋𝐴)))
7271oveq2d 7426 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))))
7369cjcld 15220 . . . . . . . . . . . . . . . . 17 (𝜑 → (∗‘(𝑋𝐴)) ∈ ℂ)
74 constrrtcc.2 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝑋𝐴)) = (abs‘(𝐵𝐶)))
75 constrrtcclem.1 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐵𝐶)
7624, 26, 75subne0d 11608 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐵𝐶) ≠ 0)
7727, 76absne0d 15471 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝐵𝐶)) ≠ 0)
7874, 77eqnetrd 3000 . . . . . . . . . . . . . . . . . 18 (𝜑 → (abs‘(𝑋𝐴)) ≠ 0)
7969abs00ad 15314 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴)) = 0 ↔ (𝑋𝐴) = 0))
8079necon3bid 2977 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((abs‘(𝑋𝐴)) ≠ 0 ↔ (𝑋𝐴) ≠ 0))
8178, 80mpbid 232 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋𝐴) ≠ 0)
8274oveq1d 7425 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴))↑2) = ((abs‘(𝐵𝐶))↑2))
8369absvalsqd 15466 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴))↑2) = ((𝑋𝐴) · (∗‘(𝑋𝐴))))
8427absvalsqd 15466 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝐵𝐶))↑2) = ((𝐵𝐶) · (∗‘(𝐵𝐶))))
8582, 83, 843eqtr3d 2779 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐴) · (∗‘(𝑋𝐴))) = ((𝐵𝐶) · (∗‘(𝐵𝐶))))
8685, 22eqtr4di 2789 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐴) · (∗‘(𝑋𝐴))) = 𝑃)
8769, 73, 81, 86mvllmuld 12078 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐴)) = (𝑃 / (𝑋𝐴)))
8887, 73eqeltrrd 2836 . . . . . . . . . . . . . . 15 (𝜑 → (𝑃 / (𝑋𝐴)) ∈ ℂ)
8931, 88addcld 11259 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) ∈ ℂ)
9089, 69, 70mulassd 11263 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · ((𝑋𝐴) · (𝑋𝐷))))
9130, 69, 81divcan1d 12023 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑃 / (𝑋𝐴)) · (𝑋𝐴)) = 𝑃)
9291oveq2d 7426 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) + ((𝑃 / (𝑋𝐴)) · (𝑋𝐴))) = (((∗‘𝐴) · (𝑋𝐴)) + 𝑃))
9331, 69, 88, 92joinlmuladdmuld 11267 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) = (((∗‘𝐴) · (𝑋𝐴)) + 𝑃))
9493oveq1d 7425 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = ((((∗‘𝐴) · (𝑋𝐴)) + 𝑃) · (𝑋𝐷)))
9531, 69mulcld 11260 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐴) · (𝑋𝐴)) ∈ ℂ)
9695, 30, 70adddird 11265 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) · (𝑋𝐴)) + 𝑃) · (𝑋𝐷)) = ((((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) + (𝑃 · (𝑋𝐷))))
9731, 69, 70mulassd 11263 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) = ((∗‘𝐴) · ((𝑋𝐴) · (𝑋𝐷))))
981, 18, 1, 15mulsubd 11701 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = (((𝑋 · 𝑋) + (𝐷 · 𝐴)) − ((𝑋 · 𝐷) + (𝑋 · 𝐴))))
991sqvald 14166 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑋↑2) = (𝑋 · 𝑋))
10099oveq1d 7425 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑋↑2) + (𝐷 · 𝐴)) = ((𝑋 · 𝑋) + (𝐷 · 𝐴)))
1011, 15, 18adddid 11264 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑋 · (𝐷 + 𝐴)) = ((𝑋 · 𝐷) + (𝑋 · 𝐴)))
102100, 101oveq12d 7428 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((𝑋↑2) + (𝐷 · 𝐴)) − (𝑋 · (𝐷 + 𝐴))) = (((𝑋 · 𝑋) + (𝐷 · 𝐴)) − ((𝑋 · 𝐷) + (𝑋 · 𝐴))))
1031, 19mulcld 11260 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑋 · (𝐷 + 𝐴)) ∈ ℂ)
1042, 47, 103addsubd 11620 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((𝑋↑2) + (𝐷 · 𝐴)) − (𝑋 · (𝐷 + 𝐴))) = (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴)))
10598, 102, 1043eqtr2d 2777 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴)))
106105oveq2d 7426 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐴) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))))
1072, 103subcld 11599 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) ∈ ℂ)
10831, 107, 47adddid 11264 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))) = (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))))
10997, 106, 1083eqtrd 2775 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) = (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))))
11030, 1, 15subdid 11698 . . . . . . . . . . . . . . 15 (𝜑 → (𝑃 · (𝑋𝐷)) = ((𝑃 · 𝑋) − (𝑃 · 𝐷)))
111109, 110oveq12d 7428 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) + (𝑃 · (𝑋𝐷))) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
11294, 96, 1113eqtrd 2775 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
1131, 18cjsubd 32725 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐴)) = ((∗‘𝑋) − (∗‘𝐴)))
114113, 87eqtr3d 2773 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝑋) − (∗‘𝐴)) = (𝑃 / (𝑋𝐴)))
1151cjcld 15220 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘𝑋) ∈ ℂ)
116115, 31, 88subaddd 11617 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝑋) − (∗‘𝐴)) = (𝑃 / (𝑋𝐴)) ↔ ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) = (∗‘𝑋)))
117114, 116mpbid 232 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) = (∗‘𝑋))
118117oveq1d 7425 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))))
11990, 112, 1183eqtr3rd 2780 . . . . . . . . . . . 12 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
12031, 107mulcld 11260 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) ∈ ℂ)
121120, 48addcld 11259 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) ∈ ℂ)
12230, 1mulcld 11260 . . . . . . . . . . . . 13 (𝜑 → (𝑃 · 𝑋) ∈ ℂ)
123121, 122, 49addsubassd 11619 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) − (𝑃 · 𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
124120, 48, 122add32d 11468 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))))
125124oveq1d 7425 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) − (𝑃 · 𝐷)) = (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)))
126119, 123, 1253eqtr2d 2777 . . . . . . . . . . 11 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)))
127120, 122addcld 11259 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) ∈ ℂ)
128127, 48, 49addsubassd 11619 . . . . . . . . . . 11 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
12932, 1mulcld 11260 . . . . . . . . . . . . . 14 (𝜑 → (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋) ∈ ℂ)
13066, 129, 122subadd23d 11621 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)) + (𝑃 · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))))
13131, 2, 103subdid 11698 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴)))))
13231, 1, 19mul12d 11449 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴))) = (𝑋 · ((∗‘𝐴) · (𝐷 + 𝐴))))
1331, 32mulcomd 11261 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋 · ((∗‘𝐴) · (𝐷 + 𝐴))) = (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))
134132, 133eqtrd 2771 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴))) = (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))
135134oveq2d 7426 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
136131, 135eqtrd 2771 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
137136oveq1d 7425 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) = ((((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)) + (𝑃 · 𝑋)))
13830, 32, 1subdird 11699 . . . . . . . . . . . . . 14 (𝜑 → ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋) = ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
139138oveq2d 7426 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))))
140130, 137, 1393eqtr4d 2781 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)))
141140oveq1d 7425 . . . . . . . . . . 11 (𝜑 → ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
142126, 128, 1413eqtrd 2775 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
14370cjcld 15220 . . . . . . . . . . . . . . . . 17 (𝜑 → (∗‘(𝑋𝐷)) ∈ ℂ)
144 constrrtcc.3 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝑋𝐷)) = (abs‘(𝐸𝐹)))
145 constrrtcclem.2 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐸𝐹)
1467, 9, 145subne0d 11608 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐸𝐹) ≠ 0)
14710, 146absne0d 15471 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝐸𝐹)) ≠ 0)
148144, 147eqnetrd 3000 . . . . . . . . . . . . . . . . . 18 (𝜑 → (abs‘(𝑋𝐷)) ≠ 0)
14970abs00ad 15314 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷)) = 0 ↔ (𝑋𝐷) = 0))
150149necon3bid 2977 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((abs‘(𝑋𝐷)) ≠ 0 ↔ (𝑋𝐷) ≠ 0))
151148, 150mpbid 232 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋𝐷) ≠ 0)
152144oveq1d 7425 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷))↑2) = ((abs‘(𝐸𝐹))↑2))
15370absvalsqd 15466 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷))↑2) = ((𝑋𝐷) · (∗‘(𝑋𝐷))))
15410absvalsqd 15466 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝐸𝐹))↑2) = ((𝐸𝐹) · (∗‘(𝐸𝐹))))
155152, 153, 1543eqtr3d 2779 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐷) · (∗‘(𝑋𝐷))) = ((𝐸𝐹) · (∗‘(𝐸𝐹))))
156155, 4eqtr4di 2789 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐷) · (∗‘(𝑋𝐷))) = 𝑄)
15770, 143, 151, 156mvllmuld 12078 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐷)) = (𝑄 / (𝑋𝐷)))
158157, 143eqeltrrd 2836 . . . . . . . . . . . . . . 15 (𝜑 → (𝑄 / (𝑋𝐷)) ∈ ℂ)
15916, 158addcld 11259 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) ∈ ℂ)
160159, 70, 69mulassd 11263 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · ((𝑋𝐷) · (𝑋𝐴))))
16113, 70, 151divcan1d 12023 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑄 / (𝑋𝐷)) · (𝑋𝐷)) = 𝑄)
162161oveq2d 7426 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) + ((𝑄 / (𝑋𝐷)) · (𝑋𝐷))) = (((∗‘𝐷) · (𝑋𝐷)) + 𝑄))
16316, 70, 158, 162joinlmuladdmuld 11267 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) = (((∗‘𝐷) · (𝑋𝐷)) + 𝑄))
164163oveq1d 7425 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = ((((∗‘𝐷) · (𝑋𝐷)) + 𝑄) · (𝑋𝐴)))
16516, 70mulcld 11260 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐷) · (𝑋𝐷)) ∈ ℂ)
166165, 13, 69adddird 11265 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) · (𝑋𝐷)) + 𝑄) · (𝑋𝐴)) = ((((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) + (𝑄 · (𝑋𝐴))))
16716, 70, 69mulassd 11263 . . . . . . . . . . . . . . . . 17 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = ((∗‘𝐷) · ((𝑋𝐷) · (𝑋𝐴))))
16871oveq2d 7426 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐷) · ((𝑋𝐷) · (𝑋𝐴))))
169167, 168eqtr4d 2774 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))))
170105oveq2d 7426 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐷) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))))
17116, 107, 47adddid 11264 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))) = (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))))
172169, 170, 1713eqtrd 2775 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))))
17313, 1, 18subdid 11698 . . . . . . . . . . . . . . 15 (𝜑 → (𝑄 · (𝑋𝐴)) = ((𝑄 · 𝑋) − (𝑄 · 𝐴)))
174172, 173oveq12d 7428 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) + (𝑄 · (𝑋𝐴))) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
175164, 166, 1743eqtrd 2775 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
1761, 15cjsubd 32725 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐷)) = ((∗‘𝑋) − (∗‘𝐷)))
177176, 157eqtr3d 2773 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝑋) − (∗‘𝐷)) = (𝑄 / (𝑋𝐷)))
178115, 16, 158subaddd 11617 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝑋) − (∗‘𝐷)) = (𝑄 / (𝑋𝐷)) ↔ ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) = (∗‘𝑋)))
179177, 178mpbid 232 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) = (∗‘𝑋))
180179oveq1d 7425 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · ((𝑋𝐷) · (𝑋𝐴))) = ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))))
181160, 175, 1803eqtr3rd 2780 . . . . . . . . . . . 12 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
18216, 107mulcld 11260 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) ∈ ℂ)
183182, 51addcld 11259 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) ∈ ℂ)
18413, 1mulcld 11260 . . . . . . . . . . . . 13 (𝜑 → (𝑄 · 𝑋) ∈ ℂ)
185183, 184, 52addsubassd 11619 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) − (𝑄 · 𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
186182, 51, 184add32d 11468 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))))
187186oveq1d 7425 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) − (𝑄 · 𝐴)) = (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)))
188181, 185, 1873eqtr2d 2777 . . . . . . . . . . 11 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)))
189182, 184addcld 11259 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) ∈ ℂ)
190189, 51, 52addsubassd 11619 . . . . . . . . . . 11 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
19120, 1mulcld 11260 . . . . . . . . . . . . . 14 (𝜑 → (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋) ∈ ℂ)
19264, 191, 184subadd23d 11621 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)) + (𝑄 · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))))
19316, 2, 103subdid 11698 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴)))))
19416, 1, 19mul12d 11449 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴))) = (𝑋 · ((∗‘𝐷) · (𝐷 + 𝐴))))
1951, 20mulcomd 11261 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋 · ((∗‘𝐷) · (𝐷 + 𝐴))) = (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))
196194, 195eqtrd 2771 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴))) = (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))
197196oveq2d 7426 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
198193, 197eqtrd 2771 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
199198oveq1d 7425 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) = ((((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)) + (𝑄 · 𝑋)))
20013, 20, 1subdird 11699 . . . . . . . . . . . . . 14 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) = ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
201200oveq2d 7426 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))))
202192, 199, 2013eqtr4d 2781 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)))
203202oveq1d 7425 . . . . . . . . . . 11 (𝜑 → ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
204188, 190, 2033eqtrd 2775 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
20572, 142, 2043eqtr3d 2779 . . . . . . . . 9 (𝜑 → ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
206140, 127eqeltrrd 2836 . . . . . . . . . 10 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) ∈ ℂ)
207202, 189eqeltrrd 2836 . . . . . . . . . 10 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) ∈ ℂ)
208206, 50, 207, 53addsubeq4d 11650 . . . . . . . . 9 (𝜑 → (((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) ↔ ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴)))))
209205, 208mpbid 232 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
21063, 68, 2093eqtr2d 2777 . . . . . . 7 (𝜑 → ((((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
21159, 60, 210mvlraddd 11652 . . . . . 6 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) = (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)))
21235, 2, 42, 211mvllmuld 12078 . . . . 5 (𝜑 → (𝑋↑2) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))))
21354, 60, 35, 42divsubdird 12061 . . . . . 6 (𝜑 → ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
21446eqcomi 2745 . . . . . . . . 9 -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) = 𝑁
215214a1i 11 . . . . . . . 8 (𝜑 → -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) = 𝑁)
21655, 215negcon1ad 11594 . . . . . . 7 (𝜑 → -𝑁 = (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))))
217216oveq1d 7425 . . . . . 6 (𝜑 → (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
218213, 217eqtr4d 2774 . . . . 5 (𝜑 → ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))) = (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
21934, 1, 35, 42div23d 12059 . . . . . . 7 (𝜑 → ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴))) = ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) · 𝑋))
2203oveq1i 7420 . . . . . . 7 (𝑀 · 𝑋) = ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) · 𝑋)
221219, 220eqtr4di 2789 . . . . . 6 (𝜑 → ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴))) = (𝑀 · 𝑋))
222221oveq2d 7426 . . . . 5 (𝜑 → (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))) = (-𝑁 − (𝑀 · 𝑋)))
223212, 218, 2223eqtrd 2775 . . . 4 (𝜑 → (𝑋↑2) = (-𝑁 − (𝑀 · 𝑋)))
224216, 55eqeltrd 2835 . . . . 5 (𝜑 → -𝑁 ∈ ℂ)
2252, 45, 224addlsub 11658 . . . 4 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁 ↔ (𝑋↑2) = (-𝑁 − (𝑀 · 𝑋))))
226223, 225mpbird 257 . . 3 (𝜑 → ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁)
2272, 45addcld 11259 . . . 4 (𝜑 → ((𝑋↑2) + (𝑀 · 𝑋)) ∈ ℂ)
228 addeq0 11665 . . . 4 ((((𝑋↑2) + (𝑀 · 𝑋)) ∈ ℂ ∧ 𝑁 ∈ ℂ) → ((((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0 ↔ ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁))
229227, 57, 228syl2anc 584 . . 3 (𝜑 → ((((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0 ↔ ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁))
230226, 229mpbird 257 . 2 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0)
23158, 230eqtr3d 2773 1 (𝜑 → ((𝑋↑2) + ((𝑀 · 𝑋) + 𝑁)) = 0)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206   = wceq 1540  wcel 2109  wne 2933  wss 3931  cfv 6536  (class class class)co 7410  cc 11132  0cc0 11134   + caddc 11137   · cmul 11139  cmin 11471  -cneg 11472   / cdiv 11899  2c2 12300  cexp 14084  ccj 15120  abscabs 15258
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2708  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211  ax-pre-sup 11212
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4889  df-iun 4974  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7867  df-2nd 7994  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-er 8724  df-en 8965  df-dom 8966  df-sdom 8967  df-sup 9459  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-div 11900  df-nn 12246  df-2 12308  df-3 12309  df-n0 12507  df-z 12594  df-uz 12858  df-rp 13014  df-seq 14025  df-exp 14085  df-cj 15123  df-re 15124  df-im 15125  df-sqrt 15259  df-abs 15260
This theorem is referenced by:  constrrtcc  33774
  Copyright terms: Public domain W3C validator