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 34121

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 11232	. . . . . . . 8 ⊢ (𝜑 → 𝑇 ∈ ℂ)
4		constrrtll.s	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ⊆ ℂ)
5		constrrtll.b	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ 𝑆)
6	4, 5	sseldd 3938	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
7		constrrtll.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑆)
8	4, 7	sseldd 3938	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
9	6, 8	cjsubd 33087	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) = ((∗‘𝐵) − (∗‘𝐴)))
10	6, 8	subcld 11564	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℂ)
11	10	cjcld 15243	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) ∈ ℂ)
12	9, 11	eqeltrrd 2864	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐵) − (∗‘𝐴)) ∈ ℂ)
13		constrrtll.d	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ∈ 𝑆)
14	4, 13	sseldd 3938	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ ℂ)
15		constrrtll.c	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐶 ∈ 𝑆)
16	4, 15	sseldd 3938	. . . . . . . . . 10 ⊢ (𝜑 → 𝐶 ∈ ℂ)
17	14, 16	subcld 11564	. . . . . . . . 9 ⊢ (𝜑 → (𝐷 − 𝐶) ∈ ℂ)
18	12, 17	mulcld 11224	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
19	14, 16	cjsubd 33087	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) = ((∗‘𝐷) − (∗‘𝐶)))
20	17	cjcld 15243	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ∈ ℂ)
21	19, 20	eqeltrrd 2864	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ∈ ℂ)
22	10, 21	mulcld 11224	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
23	3, 18, 22	subdid 11665	. . . . . . 7 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
24	1	oveq1d 7425	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶))
25		constrrtll.r	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑅 ∈ ℝ)
26	25	recnd 11232	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ ℂ)
27	26, 17	mulcld 11224	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑅 · (𝐷 − 𝐶)) ∈ ℂ)
28		constrrtll.2	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑋 = (𝐶 + (𝑅 · (𝐷 − 𝐶))))
29	16, 27, 28	mvrladdd 11622	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
30	24, 29	eqtr3d 2800	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
31	30, 27	eqeltrd 2863	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) ∈ ℂ)
32		constrrtll.3	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0)
33		fveq2 6881	. . . . . . . . . . . . . . . . 17 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = (ℑ‘0))
34		im0 15200	. . . . . . . . . . . . . . . . 17 ⊢ (ℑ‘0) = 0
35	33, 34	eqtrdi 2814	. . . . . . . . . . . . . . . 16 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0)
36	35	necon3i 2990	. . . . . . . . . . . . . . 15 ⊢ ((ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
37	32, 36	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
38	11, 17, 37	mulne0bbd 11865	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐷 − 𝐶) ≠ 0)
39	31, 26, 17, 38	divmul3d 12020	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅 ↔ ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶))))
40	30, 39	mpbird 260	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅)
41	40	fveq2d 6885	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = (∗‘𝑅))
42	31, 17, 38	cjdivd 15270	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))))
43	3, 10	mulcld 11224	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) ∈ ℂ)
44	8, 43	addcld 11223	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) ∈ ℂ)
45	44, 16	cjsubd 33087	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)))
46	8, 43	cjaddd 15267	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))))
47	3, 10	cjmuld 15268	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))))
48	2	cjred 15273	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (∗‘𝑇) = 𝑇)
49	48, 9	oveq12d 7428	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
50	47, 49	eqtrd 2798	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
51	50	oveq2d 7426	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
52	46, 51	eqtrd 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
53	52	oveq1d 7425	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
54	45, 53	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
55	54, 19	oveq12d 7428	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
56	42, 55	eqtrd 2798	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
57	25	cjred 15273	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝑅) = 𝑅)
58	41, 56, 57	3eqtr3rd 2807	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
59	40, 58	eqtrd 2798	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
60	8	cjcld 15243	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘𝐴) ∈ ℂ)
61	3, 12	mulcld 11224	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑇 · ((∗‘𝐵) − (∗‘𝐴))) ∈ ℂ)
62	60, 61	addcld 11223	. . . . . . . . . . . 12 ⊢ (𝜑 → ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) ∈ ℂ)
63	16	cjcld 15243	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝐶) ∈ ℂ)
64	62, 63	subcld 11564	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) ∈ ℂ)
65	17, 38	cjne0d 15250	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ≠ 0)
66	19, 65	eqnetrrd 3026	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ≠ 0)
67	31, 17, 64, 21, 38, 66	divmuleqd 12032	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))) ↔ (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶))))
68	59, 67	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)))
69	8, 43, 16	addsubassd 11584	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
70	43, 8, 16	addsub12d 11587	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
71	69, 70	eqtr4d 2801	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)))
72	71	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))))
73	8, 16	subcld 11564	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 − 𝐶) ∈ ℂ)
74	43, 73, 21	adddird 11229	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
75	3, 10, 21	mulassd 11227	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) = (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))
76	75	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
77	72, 74, 76	3eqtrd 2802	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
78	60, 61, 63	addsubassd 11584	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
79	61, 60, 63	addsub12d 11587	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
80	78, 79	eqtr4d 2801	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))))
81	80	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)))
82	60, 63	subcld 11564	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐴) − (∗‘𝐶)) ∈ ℂ)
83	61, 82, 17	adddird 11229	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
84	3, 12, 17	mulassd 11227	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) = (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))))
85	84	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
86	81, 83, 85	3eqtrd 2802	. . . . . . . . 9 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
87	68, 77, 86	3eqtr3d 2806	. . . . . . . 8 ⊢ (𝜑 → ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
88	3, 22	mulcld 11224	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
89	73, 21	mulcld 11224	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
90	3, 18	mulcld 11224	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) ∈ ℂ)
91	82, 17	mulcld 11224	. . . . . . . . 9 ⊢ (𝜑 → (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)) ∈ ℂ)
92	88, 89, 90, 91	addsubeq4d 11615	. . . . . . . 8 ⊢ (𝜑 → (((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)))))
93	87, 92	mpbid 235	. . . . . . 7 ⊢ (𝜑 → ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
94	23, 93	eqtrd 2798	. . . . . 6 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
95	18, 22	subcld 11564	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
96	89, 91	subcld 11564	. . . . . . 7 ⊢ (𝜑 → (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ∈ ℂ)
97	11, 17	mulcld 11224	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
98		reim0b 15166	. . . . . . . . . . . . . 14 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
99	97, 98	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
100	99	necon3bbid 2995	. . . . . . . . . . . 12 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0))
101	32, 100	mpbird 260	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ)
102		cjreb 15170	. . . . . . . . . . . . 13 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
103	97, 102	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
104	103	necon3bbid 2995	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
105	101, 104	mpbid 235	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)))
106	11, 17	cjmuld 15268	. . . . . . . . . . 11 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))))
107	10	cjcjd 15246	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(∗‘(𝐵 − 𝐴))) = (𝐵 − 𝐴))
108	107, 19	oveq12d 7428	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
109	106, 108	eqtrd 2798	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
110	9	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
111	105, 109, 110	3netr3d 3034	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ≠ (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
112	111	necomd 3013	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ≠ ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
113	18, 22, 112	subne0d 11573	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ≠ 0)
114	3, 95, 96, 113	ldiv 12044	. . . . . 6 ⊢ (𝜑 → ((𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))))
115	94, 114	mpbid 235	. . . . 5 ⊢ (𝜑 → 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
116	115	oveq1d 7425	. . . 4 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) = (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
117	116	oveq2d 7426	. . 3 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
118	1, 117	eqtrd 2798	. 2 ⊢ (𝜑 → 𝑋 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
119		constrrtll.n	. 2 ⊢ 𝑁 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
120	118, 119	eqtr4di 2816	1 ⊢ (𝜑 → 𝑋 = 𝑁)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 = wceq 1570 ∈ wcel 2143 ≠ wne 2958 ⊆ wss 3905 ‘cfv 6536 (class class class)co 7410 ℂcc 11093 ℝcr 11094 0cc0 11095 + caddc 11098 · cmul 11100 − cmin 11436 / cdiv 11866 ∗ccj 15143 ℑcim 15145

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-sep 5257 ax-nul 5269 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-resscn 11152 ax-1cn 11153 ax-icn 11154 ax-addcl 11155 ax-addrcl 11156 ax-mulcl 11157 ax-mulrcl 11158 ax-mulcom 11159 ax-addass 11160 ax-mulass 11161 ax-distr 11162 ax-i2m1 11163 ax-1ne0 11164 ax-1rid 11165 ax-rnegex 11166 ax-rrecex 11167 ax-cnre 11168 ax-pre-lttri 11169 ax-pre-lttrn 11170 ax-pre-ltadd 11171 ax-pre-mulgt0 11172

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3745 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4488 df-pw 4564 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4873 df-iun 4958 df-br 5110 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5556 df-eprel 5561 df-po 5569 df-so 5570 df-fr 5614 df-we 5616 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 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 7859 df-2nd 7983 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-er 8690 df-en 8940 df-dom 8941 df-sdom 8942 df-pnf 11240 df-mnf 11241 df-xr 11242 df-ltxr 11243 df-le 11244 df-sub 11438 df-neg 11439 df-div 11867 df-nn 12229 df-2 12298 df-cj 15146 df-re 15147 df-im 15148

This theorem is referenced by: constrfin 34136 constrelextdg2 34137

W3C validator