Theorem tgasa1 28544

Description: Second congruence theorem: ASA. (Angle-Side-Angle): If two pairs of angles of two triangles are equal in measurement, and the included sides are equal in length, then the triangles are congruent. Theorem 11.50 of [Schwabhauser] p. 108. (Contributed by Thierry Arnoux, 15-Aug-2020.)

Hypotheses

Ref	Expression
tgsas.p	⊢ 𝑃 = (Base‘𝐺)
tgsas.m	⊢ − = (dist‘𝐺)
tgsas.i	⊢ 𝐼 = (Itv‘𝐺)
tgsas.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
tgsas.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
tgsas.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
tgsas.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
tgsas.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
tgsas.e	⊢ (𝜑 → 𝐸 ∈ 𝑃)
tgsas.f	⊢ (𝜑 → 𝐹 ∈ 𝑃)
tgasa.l	⊢ 𝐿 = (LineG‘𝐺)
tgasa.1	⊢ (𝜑 → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
tgasa.2	⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
tgasa.3	⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
tgasa.4	⊢ (𝜑 → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐹𝐷𝐸”⟩)

Assertion

Ref	Expression
tgasa1	⊢ (𝜑 → (𝐵 − 𝐶) = (𝐸 − 𝐹))

Proof of Theorem tgasa1

Dummy variables 𝑎 𝑏 𝑓 𝑤 𝑡 𝑢 𝑣 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simprr 770	. . 3 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐸 − 𝑓) = (𝐵 − 𝐶))
2		tgsas.p	. . . . 5 ⊢ 𝑃 = (Base‘𝐺)
3		tgsas.i	. . . . 5 ⊢ 𝐼 = (Itv‘𝐺)
4		tgasa.l	. . . . 5 ⊢ 𝐿 = (LineG‘𝐺)
5		tgsas.g	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
6	5	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐺 ∈ TarskiG)
7		tgsas.f	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
8	7	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ 𝑃)
9		tgsas.d	. . . . . 6 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
10	9	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐷 ∈ 𝑃)
11		tgsas.e	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
12	11	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸 ∈ 𝑃)
13		tgsas.m	. . . . . . 7 ⊢ − = (dist‘𝐺)
14		tgsas.a	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
15		tgsas.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
16		tgsas.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
17		tgasa.3	. . . . . . 7 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
18		tgasa.1	. . . . . . 7 ⊢ (𝜑 → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
19	2, 3, 13, 5, 14, 15, 16, 9, 11, 7, 17, 4, 18	cgrancol 28515	. . . . . 6 ⊢ (𝜑 → ¬ (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
20	19	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
21		eqid 2724	. . . . . 6 ⊢ (hlG‘𝐺) = (hlG‘𝐺)
22		simplr 766	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ 𝑃)
23	16	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶 ∈ 𝑃)
24	14	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐴 ∈ 𝑃)
25	15	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐵 ∈ 𝑃)
26	18	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
27	5	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐺 ∈ TarskiG)
28	9	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐷 ∈ 𝑃)
29	11	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐸 ∈ 𝑃)
30	7	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐹 ∈ 𝑃)
31	14	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐴 ∈ 𝑃)
32	15	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐵 ∈ 𝑃)
33	16	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐶 ∈ 𝑃)
34	2, 3, 5, 21, 14, 15, 16, 9, 11, 7, 17	cgracom 28508	. . . . . . . . . 10 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐴𝐵𝐶”⟩)
35	34	ad3antrrr 727	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐴𝐵𝐶”⟩)
36		simpr 484	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹))
37	2, 4, 3, 27, 28, 30, 29, 36	colcom 28244	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐸 ∈ (𝐹𝐿𝐷) ∨ 𝐹 = 𝐷))
38	2, 4, 3, 27, 30, 28, 29, 37	colrot1 28245	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
39	2, 3, 13, 27, 28, 29, 30, 31, 32, 33, 35, 4, 38	cgracol 28514	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
40	18	ad3antrrr 727	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
41	39, 40	pm2.65da 814	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹))
42		eqid 2724	. . . . . . . . . 10 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
43	17	ad2antrr 723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
44		simprl 768	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐸)𝐹)
45	2, 3, 21, 6, 24, 25, 23, 10, 12, 8, 43, 22, 44	cgrahl2 28503	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝑓”⟩)
46	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane1 28498	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
47	2, 3, 21, 14, 14, 15, 5, 46	hlid 28295	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐴((hlG‘𝐺)‘𝐵)𝐴)
48	47	ad2antrr 723	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐴((hlG‘𝐺)‘𝐵)𝐴)
49	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane2 28499	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ≠ 𝐶)
50	49	necomd 2988	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 ≠ 𝐵)
51	2, 3, 21, 16, 14, 15, 5, 50	hlid 28295	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐶((hlG‘𝐺)‘𝐵)𝐶)
52	51	ad2antrr 723	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶((hlG‘𝐺)‘𝐵)𝐶)
53		tgasa.2	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
54	2, 13, 3, 5, 14, 15, 9, 11, 53	tgcgrcomlr 28166	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
55	54	ad2antrr 723	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐴) = (𝐸 − 𝐷))
56	1	eqcomd 2730	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝐸 − 𝑓))
57	2, 3, 21, 6, 24, 25, 23, 10, 12, 22, 45, 24, 13, 23, 48, 52, 55, 56	cgracgr 28504	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐴 − 𝐶) = (𝐷 − 𝑓))
58	2, 13, 3, 6, 24, 23, 10, 22, 57	tgcgrcomlr 28166	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐶 − 𝐴) = (𝑓 − 𝐷))
59	53	ad2antrr 723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐴 − 𝐵) = (𝐷 − 𝐸))
60	2, 13, 42, 6, 23, 24, 25, 22, 10, 12, 58, 59, 56	trgcgr 28202	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrG‘𝐺)⟨“𝑓𝐷𝐸”⟩)
61	2, 3, 4, 5, 16, 14, 15, 18	ncolne1 28311	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶 ≠ 𝐴)
62	61	ad2antrr 723	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶 ≠ 𝐴)
63	2, 13, 3, 6, 23, 24, 22, 10, 58, 62	tgcgrneq 28169	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ≠ 𝐷)
64	2, 3, 21, 22, 8, 10, 6, 63	hlid 28295	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐷)𝑓)
65		tgasa.4	. . . . . . . . . . . . 13 ⊢ (𝜑 → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐹𝐷𝐸”⟩)
66	2, 3, 21, 5, 16, 14, 15, 7, 9, 11, 65	cgrane4 28501	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐷 ≠ 𝐸)
67	66	necomd 2988	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐸 ≠ 𝐷)
68	2, 3, 21, 11, 14, 9, 5, 67	hlid 28295	. . . . . . . . . 10 ⊢ (𝜑 → 𝐸((hlG‘𝐺)‘𝐷)𝐸)
69	68	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸((hlG‘𝐺)‘𝐷)𝐸)
70	2, 3, 21, 6, 23, 24, 25, 22, 10, 12, 22, 12, 60, 64, 69	iscgrad 28497	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝑓𝐷𝐸”⟩)
71	66	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐷 ≠ 𝐸)
72	2, 3, 6, 21, 22, 10, 12, 63, 71	cgraswap 28506	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝑓𝐷𝐸”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝑓”⟩)
73	2, 3, 6, 21, 23, 24, 25, 22, 10, 12, 70, 12, 10, 22, 72	cgratr 28509	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝑓”⟩)
74	2, 3, 21, 5, 16, 14, 15, 7, 9, 11, 65	cgrane3 28500	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ≠ 𝐹)
75	74	necomd 2988	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹 ≠ 𝐷)
76	2, 3, 5, 21, 7, 9, 11, 75, 66	cgraswap 28506	. . . . . . . . 9 ⊢ (𝜑 → ⟨“𝐹𝐷𝐸”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
77	2, 3, 5, 21, 16, 14, 15, 7, 9, 11, 65, 11, 9, 7, 76	cgratr 28509	. . . . . . . 8 ⊢ (𝜑 → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
78	77	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
79	2, 3, 4, 5, 11, 9, 67	tgelrnln 28316	. . . . . . . . 9 ⊢ (𝜑 → (𝐸𝐿𝐷) ∈ ran 𝐿)
80	79	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐸𝐿𝐷) ∈ ran 𝐿)
81		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → 𝑎 = 𝑢)
82	81	eleq1d 2810	. . . . . . . . . . 11 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ↔ 𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷))))
83		simpr 484	. . . . . . . . . . . 12 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → 𝑏 = 𝑣)
84	83	eleq1d 2810	. . . . . . . . . . 11 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ↔ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))))
85	82, 84	anbi12d 630	. . . . . . . . . 10 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → ((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ↔ (𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷)))))
86		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑡 = 𝑤)
87		simpll 764	. . . . . . . . . . . . 13 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑎 = 𝑢)
88		simplr 766	. . . . . . . . . . . . 13 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑏 = 𝑣)
89	87, 88	oveq12d 7419	. . . . . . . . . . . 12 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → (𝑎𝐼𝑏) = (𝑢𝐼𝑣))
90	86, 89	eleq12d 2819	. . . . . . . . . . 11 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → (𝑡 ∈ (𝑎𝐼𝑏) ↔ 𝑤 ∈ (𝑢𝐼𝑣)))
91	90	cbvrexdva 3229	. . . . . . . . . 10 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏) ↔ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣)))
92	85, 91	anbi12d 630	. . . . . . . . 9 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏)) ↔ ((𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣))))
93	92	cbvopabv 5211	. . . . . . . 8 ⊢ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏))} = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣))}
94	2, 3, 4, 5, 11, 9, 67	tglinerflx1 28319	. . . . . . . . . 10 ⊢ (𝜑 → 𝐸 ∈ (𝐸𝐿𝐷))
95	94	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸 ∈ (𝐸𝐿𝐷))
96	2, 4, 3, 5, 9, 11, 7, 19	ncolcom 28247	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝐹 ∈ (𝐸𝐿𝐷) ∨ 𝐸 = 𝐷))
97		pm2.45 878	. . . . . . . . . . 11 ⊢ (¬ (𝐹 ∈ (𝐸𝐿𝐷) ∨ 𝐸 = 𝐷) → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
98	96, 97	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
99	98	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
100	2, 3, 21, 22, 8, 12, 6, 44	hlcomd 28290	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹((hlG‘𝐺)‘𝐸)𝑓)
101	2, 3, 4, 6, 80, 12, 93, 21, 95, 8, 22, 99, 100	hphl 28457	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹((hpG‘𝐺)‘(𝐸𝐿𝐷))𝑓)
102	2, 3, 4, 6, 80, 8, 93, 22, 101	hpgcom 28453	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hpG‘𝐺)‘(𝐸𝐿𝐷))𝐹)
103	2, 3, 4, 5, 79, 7, 93, 98	hpgid 28452	. . . . . . . 8 ⊢ (𝜑 → 𝐹((hpG‘𝐺)‘(𝐸𝐿𝐷))𝐹)
104	103	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹((hpG‘𝐺)‘(𝐸𝐿𝐷))𝐹)
105	2, 3, 13, 6, 23, 24, 25, 12, 10, 8, 4, 26, 41, 22, 8, 21, 73, 78, 102, 104	acopyeu 28520	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐷)𝐹)
106	2, 3, 21, 22, 8, 10, 6, 4, 105	hlln 28293	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐹𝐿𝐷))
107	2, 3, 4, 5, 7, 9, 75	tglinerflx1 28319	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ (𝐹𝐿𝐷))
108	107	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ (𝐹𝐿𝐷))
109	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane4 28501	. . . . . . 7 ⊢ (𝜑 → 𝐸 ≠ 𝐹)
110	109	ad2antrr 723	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸 ≠ 𝐹)
111	2, 3, 21, 22, 8, 12, 6, 4, 44	hlln 28293	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐹𝐿𝐸))
112	2, 3, 4, 6, 12, 8, 22, 110, 111	lncom 28308	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐸𝐿𝐹))
113	2, 3, 4, 6, 12, 8, 110	tglinerflx2 28320	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ (𝐸𝐿𝐹))
114	2, 3, 4, 6, 8, 10, 12, 8, 20, 106, 108, 112, 113	tglineinteq 28331	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 = 𝐹)
115	114	oveq2d 7417	. . 3 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐸 − 𝑓) = (𝐸 − 𝐹))
116	1, 115	eqtr3d 2766	. 2 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝐸 − 𝐹))
117	109	necomd 2988	. . 3 ⊢ (𝜑 → 𝐹 ≠ 𝐸)
118	2, 3, 21, 11, 15, 16, 5, 7, 13, 117, 49	hlcgrex 28302	. 2 ⊢ (𝜑 → ∃𝑓 ∈ 𝑃 (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶)))
119	116, 118	r19.29a 3154	1 ⊢ (𝜑 → (𝐵 − 𝐶) = (𝐸 − 𝐹))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 844   = wceq 1533   ∈ wcel 2098   ≠ wne 2932  ∃wrex 3062   ∖ cdif 3937   class class class wbr 5138  {copab 5200  ran crn 5667  ‘cfv 6533  (class class class)co 7401  ⟨“cs3 14789  Basecbs 17142  distcds 17204  TarskiGcstrkg 28113  Itvcitv 28119  LineGclng 28120  cgrGccgrg 28196  hlGchlg 28286  hpGchpg 28443  cgrAccgra 28493

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-om 7849  df-1st 7968  df-2nd 7969  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-oadd 8465  df-er 8698  df-map 8817  df-pm 8818  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-dju 9891  df-card 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-xnn0 12541  df-z 12555  df-uz 12819  df-fz 13481  df-fzo 13624  df-hash 14287  df-word 14461  df-concat 14517  df-s1 14542  df-s2 14795  df-s3 14796  df-trkgc 28134  df-trkgb 28135  df-trkgcb 28136  df-trkgld 28138  df-trkg 28139  df-cgrg 28197  df-leg 28269  df-hlg 28287  df-mir 28339  df-rag 28380  df-perpg 28382  df-hpg 28444  df-mid 28460  df-lmi 28461  df-cgra 28494

This theorem is referenced by:  tgasa  28545