constrrtll - Mathbox for Thierry Arnoux

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

Theorem constrrtll 33704

Description: In the construction of constructible numbers, line-line intersections are solutions of linear equations, and can therefore be completely constructed. (Contributed by Thierry Arnoux, 6-Jul-2025.)

**Hypotheses**
Ref	Expression
constrrtll.s	⊢ (𝜑 → 𝑆 ⊆ ℂ)
constrrtll.a	⊢ (𝜑 → 𝐴 ∈ 𝑆)
constrrtll.b	⊢ (𝜑 → 𝐵 ∈ 𝑆)
constrrtll.c	⊢ (𝜑 → 𝐶 ∈ 𝑆)
constrrtll.d	⊢ (𝜑 → 𝐷 ∈ 𝑆)
constrrtll.t	⊢ (𝜑 → 𝑇 ∈ ℝ)
constrrtll.r	⊢ (𝜑 → 𝑅 ∈ ℝ)
constrrtll.1	⊢ (𝜑 → 𝑋 = (𝐴 + (𝑇 · (𝐵 − 𝐴))))
constrrtll.2	⊢ (𝜑 → 𝑋 = (𝐶 + (𝑅 · (𝐷 − 𝐶))))
constrrtll.3	⊢ (𝜑 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0)
constrrtll.n	⊢ 𝑁 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))

**Assertion**
Ref	Expression
constrrtll	⊢ (𝜑 → 𝑋 = 𝑁)

**Proof of Theorem constrrtll**
Step	Hyp	Ref	Expression
1		constrrtll.1	. . 3 ⊢ (𝜑 → 𝑋 = (𝐴 + (𝑇 · (𝐵 − 𝐴))))
2		constrrtll.t	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ ℝ)
3	2	recnd 11143	. . . . . . . 8 ⊢ (𝜑 → 𝑇 ∈ ℂ)
4		constrrtll.s	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ⊆ ℂ)
5		constrrtll.b	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ 𝑆)
6	4, 5	sseldd 3936	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
7		constrrtll.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑆)
8	4, 7	sseldd 3936	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
9	6, 8	cjsubd 32687	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) = ((∗‘𝐵) − (∗‘𝐴)))
10	6, 8	subcld 11475	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℂ)
11	10	cjcld 15103	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) ∈ ℂ)
12	9, 11	eqeltrrd 2829	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐵) − (∗‘𝐴)) ∈ ℂ)
13		constrrtll.d	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ∈ 𝑆)
14	4, 13	sseldd 3936	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ ℂ)
15		constrrtll.c	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐶 ∈ 𝑆)
16	4, 15	sseldd 3936	. . . . . . . . . 10 ⊢ (𝜑 → 𝐶 ∈ ℂ)
17	14, 16	subcld 11475	. . . . . . . . 9 ⊢ (𝜑 → (𝐷 − 𝐶) ∈ ℂ)
18	12, 17	mulcld 11135	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
19	14, 16	cjsubd 32687	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) = ((∗‘𝐷) − (∗‘𝐶)))
20	17	cjcld 15103	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ∈ ℂ)
21	19, 20	eqeltrrd 2829	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ∈ ℂ)
22	10, 21	mulcld 11135	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
23	3, 18, 22	subdid 11576	. . . . . . 7 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
24	1	oveq1d 7364	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶))
25		constrrtll.r	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑅 ∈ ℝ)
26	25	recnd 11143	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ ℂ)
27	26, 17	mulcld 11135	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑅 · (𝐷 − 𝐶)) ∈ ℂ)
28		constrrtll.2	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑋 = (𝐶 + (𝑅 · (𝐷 − 𝐶))))
29	16, 27, 28	mvrladdd 11533	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
30	24, 29	eqtr3d 2766	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
31	30, 27	eqeltrd 2828	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) ∈ ℂ)
32		constrrtll.3	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0)
33		fveq2 6822	. . . . . . . . . . . . . . . . 17 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = (ℑ‘0))
34		im0 15060	. . . . . . . . . . . . . . . . 17 ⊢ (ℑ‘0) = 0
35	33, 34	eqtrdi 2780	. . . . . . . . . . . . . . . 16 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0)
36	35	necon3i 2957	. . . . . . . . . . . . . . 15 ⊢ ((ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
37	32, 36	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
38	11, 17, 37	mulne0bbd 11776	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐷 − 𝐶) ≠ 0)
39	31, 26, 17, 38	divmul3d 11934	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅 ↔ ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶))))
40	30, 39	mpbird 257	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅)
41	40	fveq2d 6826	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = (∗‘𝑅))
42	31, 17, 38	cjdivd 15130	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))))
43	3, 10	mulcld 11135	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) ∈ ℂ)
44	8, 43	addcld 11134	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) ∈ ℂ)
45	44, 16	cjsubd 32687	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)))
46	8, 43	cjaddd 15127	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))))
47	3, 10	cjmuld 15128	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))))
48	2	cjred 15133	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (∗‘𝑇) = 𝑇)
49	48, 9	oveq12d 7367	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
50	47, 49	eqtrd 2764	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
51	50	oveq2d 7365	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
52	46, 51	eqtrd 2764	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
53	52	oveq1d 7364	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
54	45, 53	eqtrd 2764	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
55	54, 19	oveq12d 7367	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
56	42, 55	eqtrd 2764	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
57	25	cjred 15133	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝑅) = 𝑅)
58	41, 56, 57	3eqtr3rd 2773	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
59	40, 58	eqtrd 2764	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
60	8	cjcld 15103	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘𝐴) ∈ ℂ)
61	3, 12	mulcld 11135	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑇 · ((∗‘𝐵) − (∗‘𝐴))) ∈ ℂ)
62	60, 61	addcld 11134	. . . . . . . . . . . 12 ⊢ (𝜑 → ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) ∈ ℂ)
63	16	cjcld 15103	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝐶) ∈ ℂ)
64	62, 63	subcld 11475	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) ∈ ℂ)
65	17, 38	cjne0d 15110	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ≠ 0)
66	19, 65	eqnetrrd 2993	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ≠ 0)
67	31, 17, 64, 21, 38, 66	divmuleqd 11946	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))) ↔ (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶))))
68	59, 67	mpbid 232	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)))
69	8, 43, 16	addsubassd 11495	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
70	43, 8, 16	addsub12d 11498	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
71	69, 70	eqtr4d 2767	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)))
72	71	oveq1d 7364	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))))
73	8, 16	subcld 11475	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 − 𝐶) ∈ ℂ)
74	43, 73, 21	adddird 11140	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
75	3, 10, 21	mulassd 11138	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) = (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))
76	75	oveq1d 7364	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
77	72, 74, 76	3eqtrd 2768	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
78	60, 61, 63	addsubassd 11495	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
79	61, 60, 63	addsub12d 11498	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
80	78, 79	eqtr4d 2767	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))))
81	80	oveq1d 7364	. . . . . . . . . 10 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)))
82	60, 63	subcld 11475	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐴) − (∗‘𝐶)) ∈ ℂ)
83	61, 82, 17	adddird 11140	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
84	3, 12, 17	mulassd 11138	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) = (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))))
85	84	oveq1d 7364	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
86	81, 83, 85	3eqtrd 2768	. . . . . . . . 9 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
87	68, 77, 86	3eqtr3d 2772	. . . . . . . 8 ⊢ (𝜑 → ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
88	3, 22	mulcld 11135	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
89	73, 21	mulcld 11135	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
90	3, 18	mulcld 11135	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) ∈ ℂ)
91	82, 17	mulcld 11135	. . . . . . . . 9 ⊢ (𝜑 → (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)) ∈ ℂ)
92	88, 89, 90, 91	addsubeq4d 11526	. . . . . . . 8 ⊢ (𝜑 → (((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)))))
93	87, 92	mpbid 232	. . . . . . 7 ⊢ (𝜑 → ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
94	23, 93	eqtrd 2764	. . . . . 6 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
95	18, 22	subcld 11475	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
96	89, 91	subcld 11475	. . . . . . 7 ⊢ (𝜑 → (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ∈ ℂ)
97	11, 17	mulcld 11135	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
98		reim0b 15026	. . . . . . . . . . . . . 14 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
99	97, 98	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
100	99	necon3bbid 2962	. . . . . . . . . . . 12 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0))
101	32, 100	mpbird 257	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ)
102		cjreb 15030	. . . . . . . . . . . . 13 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
103	97, 102	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
104	103	necon3bbid 2962	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
105	101, 104	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)))
106	11, 17	cjmuld 15128	. . . . . . . . . . 11 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))))
107	10	cjcjd 15106	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(∗‘(𝐵 − 𝐴))) = (𝐵 − 𝐴))
108	107, 19	oveq12d 7367	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
109	106, 108	eqtrd 2764	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
110	9	oveq1d 7364	. . . . . . . . . 10 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
111	105, 109, 110	3netr3d 3001	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ≠ (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
112	111	necomd 2980	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ≠ ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
113	18, 22, 112	subne0d 11484	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ≠ 0)
114	3, 95, 96, 113	ldiv 11958	. . . . . 6 ⊢ (𝜑 → ((𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))))
115	94, 114	mpbid 232	. . . . 5 ⊢ (𝜑 → 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
116	115	oveq1d 7364	. . . 4 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) = (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
117	116	oveq2d 7365	. . 3 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
118	1, 117	eqtrd 2764	. 2 ⊢ (𝜑 → 𝑋 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
119		constrrtll.n	. 2 ⊢ 𝑁 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
120	118, 119	eqtr4di 2782	1 ⊢ (𝜑 → 𝑋 = 𝑁)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 = wceq 1540 ∈ wcel 2109 ≠ wne 2925 ⊆ wss 3903 ‘cfv 6482 (class class class)co 7349 ℂcc 11007 ℝcr 11008 0cc0 11009 + caddc 11012 · cmul 11014 − cmin 11347 / cdiv 11777 ∗ccj 15003 ℑcim 15005

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 2701 ax-sep 5235 ax-nul 5245 ax-pow 5304 ax-pr 5371 ax-un 7671 ax-resscn 11066 ax-1cn 11067 ax-icn 11068 ax-addcl 11069 ax-addrcl 11070 ax-mulcl 11071 ax-mulrcl 11072 ax-mulcom 11073 ax-addass 11074 ax-mulass 11075 ax-distr 11076 ax-i2m1 11077 ax-1ne0 11078 ax-1rid 11079 ax-rnegex 11080 ax-rrecex 11081 ax-cnre 11082 ax-pre-lttri 11083 ax-pre-lttrn 11084 ax-pre-ltadd 11085 ax-pre-mulgt0 11086

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 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3343 df-reu 3344 df-rab 3395 df-v 3438 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4285 df-if 4477 df-pw 4553 df-sn 4578 df-pr 4580 df-op 4584 df-uni 4859 df-iun 4943 df-br 5093 df-opab 5155 df-mpt 5174 df-tr 5200 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 6249 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6438 df-fun 6484 df-fn 6485 df-f 6486 df-f1 6487 df-fo 6488 df-f1o 6489 df-fv 6490 df-riota 7306 df-ov 7352 df-oprab 7353 df-mpo 7354 df-om 7800 df-2nd 7925 df-frecs 8214 df-wrecs 8245 df-recs 8294 df-rdg 8332 df-er 8625 df-en 8873 df-dom 8874 df-sdom 8875 df-pnf 11151 df-mnf 11152 df-xr 11153 df-ltxr 11154 df-le 11155 df-sub 11349 df-neg 11350 df-div 11778 df-nn 12129 df-2 12191 df-cj 15006 df-re 15007 df-im 15008

This theorem is referenced by: constrfin 33719 constrelextdg2 33720

W3C validator