Theorem tgasa1 29130

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 784	. . 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 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐺 ∈ TarskiG)
7		tgsas.f	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
8	7	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ 𝑃)
9		tgsas.d	. . . . . 6 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
10	9	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐷 ∈ 𝑃)
11		tgsas.e	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
12	11	ad2antrr 738	. . . . 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 29097	. . . . . 6 ⊢ (𝜑 → ¬ (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
20	19	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
21		eqid 2769	. . . . . 6 ⊢ (hlG‘𝐺) = (hlG‘𝐺)
22		simplr 780	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ 𝑃)
23	16	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶 ∈ 𝑃)
24	14	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐴 ∈ 𝑃)
25	15	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐵 ∈ 𝑃)
26	18	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
27	5	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐺 ∈ TarskiG)
28	9	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐷 ∈ 𝑃)
29	11	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐸 ∈ 𝑃)
30	7	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐹 ∈ 𝑃)
31	14	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐴 ∈ 𝑃)
32	15	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐵 ∈ 𝑃)
33	16	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → 𝐶 ∈ 𝑃)
34	2, 3, 5, 21, 14, 15, 16, 9, 11, 7, 17	cgracom 29090	. . . . . . . . . 10 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐴𝐵𝐶”⟩)
35	34	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐴𝐵𝐶”⟩)
36		simpr 489	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹))
37	2, 4, 3, 27, 28, 30, 29, 36	colcom 28793	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐸 ∈ (𝐹𝐿𝐷) ∨ 𝐹 = 𝐷))
38	2, 4, 3, 27, 30, 28, 29, 37	colrot1 28794	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐹 ∈ (𝐷𝐿𝐸) ∨ 𝐷 = 𝐸))
39	2, 3, 13, 27, 28, 29, 30, 31, 32, 33, 35, 4, 38	cgracol 29096	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
40	18	ad3antrrr 742	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) ∧ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹)) → ¬ (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
41	39, 40	pm2.65da 828	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ (𝐸 ∈ (𝐷𝐿𝐹) ∨ 𝐷 = 𝐹))
42		eqid 2769	. . . . . . . . . 10 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
43	17	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
44		simprl 782	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐸)𝐹)
45	2, 3, 21, 6, 24, 25, 23, 10, 12, 8, 43, 22, 44	cgrahl2 29085	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝑓”⟩)
46	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane1 29080	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
47	2, 3, 21, 14, 14, 15, 5, 46	hlid 28844	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐴((hlG‘𝐺)‘𝐵)𝐴)
48	47	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐴((hlG‘𝐺)‘𝐵)𝐴)
49	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane2 29081	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ≠ 𝐶)
50	49	necomd 3019	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 ≠ 𝐵)
51	2, 3, 21, 16, 14, 15, 5, 50	hlid 28844	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐶((hlG‘𝐺)‘𝐵)𝐶)
52	51	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶((hlG‘𝐺)‘𝐵)𝐶)
53		tgasa.2	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
54	2, 13, 3, 5, 14, 15, 9, 11, 53	tgcgrcomlr 28715	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
55	54	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐴) = (𝐸 − 𝐷))
56	1	eqcomd 2775	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝐸 − 𝑓))
57	2, 3, 21, 6, 24, 25, 23, 10, 12, 22, 45, 24, 13, 23, 48, 52, 55, 56	cgracgr 29086	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐴 − 𝐶) = (𝐷 − 𝑓))
58	2, 13, 3, 6, 24, 23, 10, 22, 57	tgcgrcomlr 28715	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐶 − 𝐴) = (𝑓 − 𝐷))
59	53	ad2antrr 738	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐴 − 𝐵) = (𝐷 − 𝐸))
60	2, 13, 42, 6, 23, 24, 25, 22, 10, 12, 58, 59, 56	trgcgr 28751	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrG‘𝐺)⟨“𝑓𝐷𝐸”⟩)
61	2, 3, 4, 5, 16, 14, 15, 18	ncolne1 28860	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶 ≠ 𝐴)
62	61	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐶 ≠ 𝐴)
63	2, 13, 3, 6, 23, 24, 22, 10, 58, 62	tgcgrneq 28718	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ≠ 𝐷)
64	2, 3, 21, 22, 8, 10, 6, 63	hlid 28844	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐷)𝑓)
65		tgasa.4	. . . . . . . . . . . . 13 ⊢ (𝜑 → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐹𝐷𝐸”⟩)
66	2, 3, 21, 5, 16, 14, 15, 7, 9, 11, 65	cgrane4 29083	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐷 ≠ 𝐸)
67	66	necomd 3019	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐸 ≠ 𝐷)
68	2, 3, 21, 11, 14, 9, 5, 67	hlid 28844	. . . . . . . . . 10 ⊢ (𝜑 → 𝐸((hlG‘𝐺)‘𝐷)𝐸)
69	68	ad2antrr 738	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸((hlG‘𝐺)‘𝐷)𝐸)
70	2, 3, 21, 6, 23, 24, 25, 22, 10, 12, 22, 12, 60, 64, 69	iscgrad 29079	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝑓𝐷𝐸”⟩)
71	66	ad2antrr 738	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐷 ≠ 𝐸)
72	2, 3, 6, 21, 22, 10, 12, 63, 71	cgraswap 29088	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝑓𝐷𝐸”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝑓”⟩)
73	2, 3, 6, 21, 23, 24, 25, 22, 10, 12, 70, 12, 10, 22, 72	cgratr 29091	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝑓”⟩)
74	2, 3, 21, 5, 16, 14, 15, 7, 9, 11, 65	cgrane3 29082	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ≠ 𝐹)
75	74	necomd 3019	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹 ≠ 𝐷)
76	2, 3, 5, 21, 7, 9, 11, 75, 66	cgraswap 29088	. . . . . . . . 9 ⊢ (𝜑 → ⟨“𝐹𝐷𝐸”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
77	2, 3, 5, 21, 16, 14, 15, 7, 9, 11, 65, 11, 9, 7, 76	cgratr 29091	. . . . . . . 8 ⊢ (𝜑 → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
78	77	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ⟨“𝐶𝐴𝐵”⟩(cgrA‘𝐺)⟨“𝐸𝐷𝐹”⟩)
79	2, 3, 4, 5, 11, 9, 67	tgelrnln 28865	. . . . . . . . 9 ⊢ (𝜑 → (𝐸𝐿𝐷) ∈ ran 𝐿)
80	79	ad2antrr 738	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐸𝐿𝐷) ∈ ran 𝐿)
81		simpl 487	. . . . . . . . . . . 12 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → 𝑎 = 𝑢)
82	81	eleq1d 2854	. . . . . . . . . . 11 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ↔ 𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷))))
83		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → 𝑏 = 𝑣)
84	83	eleq1d 2854	. . . . . . . . . . 11 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ↔ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))))
85	82, 84	anbi12d 643	. . . . . . . . . 10 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → ((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ↔ (𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷)))))
86		simpr 489	. . . . . . . . . . . 12 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑡 = 𝑤)
87		simpll 778	. . . . . . . . . . . . 13 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑎 = 𝑢)
88		simplr 780	. . . . . . . . . . . . 13 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → 𝑏 = 𝑣)
89	87, 88	oveq12d 7429	. . . . . . . . . . . 12 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → (𝑎𝐼𝑏) = (𝑢𝐼𝑣))
90	86, 89	eleq12d 2863	. . . . . . . . . . 11 ⊢ (((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) ∧ 𝑡 = 𝑤) → (𝑡 ∈ (𝑎𝐼𝑏) ↔ 𝑤 ∈ (𝑢𝐼𝑣)))
91	90	cbvrexdva 3252	. . . . . . . . . 10 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏) ↔ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣)))
92	85, 91	anbi12d 643	. . . . . . . . 9 ⊢ ((𝑎 = 𝑢 ∧ 𝑏 = 𝑣) → (((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏)) ↔ ((𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣))))
93	92	cbvopabv 5188	. . . . . . . 8 ⊢ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑏 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑡 ∈ (𝐸𝐿𝐷)𝑡 ∈ (𝑎𝐼𝑏))} = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ (𝑃 ∖ (𝐸𝐿𝐷)) ∧ 𝑣 ∈ (𝑃 ∖ (𝐸𝐿𝐷))) ∧ ∃𝑤 ∈ (𝐸𝐿𝐷)𝑤 ∈ (𝑢𝐼𝑣))}
94	2, 3, 4, 5, 11, 9, 67	tglinerflx1 28868	. . . . . . . . . 10 ⊢ (𝜑 → 𝐸 ∈ (𝐸𝐿𝐷))
95	94	ad2antrr 738	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸 ∈ (𝐸𝐿𝐷))
96	2, 4, 3, 5, 9, 11, 7, 19	ncolcom 28796	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝐹 ∈ (𝐸𝐿𝐷) ∨ 𝐸 = 𝐷))
97		pm2.45 894	. . . . . . . . . . 11 ⊢ (¬ (𝐹 ∈ (𝐸𝐿𝐷) ∨ 𝐸 = 𝐷) → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
98	96, 97	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
99	98	ad2antrr 738	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → ¬ 𝐹 ∈ (𝐸𝐿𝐷))
100	2, 3, 21, 22, 8, 12, 6, 44	hlcomd 28839	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹((hlG‘𝐺)‘𝐸)𝑓)
101	2, 3, 4, 6, 80, 12, 93, 21, 95, 8, 22, 99, 100	hphl 29012	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹((hpG‘𝐺)‘(𝐸𝐿𝐷))𝑓)
102	2, 3, 4, 6, 80, 8, 93, 22, 101	hpgcom 29008	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hpG‘𝐺)‘(𝐸𝐿𝐷))𝐹)
103	2, 3, 4, 5, 79, 7, 93, 98	hpgid 29007	. . . . . . . 8 ⊢ (𝜑 → 𝐹((hpG‘𝐺)‘(𝐸𝐿𝐷))𝐹)
104	103	ad2antrr 738	. . . . . . 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 29102	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓((hlG‘𝐺)‘𝐷)𝐹)
106	2, 3, 21, 22, 8, 10, 6, 4, 105	hlln 28842	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐹𝐿𝐷))
107	2, 3, 4, 5, 7, 9, 75	tglinerflx1 28868	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ (𝐹𝐿𝐷))
108	107	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ (𝐹𝐿𝐷))
109	2, 3, 21, 5, 14, 15, 16, 9, 11, 7, 17	cgrane4 29083	. . . . . . 7 ⊢ (𝜑 → 𝐸 ≠ 𝐹)
110	109	ad2antrr 738	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐸 ≠ 𝐹)
111	2, 3, 21, 22, 8, 12, 6, 4, 44	hlln 28842	. . . . . 6 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐹𝐿𝐸))
112	2, 3, 4, 6, 12, 8, 22, 110, 111	lncom 28857	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 ∈ (𝐸𝐿𝐹))
113	2, 3, 4, 6, 12, 8, 110	tglinerflx2 28869	. . . . 5 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝐹 ∈ (𝐸𝐿𝐹))
114	2, 3, 4, 6, 8, 10, 12, 8, 20, 106, 108, 112, 113	tglineinteq 28881	. . . 4 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → 𝑓 = 𝐹)
115	114	oveq2d 7427	. . 3 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐸 − 𝑓) = (𝐸 − 𝐹))
116	1, 115	eqtr3d 2806	. 2 ⊢ (((𝜑 ∧ 𝑓 ∈ 𝑃) ∧ (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝐸 − 𝐹))
117	109	necomd 3019	. . 3 ⊢ (𝜑 → 𝐹 ≠ 𝐸)
118	2, 3, 21, 11, 15, 16, 5, 7, 13, 117, 49	hlcgrex 28851	. 2 ⊢ (𝜑 → ∃𝑓 ∈ 𝑃 (𝑓((hlG‘𝐺)‘𝐸)𝐹 ∧ (𝐸 − 𝑓) = (𝐵 − 𝐶)))
119	116, 118	r19.29a 3179	1 ⊢ (𝜑 → (𝐵 − 𝐶) = (𝐸 − 𝐹))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 400   ∨ wo 860   = wceq 1567   ∈ wcel 2149   ≠ wne 2964  ∃wrex 3095   ∖ cdif 3910   class class class wbr 5113  {copab 5177  ran crn 5663  ‘cfv 6537  (class class class)co 7411  ⟨“cs3 14879  Basecbs 17269  distcds 17319  TarskiGcstrkg 28662  Itvcitv 28668  LineGclng 28669  cgrGccgrg 28745  hlGchlg 28835  hpGchpg 28998  cgrAccgra 29075

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-uni 4877  df-int 4917  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-oadd 8457  df-er 8694  df-map 8826  df-pm 8827  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-dju 9887  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-nn 12234  df-2 12303  df-3 12304  df-n0 12505  df-xnn0 12578  df-z 12592  df-uz 12863  df-fz 13536  df-fzo 13683  df-hash 14367  df-word 14551  df-concat 14608  df-s1 14634  df-s2 14885  df-s3 14886  df-trkgc 28683  df-trkgb 28684  df-trkgcb 28685  df-trkgld 28687  df-trkg 28688  df-cgrg 28746  df-leg 28818  df-hlg 28836  df-mir 28892  df-rag 28933  df-perpg 28935  df-hpg 28999  df-mid 29041  df-lmi 29042  df-cgra 29076

This theorem is referenced by:  tgasa  29131