Theorem symquadlem 27252

Description: Lemma of the symetrial quadrilateral. The diagonals of quadrilaterals with congruent opposing sides intersect at their middle point. In Euclidean geometry, such quadrilaterals are called parallelograms, as opposing sides are parallel. However, this is not necessarily true in the case of absolute geometry. Lemma 7.21 of [Schwabhauser] p. 52. (Contributed by Thierry Arnoux, 6-Aug-2019.)

Hypotheses

Ref	Expression
mirval.p	⊢ 𝑃 = (Base‘𝐺)
mirval.d	⊢ − = (dist‘𝐺)
mirval.i	⊢ 𝐼 = (Itv‘𝐺)
mirval.l	⊢ 𝐿 = (LineG‘𝐺)
mirval.s	⊢ 𝑆 = (pInvG‘𝐺)
mirval.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
symquadlem.m	⊢ 𝑀 = (𝑆‘𝑋)
symquadlem.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
symquadlem.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
symquadlem.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
symquadlem.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
symquadlem.x	⊢ (𝜑 → 𝑋 ∈ 𝑃)
symquadlem.1	⊢ (𝜑 → ¬ (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶))
symquadlem.2	⊢ (𝜑 → 𝐵 ≠ 𝐷)
symquadlem.3	⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − 𝐷))
symquadlem.4	⊢ (𝜑 → (𝐵 − 𝐶) = (𝐷 − 𝐴))
symquadlem.5	⊢ (𝜑 → (𝑋 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
symquadlem.6	⊢ (𝜑 → (𝑋 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))

Assertion

Ref	Expression
symquadlem	⊢ (𝜑 → 𝐴 = (𝑀‘𝐶))

Proof of Theorem symquadlem

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		symquadlem.1	. . . . . . . 8 ⊢ (𝜑 → ¬ (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶))
2		mirval.p	. . . . . . . . . . 11 ⊢ 𝑃 = (Base‘𝐺)
3		mirval.l	. . . . . . . . . . 11 ⊢ 𝐿 = (LineG‘𝐺)
4		mirval.i	. . . . . . . . . . 11 ⊢ 𝐼 = (Itv‘𝐺)
5		mirval.g	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
6		symquadlem.b	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
7		symquadlem.a	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
8		mirval.d	. . . . . . . . . . . 12 ⊢ − = (dist‘𝐺)
9	2, 8, 4, 5, 6, 7	tgbtwntriv2 27050	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ (𝐵𝐼𝐴))
10	2, 3, 4, 5, 6, 7, 7, 9	btwncolg1 27118	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴))
11	10	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴))
12		simpr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → 𝐴 = 𝐶)
13	12	oveq2d 7345	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐵𝐿𝐴) = (𝐵𝐿𝐶))
14	13	eleq2d 2822	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐴) ↔ 𝐴 ∈ (𝐵𝐿𝐶)))
15	12	eqeq2d 2747	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐵 = 𝐴 ↔ 𝐵 = 𝐶))
16	14, 15	orbi12d 916	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → ((𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴) ↔ (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶)))
17	11, 16	mpbid 231	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶))
18	1, 17	mtand 813	. . . . . . 7 ⊢ (𝜑 → ¬ 𝐴 = 𝐶)
19	18	neqned 2947	. . . . . 6 ⊢ (𝜑 → 𝐴 ≠ 𝐶)
20	19	ad2antrr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 ≠ 𝐶)
21	20	necomd 2996	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐶 ≠ 𝐴)
22	21	neneqd 2945	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐶 = 𝐴)
23		mirval.s	. . . . . 6 ⊢ 𝑆 = (pInvG‘𝐺)
24	5	ad2antrr 723	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐺 ∈ TarskiG)
25		symquadlem.m	. . . . . 6 ⊢ 𝑀 = (𝑆‘𝑋)
26		symquadlem.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
27	26	ad2antrr 723	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐶 ∈ 𝑃)
28	7	ad2antrr 723	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 ∈ 𝑃)
29		symquadlem.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ 𝑃)
30	29	ad2antrr 723	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ 𝑃)
31		symquadlem.5	. . . . . . . 8 ⊢ (𝜑 → (𝑋 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
32	31	ad2antrr 723	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
33	2, 3, 4, 24, 28, 27, 30, 32	colcom 27121	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐶𝐿𝐴) ∨ 𝐶 = 𝐴))
34	6	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐵 ∈ 𝑃)
35		symquadlem.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
36	35	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐷 ∈ 𝑃)
37		eqid 2736	. . . . . . . 8 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
38		simplr 766	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ 𝑃)
39		symquadlem.6	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑋 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
40	2, 3, 4, 5, 6, 35, 29, 39	colrot2 27123	. . . . . . . . . 10 ⊢ (𝜑 → (𝐷 ∈ (𝑋𝐿𝐵) ∨ 𝑋 = 𝐵))
41	2, 3, 4, 5, 29, 6, 35, 40	colcom 27121	. . . . . . . . 9 ⊢ (𝜑 → (𝐷 ∈ (𝐵𝐿𝑋) ∨ 𝐵 = 𝑋))
42	41	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 ∈ (𝐵𝐿𝑋) ∨ 𝐵 = 𝑋))
43		simpr 485	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩)
44		symquadlem.4	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 − 𝐶) = (𝐷 − 𝐴))
45	44	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 − 𝐶) = (𝐷 − 𝐴))
46		symquadlem.3	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − 𝐷))
47	2, 8, 4, 5, 7, 6, 26, 35, 46	tgcgrcomlr 27043	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐷 − 𝐶))
48	47	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 − 𝐴) = (𝐷 − 𝐶))
49	48	eqcomd 2742	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 − 𝐶) = (𝐵 − 𝐴))
50		symquadlem.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ≠ 𝐷)
51	50	ad2antrr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐵 ≠ 𝐷)
52	2, 3, 4, 24, 34, 36, 30, 37, 36, 34, 8, 27, 38, 28, 42, 43, 45, 49, 51	tgfscgr 27131	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐶) = (𝑥 − 𝐴))
53	2, 3, 4, 5, 6, 26, 7, 1	ncolcom 27124	. . . . . . . . . 10 ⊢ (𝜑 → ¬ (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
54	53	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
55	31	orcomd 868	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴 = 𝐶 ∨ 𝑋 ∈ (𝐴𝐿𝐶)))
56	55	ord 861	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ 𝐴 = 𝐶 → 𝑋 ∈ (𝐴𝐿𝐶)))
57	18, 56	mpd 15	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝐴𝐿𝐶))
58	57	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ (𝐴𝐿𝐶))
59	18	ad2antrr 723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐴 = 𝐶)
60	45	eqcomd 2742	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 − 𝐴) = (𝐵 − 𝐶))
61	2, 3, 4, 24, 34, 36, 30, 37, 36, 34, 8, 28, 38, 27, 42, 43, 48, 60, 51	tgfscgr 27131	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐴) = (𝑥 − 𝐶))
62	2, 8, 4, 24, 30, 28, 38, 27, 61	tgcgrcomlr 27043	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 − 𝑋) = (𝐶 − 𝑥))
63	2, 8, 4, 24, 27, 28	axtgcgrrflx 27025	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐶 − 𝐴) = (𝐴 − 𝐶))
64	2, 8, 37, 24, 28, 30, 27, 27, 38, 28, 62, 52, 63	trgcgr 27079	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐴𝑋𝐶”⟩(cgrG‘𝐺)⟨“𝐶𝑥𝐴”⟩)
65	2, 3, 4, 24, 28, 30, 27, 37, 27, 38, 28, 32, 64	lnxfr 27129	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐶𝐿𝐴) ∨ 𝐶 = 𝐴))
66	2, 3, 4, 24, 27, 28, 38, 65	colcom 27121	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
67	66	orcomd 868	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 = 𝐶 ∨ 𝑥 ∈ (𝐴𝐿𝐶)))
68	67	ord 861	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐴 = 𝐶 → 𝑥 ∈ (𝐴𝐿𝐶)))
69	59, 68	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ (𝐴𝐿𝐶))
70	50	neneqd 2945	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ 𝐵 = 𝐷)
71	39	orcomd 868	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 = 𝐷 ∨ 𝑋 ∈ (𝐵𝐿𝐷)))
72	71	ord 861	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ 𝐵 = 𝐷 → 𝑋 ∈ (𝐵𝐿𝐷)))
73	70, 72	mpd 15	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝐵𝐿𝐷))
74	73	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ (𝐵𝐿𝐷))
75	70	ad2antrr 723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐵 = 𝐷)
76	39	ad2antrr 723	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
77	2, 8, 4, 37, 24, 34, 36, 30, 36, 34, 38, 43	cgr3swap23 27087	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐵𝑋𝐷”⟩(cgrG‘𝐺)⟨“𝐷𝑥𝐵”⟩)
78	2, 3, 4, 24, 34, 30, 36, 37, 36, 38, 34, 76, 77	lnxfr 27129	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐷𝐿𝐵) ∨ 𝐷 = 𝐵))
79	2, 3, 4, 24, 36, 34, 38, 78	colcom 27121	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
80	79	orcomd 868	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 = 𝐷 ∨ 𝑥 ∈ (𝐵𝐿𝐷)))
81	80	ord 861	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐵 = 𝐷 → 𝑥 ∈ (𝐵𝐿𝐷)))
82	75, 81	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ (𝐵𝐿𝐷))
83	2, 4, 3, 24, 28, 27, 34, 36, 54, 58, 69, 74, 82	tglineinteq 27208	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 = 𝑥)
84	83	oveq1d 7344	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐴) = (𝑥 − 𝐴))
85	52, 84	eqtr4d 2779	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐶) = (𝑋 − 𝐴))
86	2, 8, 4, 3, 23, 24, 25, 27, 28, 30, 33, 85	colmid 27251	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 = (𝑀‘𝐶) ∨ 𝐶 = 𝐴))
87	86	orcomd 868	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐶 = 𝐴 ∨ 𝐴 = (𝑀‘𝐶)))
88	87	ord 861	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐶 = 𝐴 → 𝐴 = (𝑀‘𝐶)))
89	22, 88	mpd 15	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 = (𝑀‘𝐶))
90	2, 8, 4, 5, 6, 35	axtgcgrrflx 27025	. . 3 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐷 − 𝐵))
91	2, 3, 4, 5, 6, 35, 29, 37, 35, 6, 8, 41, 90	lnext 27130	. 2 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩)
92	89, 91	r19.29a 3155	1 ⊢ (𝜑 → 𝐴 = (𝑀‘𝐶))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   ∨ wo 844   = wceq 1540   ∈ wcel 2105   ≠ wne 2940   class class class wbr 5089  ‘cfv 6473  (class class class)co 7329  ⟨“cs3 14646  Basecbs 17001  distcds 17060  TarskiGcstrkg 26990  Itvcitv 26996  LineGclng 26997  cgrGccgrg 27073  pInvGcmir 27215

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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2707  ax-rep 5226  ax-sep 5240  ax-nul 5247  ax-pow 5305  ax-pr 5369  ax-un 7642  ax-cnex 11020  ax-resscn 11021  ax-1cn 11022  ax-icn 11023  ax-addcl 11024  ax-addrcl 11025  ax-mulcl 11026  ax-mulrcl 11027  ax-mulcom 11028  ax-addass 11029  ax-mulass 11030  ax-distr 11031  ax-i2m1 11032  ax-1ne0 11033  ax-1rid 11034  ax-rnegex 11035  ax-rrecex 11036  ax-cnre 11037  ax-pre-lttri 11038  ax-pre-lttrn 11039  ax-pre-ltadd 11040  ax-pre-mulgt0 11041

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2886  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3349  df-reu 3350  df-rab 3404  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3916  df-nul 4269  df-if 4473  df-pw 4548  df-sn 4573  df-pr 4575  df-tp 4577  df-op 4579  df-uni 4852  df-int 4894  df-iun 4940  df-br 5090  df-opab 5152  df-mpt 5173  df-tr 5207  df-id 5512  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5569  df-we 5571  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 6232  df-ord 6299  df-on 6300  df-lim 6301  df-suc 6302  df-iota 6425  df-fun 6475  df-fn 6476  df-f 6477  df-f1 6478  df-fo 6479  df-f1o 6480  df-fv 6481  df-riota 7286  df-ov 7332  df-oprab 7333  df-mpo 7334  df-om 7773  df-1st 7891  df-2nd 7892  df-frecs 8159  df-wrecs 8190  df-recs 8264  df-rdg 8303  df-1o 8359  df-oadd 8363  df-er 8561  df-pm 8681  df-en 8797  df-dom 8798  df-sdom 8799  df-fin 8800  df-dju 9750  df-card 9788  df-pnf 11104  df-mnf 11105  df-xr 11106  df-ltxr 11107  df-le 11108  df-sub 11300  df-neg 11301  df-nn 12067  df-2 12129  df-3 12130  df-n0 12327  df-xnn0 12399  df-z 12413  df-uz 12676  df-fz 13333  df-fzo 13476  df-hash 14138  df-word 14310  df-concat 14366  df-s1 14392  df-s2 14652  df-s3 14653  df-trkgc 27011  df-trkgb 27012  df-trkgcb 27013  df-trkg 27016  df-cgrg 27074  df-mir 27216

This theorem is referenced by:  opphllem  27298