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 33744

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 11140	. . . . . . . 8 ⊢ (𝜑 → 𝑇 ∈ ℂ)
4		constrrtll.s	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ⊆ ℂ)
5		constrrtll.b	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ∈ 𝑆)
6	4, 5	sseldd 3930	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
7		constrrtll.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ 𝑆)
8	4, 7	sseldd 3930	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
9	6, 8	cjsubd 32726	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) = ((∗‘𝐵) − (∗‘𝐴)))
10	6, 8	subcld 11472	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℂ)
11	10	cjcld 15103	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐵 − 𝐴)) ∈ ℂ)
12	9, 11	eqeltrrd 2832	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐵) − (∗‘𝐴)) ∈ ℂ)
13		constrrtll.d	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ∈ 𝑆)
14	4, 13	sseldd 3930	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ ℂ)
15		constrrtll.c	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐶 ∈ 𝑆)
16	4, 15	sseldd 3930	. . . . . . . . . 10 ⊢ (𝜑 → 𝐶 ∈ ℂ)
17	14, 16	subcld 11472	. . . . . . . . 9 ⊢ (𝜑 → (𝐷 − 𝐶) ∈ ℂ)
18	12, 17	mulcld 11132	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
19	14, 16	cjsubd 32726	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) = ((∗‘𝐷) − (∗‘𝐶)))
20	17	cjcld 15103	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ∈ ℂ)
21	19, 20	eqeltrrd 2832	. . . . . . . . 9 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ∈ ℂ)
22	10, 21	mulcld 11132	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
23	3, 18, 22	subdid 11573	. . . . . . 7 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
24	1	oveq1d 7361	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶))
25		constrrtll.r	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑅 ∈ ℝ)
26	25	recnd 11140	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ ℂ)
27	26, 17	mulcld 11132	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑅 · (𝐷 − 𝐶)) ∈ ℂ)
28		constrrtll.2	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑋 = (𝐶 + (𝑅 · (𝐷 − 𝐶))))
29	16, 27, 28	mvrladdd 11530	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
30	24, 29	eqtr3d 2768	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶)))
31	30, 27	eqeltrd 2831	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) ∈ ℂ)
32		constrrtll.3	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0)
33		fveq2 6822	. . . . . . . . . . . . . . . . 17 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = (ℑ‘0))
34		im0 15060	. . . . . . . . . . . . . . . . 17 ⊢ (ℑ‘0) = 0
35	33, 34	eqtrdi 2782	. . . . . . . . . . . . . . . 16 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = 0 → (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0)
36	35	necon3i 2960	. . . . . . . . . . . . . . 15 ⊢ ((ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
37	32, 36	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ≠ 0)
38	11, 17, 37	mulne0bbd 11773	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐷 − 𝐶) ≠ 0)
39	31, 26, 17, 38	divmul3d 11931	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅 ↔ ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝑅 · (𝐷 − 𝐶))))
40	30, 39	mpbird 257	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = 𝑅)
41	40	fveq2d 6826	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = (∗‘𝑅))
42	31, 17, 38	cjdivd 15130	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))))
43	3, 10	mulcld 11132	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) ∈ ℂ)
44	8, 43	addcld 11131	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) ∈ ℂ)
45	44, 16	cjsubd 32726	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)))
46	8, 43	cjaddd 15127	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))))
47	3, 10	cjmuld 15128	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))))
48	2	cjred 15133	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (∗‘𝑇) = 𝑇)
49	48, 9	oveq12d 7364	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((∗‘𝑇) · (∗‘(𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
50	47, 49	eqtrd 2766	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (∗‘(𝑇 · (𝐵 − 𝐴))) = (𝑇 · ((∗‘𝐵) − (∗‘𝐴))))
51	50	oveq2d 7362	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((∗‘𝐴) + (∗‘(𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
52	46, 51	eqtrd 2766	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) = ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))))
53	52	oveq1d 7361	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((∗‘(𝐴 + (𝑇 · (𝐵 − 𝐴)))) − (∗‘𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
54	45, 53	eqtrd 2766	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) = (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)))
55	54, 19	oveq12d 7364	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((∗‘((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶)) / (∗‘(𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
56	42, 55	eqtrd 2766	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
57	25	cjred 15133	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝑅) = 𝑅)
58	41, 56, 57	3eqtr3rd 2775	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
59	40, 58	eqtrd 2766	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))))
60	8	cjcld 15103	. . . . . . . . . . . . 13 ⊢ (𝜑 → (∗‘𝐴) ∈ ℂ)
61	3, 12	mulcld 11132	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑇 · ((∗‘𝐵) − (∗‘𝐴))) ∈ ℂ)
62	60, 61	addcld 11131	. . . . . . . . . . . 12 ⊢ (𝜑 → ((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) ∈ ℂ)
63	16	cjcld 15103	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘𝐶) ∈ ℂ)
64	62, 63	subcld 11472	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) ∈ ℂ)
65	17, 38	cjne0d 15110	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(𝐷 − 𝐶)) ≠ 0)
66	19, 65	eqnetrrd 2996	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐷) − (∗‘𝐶)) ≠ 0)
67	31, 17, 64, 21, 38, 66	divmuleqd 11943	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) / (𝐷 − 𝐶)) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) / ((∗‘𝐷) − (∗‘𝐶))) ↔ (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶))))
68	59, 67	mpbid 232	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)))
69	8, 43, 16	addsubassd 11492	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
70	43, 8, 16	addsub12d 11495	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) = (𝐴 + ((𝑇 · (𝐵 − 𝐴)) − 𝐶)))
71	69, 70	eqtr4d 2769	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) = ((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)))
72	71	oveq1d 7361	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))))
73	8, 16	subcld 11472	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 − 𝐶) ∈ ℂ)
74	43, 73, 21	adddird 11137	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) + (𝐴 − 𝐶)) · ((∗‘𝐷) − (∗‘𝐶))) = (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
75	3, 10, 21	mulassd 11135	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) = (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))
76	75	oveq1d 7361	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · (𝐵 − 𝐴)) · ((∗‘𝐷) − (∗‘𝐶))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
77	72, 74, 76	3eqtrd 2770	. . . . . . . . 9 ⊢ (𝜑 → (((𝐴 + (𝑇 · (𝐵 − 𝐴))) − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) = ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))))
78	60, 61, 63	addsubassd 11492	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
79	61, 60, 63	addsub12d 11495	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) = ((∗‘𝐴) + ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) − (∗‘𝐶))))
80	78, 79	eqtr4d 2769	. . . . . . . . . . 11 ⊢ (𝜑 → (((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) = ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))))
81	80	oveq1d 7361	. . . . . . . . . 10 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)))
82	60, 63	subcld 11472	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘𝐴) − (∗‘𝐶)) ∈ ℂ)
83	61, 82, 17	adddird 11137	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) + ((∗‘𝐴) − (∗‘𝐶))) · (𝐷 − 𝐶)) = (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
84	3, 12, 17	mulassd 11135	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) = (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))))
85	84	oveq1d 7361	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑇 · ((∗‘𝐵) − (∗‘𝐴))) · (𝐷 − 𝐶)) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
86	81, 83, 85	3eqtrd 2770	. . . . . . . . 9 ⊢ (𝜑 → ((((∗‘𝐴) + (𝑇 · ((∗‘𝐵) − (∗‘𝐴)))) − (∗‘𝐶)) · (𝐷 − 𝐶)) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
87	68, 77, 86	3eqtr3d 2774	. . . . . . . 8 ⊢ (𝜑 → ((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
88	3, 22	mulcld 11132	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
89	73, 21	mulcld 11132	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) ∈ ℂ)
90	3, 18	mulcld 11132	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) ∈ ℂ)
91	82, 17	mulcld 11132	. . . . . . . . 9 ⊢ (𝜑 → (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)) ∈ ℂ)
92	88, 89, 90, 91	addsubeq4d 11523	. . . . . . . 8 ⊢ (𝜑 → (((𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) + ((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶)))) = ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) + (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶)))))
93	87, 92	mpbid 232	. . . . . . 7 ⊢ (𝜑 → ((𝑇 · (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶))) − (𝑇 · ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
94	23, 93	eqtrd 2766	. . . . . 6 ⊢ (𝜑 → (𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))))
95	18, 22	subcld 11472	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ∈ ℂ)
96	89, 91	subcld 11472	. . . . . . 7 ⊢ (𝜑 → (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ∈ ℂ)
97	11, 17	mulcld 11132	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ)
98		reim0b 15026	. . . . . . . . . . . . . 14 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
99	97, 98	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = 0))
100	99	necon3bbid 2965	. . . . . . . . . . . 12 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (ℑ‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ 0))
101	32, 100	mpbird 257	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ)
102		cjreb 15030	. . . . . . . . . . . . 13 ⊢ (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℂ → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
103	97, 102	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
104	103	necon3bbid 2965	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) ∈ ℝ ↔ (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))))
105	101, 104	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) ≠ ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)))
106	11, 17	cjmuld 15128	. . . . . . . . . . 11 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))))
107	10	cjcjd 15106	. . . . . . . . . . . 12 ⊢ (𝜑 → (∗‘(∗‘(𝐵 − 𝐴))) = (𝐵 − 𝐴))
108	107, 19	oveq12d 7364	. . . . . . . . . . 11 ⊢ (𝜑 → ((∗‘(∗‘(𝐵 − 𝐴))) · (∗‘(𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
109	106, 108	eqtrd 2766	. . . . . . . . . 10 ⊢ (𝜑 → (∗‘((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶))) = ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
110	9	oveq1d 7361	. . . . . . . . . 10 ⊢ (𝜑 → ((∗‘(𝐵 − 𝐴)) · (𝐷 − 𝐶)) = (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
111	105, 109, 110	3netr3d 3004	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))) ≠ (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)))
112	111	necomd 2983	. . . . . . . 8 ⊢ (𝜑 → (((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) ≠ ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))
113	18, 22, 112	subne0d 11481	. . . . . . 7 ⊢ (𝜑 → ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))) ≠ 0)
114	3, 95, 96, 113	ldiv 11955	. . . . . 6 ⊢ (𝜑 → ((𝑇 · ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) = (((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) ↔ 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶)))))))
115	94, 114	mpbid 232	. . . . 5 ⊢ (𝜑 → 𝑇 = ((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))))
116	115	oveq1d 7361	. . . 4 ⊢ (𝜑 → (𝑇 · (𝐵 − 𝐴)) = (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
117	116	oveq2d 7362	. . 3 ⊢ (𝜑 → (𝐴 + (𝑇 · (𝐵 − 𝐴))) = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
118	1, 117	eqtrd 2766	. 2 ⊢ (𝜑 → 𝑋 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴))))
119		constrrtll.n	. 2 ⊢ 𝑁 = (𝐴 + (((((𝐴 − 𝐶) · ((∗‘𝐷) − (∗‘𝐶))) − (((∗‘𝐴) − (∗‘𝐶)) · (𝐷 − 𝐶))) / ((((∗‘𝐵) − (∗‘𝐴)) · (𝐷 − 𝐶)) − ((𝐵 − 𝐴) · ((∗‘𝐷) − (∗‘𝐶))))) · (𝐵 − 𝐴)))
120	118, 119	eqtr4di 2784	1 ⊢ (𝜑 → 𝑋 = 𝑁)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 ⊆ wss 3897 ‘cfv 6481 (class class class)co 7346 ℂcc 11004 ℝcr 11005 0cc0 11006 + caddc 11009 · cmul 11011 − cmin 11344 / cdiv 11774 ∗ccj 15003 ℑcim 15005

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7668 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-op 4580 df-uni 4857 df-iun 4941 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-om 7797 df-2nd 7922 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-er 8622 df-en 8870 df-dom 8871 df-sdom 8872 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-div 11775 df-nn 12126 df-2 12188 df-cj 15006 df-re 15007 df-im 15008

This theorem is referenced by: constrfin 33759 constrelextdg2 33760

W3C validator