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 33927
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 14098 . . 3 (𝜑 → (𝑋↑2) ∈ ℂ)
3 constrrtcc.m . . . . 5 𝑀 = (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴)))
4 constrrtcc.5 . . . . . . . . 9 𝑄 = ((𝐸𝐹) · (∗‘(𝐸𝐹)))
5 constrrtcc.s . . . . . . . . . . . 12 (𝜑𝑆 ⊆ ℂ)
6 constrrtcc.e . . . . . . . . . . . 12 (𝜑𝐸𝑆)
75, 6sseldd 3916 . . . . . . . . . . 11 (𝜑𝐸 ∈ ℂ)
8 constrrtcc.f . . . . . . . . . . . 12 (𝜑𝐹𝑆)
95, 8sseldd 3916 . . . . . . . . . . 11 (𝜑𝐹 ∈ ℂ)
107, 9subcld 11497 . . . . . . . . . 10 (𝜑 → (𝐸𝐹) ∈ ℂ)
1110cjcld 15150 . . . . . . . . . 10 (𝜑 → (∗‘(𝐸𝐹)) ∈ ℂ)
1210, 11mulcld 11157 . . . . . . . . 9 (𝜑 → ((𝐸𝐹) · (∗‘(𝐸𝐹))) ∈ ℂ)
134, 12eqeltrid 2843 . . . . . . . 8 (𝜑𝑄 ∈ ℂ)
14 constrrtcc.d . . . . . . . . . . 11 (𝜑𝐷𝑆)
155, 14sseldd 3916 . . . . . . . . . 10 (𝜑𝐷 ∈ ℂ)
1615cjcld 15150 . . . . . . . . 9 (𝜑 → (∗‘𝐷) ∈ ℂ)
17 constrrtcc.a . . . . . . . . . . 11 (𝜑𝐴𝑆)
185, 17sseldd 3916 . . . . . . . . . 10 (𝜑𝐴 ∈ ℂ)
1915, 18addcld 11156 . . . . . . . . 9 (𝜑 → (𝐷 + 𝐴) ∈ ℂ)
2016, 19mulcld 11157 . . . . . . . 8 (𝜑 → ((∗‘𝐷) · (𝐷 + 𝐴)) ∈ ℂ)
2113, 20subcld 11497 . . . . . . 7 (𝜑 → (𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) ∈ ℂ)
22 constrrtcc.4 . . . . . . . . 9 𝑃 = ((𝐵𝐶) · (∗‘(𝐵𝐶)))
23 constrrtcc.b . . . . . . . . . . . 12 (𝜑𝐵𝑆)
245, 23sseldd 3916 . . . . . . . . . . 11 (𝜑𝐵 ∈ ℂ)
25 constrrtcc.c . . . . . . . . . . . 12 (𝜑𝐶𝑆)
265, 25sseldd 3916 . . . . . . . . . . 11 (𝜑𝐶 ∈ ℂ)
2724, 26subcld 11497 . . . . . . . . . 10 (𝜑 → (𝐵𝐶) ∈ ℂ)
2827cjcld 15150 . . . . . . . . . 10 (𝜑 → (∗‘(𝐵𝐶)) ∈ ℂ)
2927, 28mulcld 11157 . . . . . . . . 9 (𝜑 → ((𝐵𝐶) · (∗‘(𝐵𝐶))) ∈ ℂ)
3022, 29eqeltrid 2843 . . . . . . . 8 (𝜑𝑃 ∈ ℂ)
3118cjcld 15150 . . . . . . . . 9 (𝜑 → (∗‘𝐴) ∈ ℂ)
3231, 19mulcld 11157 . . . . . . . 8 (𝜑 → ((∗‘𝐴) · (𝐷 + 𝐴)) ∈ ℂ)
3330, 32subcld 11497 . . . . . . 7 (𝜑 → (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) ∈ ℂ)
3421, 33subcld 11497 . . . . . 6 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) ∈ ℂ)
3516, 31subcld 11497 . . . . . 6 (𝜑 → ((∗‘𝐷) − (∗‘𝐴)) ∈ ℂ)
3615, 18cjsubd 32835 . . . . . . 7 (𝜑 → (∗‘(𝐷𝐴)) = ((∗‘𝐷) − (∗‘𝐴)))
3715, 18subcld 11497 . . . . . . . 8 (𝜑 → (𝐷𝐴) ∈ ℂ)
38 constrrtcc.1 . . . . . . . . . 10 (𝜑𝐴𝐷)
3938necomd 2989 . . . . . . . . 9 (𝜑𝐷𝐴)
4015, 18, 39subne0d 11506 . . . . . . . 8 (𝜑 → (𝐷𝐴) ≠ 0)
4137, 40cjne0d 15157 . . . . . . 7 (𝜑 → (∗‘(𝐷𝐴)) ≠ 0)
4236, 41eqnetrrd 3002 . . . . . 6 (𝜑 → ((∗‘𝐷) − (∗‘𝐴)) ≠ 0)
4334, 35, 42divcld 11923 . . . . 5 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
443, 43eqeltrid 2843 . . . 4 (𝜑𝑀 ∈ ℂ)
4544, 1mulcld 11157 . . 3 (𝜑 → (𝑀 · 𝑋) ∈ ℂ)
46 constrrtcc.n . . . 4 𝑁 = -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴)))
4715, 18mulcld 11157 . . . . . . . . 9 (𝜑 → (𝐷 · 𝐴) ∈ ℂ)
4831, 47mulcld 11157 . . . . . . . 8 (𝜑 → ((∗‘𝐴) · (𝐷 · 𝐴)) ∈ ℂ)
4930, 15mulcld 11157 . . . . . . . 8 (𝜑 → (𝑃 · 𝐷) ∈ ℂ)
5048, 49subcld 11497 . . . . . . 7 (𝜑 → (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) ∈ ℂ)
5116, 47mulcld 11157 . . . . . . . 8 (𝜑 → ((∗‘𝐷) · (𝐷 · 𝐴)) ∈ ℂ)
5213, 18mulcld 11157 . . . . . . . 8 (𝜑 → (𝑄 · 𝐴) ∈ ℂ)
5351, 52subcld 11497 . . . . . . 7 (𝜑 → (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴)) ∈ ℂ)
5450, 53subcld 11497 . . . . . 6 (𝜑 → ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) ∈ ℂ)
5554, 35, 42divcld 11923 . . . . 5 (𝜑 → (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
5655negcld 11484 . . . 4 (𝜑 → -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) ∈ ℂ)
5746, 56eqeltrid 2843 . . 3 (𝜑𝑁 ∈ ℂ)
582, 45, 57addassd 11159 . 2 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = ((𝑋↑2) + ((𝑀 · 𝑋) + 𝑁)))
5935, 2mulcld 11157 . . . . . . 7 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) ∈ ℂ)
6034, 1mulcld 11157 . . . . . . 7 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) ∈ ℂ)
6116, 31, 2subdird 11599 . . . . . . . . 9 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) = (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))))
6221, 33, 1subdird 11599 . . . . . . . . 9 (𝜑 → (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) = (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)))
6361, 62oveq12d 7375 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) = ((((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))))
6416, 2mulcld 11157 . . . . . . . . 9 (𝜑 → ((∗‘𝐷) · (𝑋↑2)) ∈ ℂ)
6521, 1mulcld 11157 . . . . . . . . 9 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) ∈ ℂ)
6631, 2mulcld 11157 . . . . . . . . 9 (𝜑 → ((∗‘𝐴) · (𝑋↑2)) ∈ ℂ)
6733, 1mulcld 11157 . . . . . . . . 9 (𝜑 → ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋) ∈ ℂ)
6864, 65, 66, 67addsub4d 11544 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋↑2))) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) − ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))))
691, 18subcld 11497 . . . . . . . . . . . 12 (𝜑 → (𝑋𝐴) ∈ ℂ)
701, 15subcld 11497 . . . . . . . . . . . 12 (𝜑 → (𝑋𝐷) ∈ ℂ)
7169, 70mulcomd 11158 . . . . . . . . . . 11 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = ((𝑋𝐷) · (𝑋𝐴)))
7271oveq2d 7373 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))))
7369cjcld 15150 . . . . . . . . . . . . . . . . 17 (𝜑 → (∗‘(𝑋𝐴)) ∈ ℂ)
74 constrrtcc.2 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝑋𝐴)) = (abs‘(𝐵𝐶)))
75 constrrtcclem.1 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐵𝐶)
7624, 26, 75subne0d 11506 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐵𝐶) ≠ 0)
7727, 76absne0d 15404 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝐵𝐶)) ≠ 0)
7874, 77eqnetrd 3001 . . . . . . . . . . . . . . . . . 18 (𝜑 → (abs‘(𝑋𝐴)) ≠ 0)
7969abs00ad 15244 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴)) = 0 ↔ (𝑋𝐴) = 0))
8079necon3bid 2978 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((abs‘(𝑋𝐴)) ≠ 0 ↔ (𝑋𝐴) ≠ 0))
8178, 80mpbid 233 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋𝐴) ≠ 0)
8274oveq1d 7372 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴))↑2) = ((abs‘(𝐵𝐶))↑2))
8369absvalsqd 15399 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐴))↑2) = ((𝑋𝐴) · (∗‘(𝑋𝐴))))
8427absvalsqd 15399 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝐵𝐶))↑2) = ((𝐵𝐶) · (∗‘(𝐵𝐶))))
8582, 83, 843eqtr3d 2782 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐴) · (∗‘(𝑋𝐴))) = ((𝐵𝐶) · (∗‘(𝐵𝐶))))
8685, 22eqtr4di 2792 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐴) · (∗‘(𝑋𝐴))) = 𝑃)
8769, 73, 81, 86mvllmuld 11979 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐴)) = (𝑃 / (𝑋𝐴)))
8887, 73eqeltrrd 2840 . . . . . . . . . . . . . . 15 (𝜑 → (𝑃 / (𝑋𝐴)) ∈ ℂ)
8931, 88addcld 11156 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) ∈ ℂ)
9089, 69, 70mulassd 11160 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · ((𝑋𝐴) · (𝑋𝐷))))
9130, 69, 81divcan1d 11924 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑃 / (𝑋𝐴)) · (𝑋𝐴)) = 𝑃)
9291oveq2d 7373 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) + ((𝑃 / (𝑋𝐴)) · (𝑋𝐴))) = (((∗‘𝐴) · (𝑋𝐴)) + 𝑃))
9331, 69, 88, 92joinlmuladdmuld 11164 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) = (((∗‘𝐴) · (𝑋𝐴)) + 𝑃))
9493oveq1d 7372 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = ((((∗‘𝐴) · (𝑋𝐴)) + 𝑃) · (𝑋𝐷)))
9531, 69mulcld 11157 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐴) · (𝑋𝐴)) ∈ ℂ)
9695, 30, 70adddird 11162 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) · (𝑋𝐴)) + 𝑃) · (𝑋𝐷)) = ((((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) + (𝑃 · (𝑋𝐷))))
9731, 69, 70mulassd 11160 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) = ((∗‘𝐴) · ((𝑋𝐴) · (𝑋𝐷))))
981, 18, 1, 15mulsubd 11601 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = (((𝑋 · 𝑋) + (𝐷 · 𝐴)) − ((𝑋 · 𝐷) + (𝑋 · 𝐴))))
991sqvald 14097 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑋↑2) = (𝑋 · 𝑋))
10099oveq1d 7372 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑋↑2) + (𝐷 · 𝐴)) = ((𝑋 · 𝑋) + (𝐷 · 𝐴)))
1011, 15, 18adddid 11161 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑋 · (𝐷 + 𝐴)) = ((𝑋 · 𝐷) + (𝑋 · 𝐴)))
102100, 101oveq12d 7375 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((𝑋↑2) + (𝐷 · 𝐴)) − (𝑋 · (𝐷 + 𝐴))) = (((𝑋 · 𝑋) + (𝐷 · 𝐴)) − ((𝑋 · 𝐷) + (𝑋 · 𝐴))))
1031, 19mulcld 11157 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑋 · (𝐷 + 𝐴)) ∈ ℂ)
1042, 47, 103addsubd 11518 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((𝑋↑2) + (𝐷 · 𝐴)) − (𝑋 · (𝐷 + 𝐴))) = (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴)))
10598, 102, 1043eqtr2d 2780 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐴) · (𝑋𝐷)) = (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴)))
106105oveq2d 7373 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐴) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))))
1072, 103subcld 11497 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) ∈ ℂ)
10831, 107, 47adddid 11161 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))) = (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))))
10997, 106, 1083eqtrd 2778 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) = (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))))
11030, 1, 15subdid 11598 . . . . . . . . . . . . . . 15 (𝜑 → (𝑃 · (𝑋𝐷)) = ((𝑃 · 𝑋) − (𝑃 · 𝐷)))
111109, 110oveq12d 7375 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐴) · (𝑋𝐴)) · (𝑋𝐷)) + (𝑃 · (𝑋𝐷))) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
11294, 96, 1113eqtrd 2778 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · (𝑋𝐴)) · (𝑋𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
1131, 18cjsubd 32835 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐴)) = ((∗‘𝑋) − (∗‘𝐴)))
114113, 87eqtr3d 2776 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝑋) − (∗‘𝐴)) = (𝑃 / (𝑋𝐴)))
1151cjcld 15150 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘𝑋) ∈ ℂ)
116115, 31, 88subaddd 11515 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝑋) − (∗‘𝐴)) = (𝑃 / (𝑋𝐴)) ↔ ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) = (∗‘𝑋)))
117114, 116mpbid 233 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) + (𝑃 / (𝑋𝐴))) = (∗‘𝑋))
118117oveq1d 7372 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) + (𝑃 / (𝑋𝐴))) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))))
11990, 112, 1183eqtr3rd 2783 . . . . . . . . . . . 12 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
12031, 107mulcld 11157 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) ∈ ℂ)
121120, 48addcld 11156 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) ∈ ℂ)
12230, 1mulcld 11157 . . . . . . . . . . . . 13 (𝜑 → (𝑃 · 𝑋) ∈ ℂ)
123121, 122, 49addsubassd 11517 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) − (𝑃 · 𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + ((𝑃 · 𝑋) − (𝑃 · 𝐷))))
124120, 48, 122add32d 11366 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))))
125124oveq1d 7372 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐴) · (𝐷 · 𝐴))) + (𝑃 · 𝑋)) − (𝑃 · 𝐷)) = (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)))
126119, 123, 1253eqtr2d 2780 . . . . . . . . . . 11 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)))
127120, 122addcld 11156 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) ∈ ℂ)
128127, 48, 49addsubassd 11517 . . . . . . . . . . 11 (𝜑 → (((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + ((∗‘𝐴) · (𝐷 · 𝐴))) − (𝑃 · 𝐷)) = ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
12932, 1mulcld 11157 . . . . . . . . . . . . . 14 (𝜑 → (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋) ∈ ℂ)
13066, 129, 122subadd23d 11519 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)) + (𝑃 · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))))
13131, 2, 103subdid 11598 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴)))))
13231, 1, 19mul12d 11347 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴))) = (𝑋 · ((∗‘𝐴) · (𝐷 + 𝐴))))
1331, 32mulcomd 11158 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋 · ((∗‘𝐴) · (𝐷 + 𝐴))) = (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))
134132, 133eqtrd 2774 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴))) = (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))
135134oveq2d 7373 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) − ((∗‘𝐴) · (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
136131, 135eqtrd 2774 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
137136oveq1d 7372 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) = ((((∗‘𝐴) · (𝑋↑2)) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)) + (𝑃 · 𝑋)))
13830, 32, 1subdird 11599 . . . . . . . . . . . . . 14 (𝜑 → ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋) = ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋)))
139138oveq2d 7373 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 · 𝑋) − (((∗‘𝐴) · (𝐷 + 𝐴)) · 𝑋))))
140130, 137, 1393eqtr4d 2784 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) = (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)))
141140oveq1d 7372 . . . . . . . . . . 11 (𝜑 → ((((∗‘𝐴) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑃 · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
142126, 128, 1413eqtrd 2778 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐴) · (𝑋𝐷))) = ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))))
14370cjcld 15150 . . . . . . . . . . . . . . . . 17 (𝜑 → (∗‘(𝑋𝐷)) ∈ ℂ)
144 constrrtcc.3 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝑋𝐷)) = (abs‘(𝐸𝐹)))
145 constrrtcclem.2 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐸𝐹)
1467, 9, 145subne0d 11506 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐸𝐹) ≠ 0)
14710, 146absne0d 15404 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(𝐸𝐹)) ≠ 0)
148144, 147eqnetrd 3001 . . . . . . . . . . . . . . . . . 18 (𝜑 → (abs‘(𝑋𝐷)) ≠ 0)
14970abs00ad 15244 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷)) = 0 ↔ (𝑋𝐷) = 0))
150149necon3bid 2978 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((abs‘(𝑋𝐷)) ≠ 0 ↔ (𝑋𝐷) ≠ 0))
151148, 150mpbid 233 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋𝐷) ≠ 0)
152144oveq1d 7372 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷))↑2) = ((abs‘(𝐸𝐹))↑2))
15370absvalsqd 15399 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝑋𝐷))↑2) = ((𝑋𝐷) · (∗‘(𝑋𝐷))))
15410absvalsqd 15399 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((abs‘(𝐸𝐹))↑2) = ((𝐸𝐹) · (∗‘(𝐸𝐹))))
155152, 153, 1543eqtr3d 2782 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑋𝐷) · (∗‘(𝑋𝐷))) = ((𝐸𝐹) · (∗‘(𝐸𝐹))))
156155, 4eqtr4di 2792 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐷) · (∗‘(𝑋𝐷))) = 𝑄)
15770, 143, 151, 156mvllmuld 11979 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐷)) = (𝑄 / (𝑋𝐷)))
158157, 143eqeltrrd 2840 . . . . . . . . . . . . . . 15 (𝜑 → (𝑄 / (𝑋𝐷)) ∈ ℂ)
15916, 158addcld 11156 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) ∈ ℂ)
160159, 70, 69mulassd 11160 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · ((𝑋𝐷) · (𝑋𝐴))))
16113, 70, 151divcan1d 11924 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑄 / (𝑋𝐷)) · (𝑋𝐷)) = 𝑄)
162161oveq2d 7373 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) + ((𝑄 / (𝑋𝐷)) · (𝑋𝐷))) = (((∗‘𝐷) · (𝑋𝐷)) + 𝑄))
16316, 70, 158, 162joinlmuladdmuld 11164 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) = (((∗‘𝐷) · (𝑋𝐷)) + 𝑄))
164163oveq1d 7372 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = ((((∗‘𝐷) · (𝑋𝐷)) + 𝑄) · (𝑋𝐴)))
16516, 70mulcld 11157 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐷) · (𝑋𝐷)) ∈ ℂ)
166165, 13, 69adddird 11162 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) · (𝑋𝐷)) + 𝑄) · (𝑋𝐴)) = ((((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) + (𝑄 · (𝑋𝐴))))
16716, 70, 69mulassd 11160 . . . . . . . . . . . . . . . . 17 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = ((∗‘𝐷) · ((𝑋𝐷) · (𝑋𝐴))))
16871oveq2d 7373 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐷) · ((𝑋𝐷) · (𝑋𝐴))))
169167, 168eqtr4d 2777 . . . . . . . . . . . . . . . 16 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))))
170105oveq2d 7373 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · ((𝑋𝐴) · (𝑋𝐷))) = ((∗‘𝐷) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))))
17116, 107, 47adddid 11161 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · (((𝑋↑2) − (𝑋 · (𝐷 + 𝐴))) + (𝐷 · 𝐴))) = (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))))
172169, 170, 1713eqtrd 2778 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) = (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))))
17313, 1, 18subdid 11598 . . . . . . . . . . . . . . 15 (𝜑 → (𝑄 · (𝑋𝐴)) = ((𝑄 · 𝑋) − (𝑄 · 𝐴)))
174172, 173oveq12d 7375 . . . . . . . . . . . . . 14 (𝜑 → ((((∗‘𝐷) · (𝑋𝐷)) · (𝑋𝐴)) + (𝑄 · (𝑋𝐴))) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
175164, 166, 1743eqtrd 2778 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · (𝑋𝐷)) · (𝑋𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
1761, 15cjsubd 32835 . . . . . . . . . . . . . . . 16 (𝜑 → (∗‘(𝑋𝐷)) = ((∗‘𝑋) − (∗‘𝐷)))
177176, 157eqtr3d 2776 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝑋) − (∗‘𝐷)) = (𝑄 / (𝑋𝐷)))
178115, 16, 158subaddd 11515 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝑋) − (∗‘𝐷)) = (𝑄 / (𝑋𝐷)) ↔ ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) = (∗‘𝑋)))
179177, 178mpbid 233 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) + (𝑄 / (𝑋𝐷))) = (∗‘𝑋))
180179oveq1d 7372 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) + (𝑄 / (𝑋𝐷))) · ((𝑋𝐷) · (𝑋𝐴))) = ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))))
181160, 175, 1803eqtr3rd 2783 . . . . . . . . . . . 12 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
18216, 107mulcld 11157 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) ∈ ℂ)
183182, 51addcld 11156 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) ∈ ℂ)
18413, 1mulcld 11157 . . . . . . . . . . . . 13 (𝜑 → (𝑄 · 𝑋) ∈ ℂ)
185183, 184, 52addsubassd 11517 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) − (𝑄 · 𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + ((𝑄 · 𝑋) − (𝑄 · 𝐴))))
186182, 51, 184add32d 11366 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))))
187186oveq1d 7372 . . . . . . . . . . . 12 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + ((∗‘𝐷) · (𝐷 · 𝐴))) + (𝑄 · 𝑋)) − (𝑄 · 𝐴)) = (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)))
188181, 185, 1873eqtr2d 2780 . . . . . . . . . . 11 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)))
189182, 184addcld 11156 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) ∈ ℂ)
190189, 51, 52addsubassd 11517 . . . . . . . . . . 11 (𝜑 → (((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + ((∗‘𝐷) · (𝐷 · 𝐴))) − (𝑄 · 𝐴)) = ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
19120, 1mulcld 11157 . . . . . . . . . . . . . 14 (𝜑 → (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋) ∈ ℂ)
19264, 191, 184subadd23d 11519 . . . . . . . . . . . . 13 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)) + (𝑄 · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))))
19316, 2, 103subdid 11598 . . . . . . . . . . . . . . 15 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴)))))
19416, 1, 19mul12d 11347 . . . . . . . . . . . . . . . . 17 (𝜑 → ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴))) = (𝑋 · ((∗‘𝐷) · (𝐷 + 𝐴))))
1951, 20mulcomd 11158 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑋 · ((∗‘𝐷) · (𝐷 + 𝐴))) = (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))
196194, 195eqtrd 2774 . . . . . . . . . . . . . . . 16 (𝜑 → ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴))) = (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))
197196oveq2d 7373 . . . . . . . . . . . . . . 15 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) − ((∗‘𝐷) · (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
198193, 197eqtrd 2774 . . . . . . . . . . . . . 14 (𝜑 → ((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) = (((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
199198oveq1d 7372 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) = ((((∗‘𝐷) · (𝑋↑2)) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)) + (𝑄 · 𝑋)))
20013, 20, 1subdird 11599 . . . . . . . . . . . . . 14 (𝜑 → ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋) = ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋)))
201200oveq2d 7373 . . . . . . . . . . . . 13 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 · 𝑋) − (((∗‘𝐷) · (𝐷 + 𝐴)) · 𝑋))))
202192, 199, 2013eqtr4d 2784 . . . . . . . . . . . 12 (𝜑 → (((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) = (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)))
203202oveq1d 7372 . . . . . . . . . . 11 (𝜑 → ((((∗‘𝐷) · ((𝑋↑2) − (𝑋 · (𝐷 + 𝐴)))) + (𝑄 · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
204188, 190, 2033eqtrd 2778 . . . . . . . . . 10 (𝜑 → ((∗‘𝑋) · ((𝑋𝐷) · (𝑋𝐴))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
20572, 142, 2043eqtr3d 2782 . . . . . . . . 9 (𝜑 → ((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
206140, 127eqeltrrd 2840 . . . . . . . . . 10 (𝜑 → (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) ∈ ℂ)
207202, 189eqeltrrd 2840 . . . . . . . . . 10 (𝜑 → (((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) ∈ ℂ)
208206, 50, 207, 53addsubeq4d 11548 . . . . . . . . 9 (𝜑 → (((((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷))) = ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) + (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) ↔ ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴)))))
209205, 208mpbid 233 . . . . . . . 8 (𝜑 → ((((∗‘𝐷) · (𝑋↑2)) + ((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) · 𝑋)) − (((∗‘𝐴) · (𝑋↑2)) + ((𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴))) · 𝑋))) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
21063, 68, 2093eqtr2d 2780 . . . . . . 7 (𝜑 → ((((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) + (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) = ((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))))
21159, 60, 210mvlraddd 11552 . . . . . 6 (𝜑 → (((∗‘𝐷) − (∗‘𝐴)) · (𝑋↑2)) = (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)))
21235, 2, 42, 211mvllmuld 11979 . . . . 5 (𝜑 → (𝑋↑2) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))))
21354, 60, 35, 42divsubdird 11962 . . . . . 6 (𝜑 → ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
21446eqcomi 2748 . . . . . . . . 9 -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) = 𝑁
215214a1i 11 . . . . . . . 8 (𝜑 → -(((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) = 𝑁)
21655, 215negcon1ad 11492 . . . . . . 7 (𝜑 → -𝑁 = (((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))))
217216oveq1d 7372 . . . . . 6 (𝜑 → (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))) = ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) / ((∗‘𝐷) − (∗‘𝐴))) − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
218213, 217eqtr4d 2777 . . . . 5 (𝜑 → ((((((∗‘𝐴) · (𝐷 · 𝐴)) − (𝑃 · 𝐷)) − (((∗‘𝐷) · (𝐷 · 𝐴)) − (𝑄 · 𝐴))) − (((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋)) / ((∗‘𝐷) − (∗‘𝐴))) = (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))))
21934, 1, 35, 42div23d 11960 . . . . . . 7 (𝜑 → ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴))) = ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) · 𝑋))
2203oveq1i 7367 . . . . . . 7 (𝑀 · 𝑋) = ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) / ((∗‘𝐷) − (∗‘𝐴))) · 𝑋)
221219, 220eqtr4di 2792 . . . . . 6 (𝜑 → ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴))) = (𝑀 · 𝑋))
222221oveq2d 7373 . . . . 5 (𝜑 → (-𝑁 − ((((𝑄 − ((∗‘𝐷) · (𝐷 + 𝐴))) − (𝑃 − ((∗‘𝐴) · (𝐷 + 𝐴)))) · 𝑋) / ((∗‘𝐷) − (∗‘𝐴)))) = (-𝑁 − (𝑀 · 𝑋)))
223212, 218, 2223eqtrd 2778 . . . 4 (𝜑 → (𝑋↑2) = (-𝑁 − (𝑀 · 𝑋)))
224216, 55eqeltrd 2839 . . . . 5 (𝜑 → -𝑁 ∈ ℂ)
2252, 45, 224addlsub 11558 . . . 4 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁 ↔ (𝑋↑2) = (-𝑁 − (𝑀 · 𝑋))))
226223, 225mpbird 258 . . 3 (𝜑 → ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁)
2272, 45addcld 11156 . . . 4 (𝜑 → ((𝑋↑2) + (𝑀 · 𝑋)) ∈ ℂ)
228 addeq0 11565 . . . 4 ((((𝑋↑2) + (𝑀 · 𝑋)) ∈ ℂ ∧ 𝑁 ∈ ℂ) → ((((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0 ↔ ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁))
229227, 57, 228syl2anc 590 . . 3 (𝜑 → ((((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0 ↔ ((𝑋↑2) + (𝑀 · 𝑋)) = -𝑁))
230226, 229mpbird 258 . 2 (𝜑 → (((𝑋↑2) + (𝑀 · 𝑋)) + 𝑁) = 0)
23158, 230eqtr3d 2776 1 (𝜑 → ((𝑋↑2) + ((𝑀 · 𝑋) + 𝑁)) = 0)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207   = wceq 1547  wcel 2119  wne 2934  wss 3883  cfv 6486  (class class class)co 7357  cc 11028  0cc0 11030   + caddc 11033   · cmul 11035  cmin 11369  -cneg 11370   / cdiv 11799  2c2 12228  cexp 14015  ccj 15050  abscabs 15188
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-sep 5219  ax-nul 5229  ax-pow 5295  ax-pr 5363  ax-un 7679  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107  ax-pre-sup 11108
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4263  df-if 4456  df-pw 4532  df-sn 4557  df-pr 4559  df-op 4563  df-uni 4840  df-iun 4924  df-br 5074  df-opab 5136  df-mpt 5155  df-tr 5181  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-riota 7314  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7808  df-2nd 7933  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-er 8634  df-en 8885  df-dom 8886  df-sdom 8887  df-sup 9346  df-pnf 11173  df-mnf 11174  df-xr 11175  df-ltxr 11176  df-le 11177  df-sub 11371  df-neg 11372  df-div 11800  df-nn 12167  df-2 12236  df-3 12237  df-n0 12430  df-z 12517  df-uz 12781  df-rp 12935  df-seq 13956  df-exp 14016  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190
This theorem is referenced by:  constrrtcc  33928
  Copyright terms: Public domain W3C validator