Theorem cgratr 28916

Description: Angle congruence is transitive. Theorem 11.8 of [Schwabhauser] p. 97. (Contributed by Thierry Arnoux, 5-Mar-2020.)

Hypotheses

Ref	Expression
cgraid.p	⊢ 𝑃 = (Base‘𝐺)
cgraid.i	⊢ 𝐼 = (Itv‘𝐺)
cgraid.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
cgraid.k	⊢ 𝐾 = (hlG‘𝐺)
cgraid.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
cgraid.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
cgraid.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
cgracom.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
cgracom.e	⊢ (𝜑 → 𝐸 ∈ 𝑃)
cgracom.f	⊢ (𝜑 → 𝐹 ∈ 𝑃)
cgracom.1	⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
cgratr.h	⊢ (𝜑 → 𝐻 ∈ 𝑃)
cgratr.i	⊢ (𝜑 → 𝑈 ∈ 𝑃)
cgratr.j	⊢ (𝜑 → 𝐽 ∈ 𝑃)
cgratr.1	⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩)

Assertion

Ref	Expression
cgratr	⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩)

Proof of Theorem cgratr

Dummy variables 𝑥 𝑦 𝑢 𝑣 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cgraid.p	. . . . 5 ⊢ 𝑃 = (Base‘𝐺)
2		eqid 2740	. . . . 5 ⊢ (dist‘𝐺) = (dist‘𝐺)
3		eqid 2740	. . . . 5 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
4		cgraid.g	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
5	4	ad3antrrr 736	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐺 ∈ TarskiG)
6		cgraid.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
7	6	ad3antrrr 736	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐴 ∈ 𝑃)
8		cgraid.b	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
9	8	ad3antrrr 736	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐵 ∈ 𝑃)
10		cgraid.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
11	10	ad3antrrr 736	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐶 ∈ 𝑃)
12		simpllr 781	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑥 ∈ 𝑃)
13		cgratr.i	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ 𝑃)
14	13	ad3antrrr 736	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑈 ∈ 𝑃)
15		simplr 774	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑦 ∈ 𝑃)
16		cgraid.i	. . . . . 6 ⊢ 𝐼 = (Itv‘𝐺)
17		simprlr 785	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴))
18	17	eqcomd 2746	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐵(dist‘𝐺)𝐴) = (𝑈(dist‘𝐺)𝑥))
19	1, 2, 16, 5, 9, 7, 14, 12, 18	tgcgrcomlr 28573	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝑈))
20		simprrr 787	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))
21	20	eqcomd 2746	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐵(dist‘𝐺)𝐶) = (𝑈(dist‘𝐺)𝑦))
22	5	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐺 ∈ TarskiG)
23	7	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐴 ∈ 𝑃)
24	9	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐵 ∈ 𝑃)
25	11	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐶 ∈ 𝑃)
26		simpllr 781	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑢 ∈ 𝑃)
27		cgracom.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
28	27	ad6antr 742	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐸 ∈ 𝑃)
29		simplr 774	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑣 ∈ 𝑃)
30		simpr1 1201	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → ⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩)
31	1, 2, 16, 3, 22, 23, 24, 25, 26, 28, 29, 30	cgr3simp3 28615	. . . . . . 7 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐶(dist‘𝐺)𝐴) = (𝑣(dist‘𝐺)𝑢))
32	12	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑥 ∈ 𝑃)
33	15	ad3antrrr 736	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑦 ∈ 𝑃)
34		cgraid.k	. . . . . . . . 9 ⊢ 𝐾 = (hlG‘𝐺)
35		cgracom.d	. . . . . . . . . 10 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
36	35	ad6antr 742	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐷 ∈ 𝑃)
37		cgracom.f	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
38	37	ad6antr 742	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐹 ∈ 𝑃)
39	14	ad3antrrr 736	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑈 ∈ 𝑃)
40		cgratr.j	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐽 ∈ 𝑃)
41	40	ad6antr 742	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐽 ∈ 𝑃)
42		cgratr.h	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐻 ∈ 𝑃)
43	42	ad6antr 742	. . . . . . . . . . 11 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝐻 ∈ 𝑃)
44		cgratr.1	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩)
45	44	ad6antr 742	. . . . . . . . . . 11 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩)
46		simprll 784	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑥(𝐾‘𝑈)𝐻)
47	46	ad3antrrr 736	. . . . . . . . . . 11 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑥(𝐾‘𝑈)𝐻)
48	1, 16, 34, 22, 36, 28, 38, 43, 39, 41, 45, 32, 47	cgrahl1 28909	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝑥𝑈𝐽”⟩)
49		simprrl 786	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑦(𝐾‘𝑈)𝐽)
50	49	ad3antrrr 736	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑦(𝐾‘𝑈)𝐽)
51	1, 16, 34, 22, 36, 28, 38, 32, 39, 41, 48, 33, 50	cgrahl2 28910	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → ⟨“𝐷𝐸𝐹”⟩(cgrA‘𝐺)⟨“𝑥𝑈𝑦”⟩)
52		simpr2 1202	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑢(𝐾‘𝐸)𝐷)
53		simpr3 1203	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → 𝑣(𝐾‘𝐸)𝐹)
54	1, 2, 16, 3, 22, 23, 24, 25, 26, 28, 29, 30	cgr3simp1 28613	. . . . . . . . . . . 12 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐴(dist‘𝐺)𝐵) = (𝑢(dist‘𝐺)𝐸))
55	54	eqcomd 2746	. . . . . . . . . . 11 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝑢(dist‘𝐺)𝐸) = (𝐴(dist‘𝐺)𝐵))
56	1, 2, 16, 22, 26, 28, 23, 24, 55	tgcgrcomlr 28573	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐸(dist‘𝐺)𝑢) = (𝐵(dist‘𝐺)𝐴))
57	18	ad3antrrr 736	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐵(dist‘𝐺)𝐴) = (𝑈(dist‘𝐺)𝑥))
58	56, 57	eqtrd 2775	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐸(dist‘𝐺)𝑢) = (𝑈(dist‘𝐺)𝑥))
59	1, 2, 16, 3, 22, 23, 24, 25, 26, 28, 29, 30	cgr3simp2 28614	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐵(dist‘𝐺)𝐶) = (𝐸(dist‘𝐺)𝑣))
60	21	ad3antrrr 736	. . . . . . . . . 10 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐵(dist‘𝐺)𝐶) = (𝑈(dist‘𝐺)𝑦))
61	59, 60	eqtr3d 2777	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐸(dist‘𝐺)𝑣) = (𝑈(dist‘𝐺)𝑦))
62	1, 16, 34, 22, 36, 28, 38, 32, 39, 33, 51, 26, 2, 29, 52, 53, 58, 61	cgracgr 28911	. . . . . . . 8 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝑢(dist‘𝐺)𝑣) = (𝑥(dist‘𝐺)𝑦))
63	1, 2, 16, 22, 26, 29, 32, 33, 62	tgcgrcomlr 28573	. . . . . . 7 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝑣(dist‘𝐺)𝑢) = (𝑦(dist‘𝐺)𝑥))
64	31, 63	eqtrd 2775	. . . . . 6 ⊢ (((((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) ∧ 𝑢 ∈ 𝑃) ∧ 𝑣 ∈ 𝑃) ∧ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)) → (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))
65		cgracom.1	. . . . . . . 8 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩)
66	1, 16, 34, 4, 6, 8, 10, 35, 27, 37	iscgra 28902	. . . . . . . 8 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩ ↔ ∃𝑢 ∈ 𝑃 ∃𝑣 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹)))
67	65, 66	mpbid 233	. . . . . . 7 ⊢ (𝜑 → ∃𝑢 ∈ 𝑃 ∃𝑣 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹))
68	67	ad3antrrr 736	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → ∃𝑢 ∈ 𝑃 ∃𝑣 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑢𝐸𝑣”⟩ ∧ 𝑢(𝐾‘𝐸)𝐷 ∧ 𝑣(𝐾‘𝐸)𝐹))
69	64, 68	r19.29vva 3200	. . . . 5 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))
70	1, 2, 3, 5, 7, 9, 11, 12, 14, 15, 19, 21, 69	trgcgr 28609	. . . 4 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → ⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝑈𝑦”⟩)
71	70, 46, 49	3jca 1134	. . 3 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ 𝑦 ∈ 𝑃) ∧ ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝑈𝑦”⟩ ∧ 𝑥(𝐾‘𝑈)𝐻 ∧ 𝑦(𝐾‘𝑈)𝐽))
72	1, 16, 34, 4, 35, 27, 37, 42, 13, 40, 44	cgrane3 28907	. . . . . 6 ⊢ (𝜑 → 𝑈 ≠ 𝐻)
73	72	necomd 2990	. . . . 5 ⊢ (𝜑 → 𝐻 ≠ 𝑈)
74	1, 16, 34, 4, 6, 8, 10, 35, 27, 37, 65	cgrane1 28905	. . . . . 6 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
75	74	necomd 2990	. . . . 5 ⊢ (𝜑 → 𝐵 ≠ 𝐴)
76	1, 16, 34, 13, 8, 6, 4, 42, 2, 73, 75	hlcgrex 28709	. . . 4 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)))
77	1, 16, 34, 4, 35, 27, 37, 42, 13, 40, 44	cgrane4 28908	. . . . . 6 ⊢ (𝜑 → 𝑈 ≠ 𝐽)
78	77	necomd 2990	. . . . 5 ⊢ (𝜑 → 𝐽 ≠ 𝑈)
79	1, 16, 34, 4, 6, 8, 10, 35, 27, 37, 65	cgrane2 28906	. . . . 5 ⊢ (𝜑 → 𝐵 ≠ 𝐶)
80	1, 16, 34, 13, 8, 10, 4, 40, 2, 78, 79	hlcgrex 28709	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ 𝑃 (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))
81		reeanv 3212	. . . 4 ⊢ (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))) ↔ (∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ ∃𝑦 ∈ 𝑃 (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))))
82	76, 80, 81	sylanbrc 589	. . 3 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 ((𝑥(𝐾‘𝑈)𝐻 ∧ (𝑈(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾‘𝑈)𝐽 ∧ (𝑈(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))))
83	71, 82	reximddv2 3199	. 2 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝑈𝑦”⟩ ∧ 𝑥(𝐾‘𝑈)𝐻 ∧ 𝑦(𝐾‘𝑈)𝐽))
84	1, 16, 34, 4, 6, 8, 10, 42, 13, 40	iscgra 28902	. 2 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩ ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝑈𝑦”⟩ ∧ 𝑥(𝐾‘𝑈)𝐻 ∧ 𝑦(𝐾‘𝑈)𝐽)))
85	83, 84	mpbird 258	1 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐻𝑈𝐽”⟩)

Syntax hints:   → wi 4   ∧ wa 396   ∧ w3a 1092   = wceq 1547   ∈ wcel 2119  ∃wrex 3064   class class class wbr 5079  ‘cfv 6492  (class class class)co 7363  ⟨“cs3 14802  Basecbs 17177  distcds 17227  TarskiGcstrkg 28520  Itvcitv 28526  cgrGccgrg 28603  hlGchlg 28693  cgrAccgra 28900

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-tp 4567  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-oadd 8406  df-er 8640  df-map 8772  df-pm 8773  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-dju 9823  df-card 9861  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-nn 12173  df-2 12242  df-3 12243  df-n0 12436  df-xnn0 12509  df-z 12523  df-uz 12787  df-fz 13460  df-fzo 13607  df-hash 14291  df-word 14474  df-concat 14531  df-s1 14557  df-s2 14808  df-s3 14809  df-trkgc 28541  df-trkgb 28542  df-trkgcb 28543  df-trkg 28546  df-cgrg 28604  df-leg 28676  df-hlg 28694  df-cgra 28901

This theorem is referenced by:  cgraswaplr  28918  sacgr  28924  oacgr  28925  tgasa1  28951