Theorem symquadlem 29040

Description: Lemma of the symmetrical 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 28829	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ (𝐵𝐼𝐴))
10	2, 3, 4, 5, 6, 7, 7, 9	btwncolg1 28897	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴))
11	10	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴))
12		simpr 490	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → 𝐴 = 𝐶)
13	12	oveq2d 7429	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐵𝐿𝐴) = (𝐵𝐿𝐶))
14	13	eleq2d 2846	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐴) ↔ 𝐴 ∈ (𝐵𝐿𝐶)))
15	12	eqeq2d 2771	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐵 = 𝐴 ↔ 𝐵 = 𝐶))
16	14, 15	orbi12d 932	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → ((𝐴 ∈ (𝐵𝐿𝐴) ∨ 𝐵 = 𝐴) ↔ (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶)))
17	11, 16	mpbid 235	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝐴 = 𝐶) → (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶))
18	1, 17	mtand 828	. . . . . . 7 ⊢ (𝜑 → ¬ 𝐴 = 𝐶)
19	18	neqned 2962	. . . . . 6 ⊢ (𝜑 → 𝐴 ≠ 𝐶)
20	19	ad2antrr 739	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 ≠ 𝐶)
21	20	necomd 3010	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐶 ≠ 𝐴)
22	21	neneqd 2960	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐶 = 𝐴)
23		mirval.s	. . . . . 6 ⊢ 𝑆 = (pInvG‘𝐺)
24	5	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐺 ∈ TarskiG)
25		symquadlem.m	. . . . . 6 ⊢ 𝑀 = (𝑆‘𝑋)
26		symquadlem.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
27	26	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐶 ∈ 𝑃)
28	7	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 ∈ 𝑃)
29		symquadlem.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ 𝑃)
30	29	ad2antrr 739	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ 𝑃)
31		symquadlem.5	. . . . . . . 8 ⊢ (𝜑 → (𝑋 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
32	31	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
33	2, 3, 4, 24, 28, 27, 30, 32	colcom 28900	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐶𝐿𝐴) ∨ 𝐶 = 𝐴))
34	6	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐵 ∈ 𝑃)
35		symquadlem.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
36	35	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐷 ∈ 𝑃)
37		eqid 2760	. . . . . . . 8 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
38		simplr 781	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ 𝑃)
39		symquadlem.6	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑋 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
40	2, 3, 4, 5, 6, 35, 29, 39	colrot2 28902	. . . . . . . . . 10 ⊢ (𝜑 → (𝐷 ∈ (𝑋𝐿𝐵) ∨ 𝑋 = 𝐵))
41	2, 3, 4, 5, 29, 6, 35, 40	colcom 28900	. . . . . . . . 9 ⊢ (𝜑 → (𝐷 ∈ (𝐵𝐿𝑋) ∨ 𝐵 = 𝑋))
42	41	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 ∈ (𝐵𝐿𝑋) ∨ 𝐵 = 𝑋))
43		simpr 490	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩)
44		symquadlem.4	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 − 𝐶) = (𝐷 − 𝐴))
45	44	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 − 𝐶) = (𝐷 − 𝐴))
46		symquadlem.3	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − 𝐷))
47	2, 8, 4, 5, 7, 6, 26, 35, 46	tgcgrcomlr 28821	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐷 − 𝐶))
48	47	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 − 𝐴) = (𝐷 − 𝐶))
49	48	eqcomd 2766	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 − 𝐶) = (𝐵 − 𝐴))
50		symquadlem.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ≠ 𝐷)
51	50	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐵 ≠ 𝐷)
52	2, 3, 4, 24, 34, 36, 30, 37, 36, 34, 8, 27, 38, 28, 42, 43, 45, 49, 51	tgfscgr 28910	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐶) = (𝑥 − 𝐴))
53	2, 3, 4, 5, 6, 26, 7, 1	ncolcom 28903	. . . . . . . . . 10 ⊢ (𝜑 → ¬ (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
54	53	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
55	31	orcomd 885	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴 = 𝐶 ∨ 𝑋 ∈ (𝐴𝐿𝐶)))
56	55	ord 878	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ 𝐴 = 𝐶 → 𝑋 ∈ (𝐴𝐿𝐶)))
57	18, 56	mpd 16	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝐴𝐿𝐶))
58	57	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ (𝐴𝐿𝐶))
59	18	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐴 = 𝐶)
60	45	eqcomd 2766	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐷 − 𝐴) = (𝐵 − 𝐶))
61	2, 3, 4, 24, 34, 36, 30, 37, 36, 34, 8, 28, 38, 27, 42, 43, 48, 60, 51	tgfscgr 28910	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐴) = (𝑥 − 𝐶))
62	2, 8, 4, 24, 30, 28, 38, 27, 61	tgcgrcomlr 28821	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 − 𝑋) = (𝐶 − 𝑥))
63	2, 8, 4, 24, 27, 28	axtgcgrrflx 28803	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐶 − 𝐴) = (𝐴 − 𝐶))
64	2, 8, 37, 24, 28, 30, 27, 27, 38, 28, 62, 52, 63	trgcgr 28858	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐴𝑋𝐶”⟩(cgrG‘𝐺)⟨“𝐶𝑥𝐴”⟩)
65	2, 3, 4, 24, 28, 30, 27, 37, 27, 38, 28, 32, 64	lnxfr 28908	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐶𝐿𝐴) ∨ 𝐶 = 𝐴))
66	2, 3, 4, 24, 27, 28, 38, 65	colcom 28900	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
67	66	orcomd 885	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 = 𝐶 ∨ 𝑥 ∈ (𝐴𝐿𝐶)))
68	67	ord 878	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐴 = 𝐶 → 𝑥 ∈ (𝐴𝐿𝐶)))
69	59, 68	mpd 16	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ (𝐴𝐿𝐶))
70	50	neneqd 2960	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ 𝐵 = 𝐷)
71	39	orcomd 885	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 = 𝐷 ∨ 𝑋 ∈ (𝐵𝐿𝐷)))
72	71	ord 878	. . . . . . . . . . 11 ⊢ (𝜑 → (¬ 𝐵 = 𝐷 → 𝑋 ∈ (𝐵𝐿𝐷)))
73	70, 72	mpd 16	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝐵𝐿𝐷))
74	73	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 ∈ (𝐵𝐿𝐷))
75	70	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ¬ 𝐵 = 𝐷)
76	39	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
77	2, 8, 4, 37, 24, 34, 36, 30, 36, 34, 38, 43	cgr3swap23 28866	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → ⟨“𝐵𝑋𝐷”⟩(cgrG‘𝐺)⟨“𝐷𝑥𝐵”⟩)
78	2, 3, 4, 24, 34, 30, 36, 37, 36, 38, 34, 76, 77	lnxfr 28908	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐷𝐿𝐵) ∨ 𝐷 = 𝐵))
79	2, 3, 4, 24, 36, 34, 38, 78	colcom 28900	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑥 ∈ (𝐵𝐿𝐷) ∨ 𝐵 = 𝐷))
80	79	orcomd 885	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐵 = 𝐷 ∨ 𝑥 ∈ (𝐵𝐿𝐷)))
81	80	ord 878	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐵 = 𝐷 → 𝑥 ∈ (𝐵𝐿𝐷)))
82	75, 81	mpd 16	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑥 ∈ (𝐵𝐿𝐷))
83	2, 4, 3, 24, 28, 27, 34, 36, 54, 58, 69, 74, 82	tglineinteq 28993	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝑋 = 𝑥)
84	83	oveq1d 7428	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐴) = (𝑥 − 𝐴))
85	52, 84	eqtr4d 2798	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝑋 − 𝐶) = (𝑋 − 𝐴))
86	2, 8, 4, 3, 23, 24, 25, 27, 28, 30, 33, 85	colmid 29039	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐴 = (𝑀‘𝐶) ∨ 𝐶 = 𝐴))
87	86	orcomd 885	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (𝐶 = 𝐴 ∨ 𝐴 = (𝑀‘𝐶)))
88	87	ord 878	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → (¬ 𝐶 = 𝐴 → 𝐴 = (𝑀‘𝐶)))
89	22, 88	mpd 16	. 2 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑃) ∧ ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩) → 𝐴 = (𝑀‘𝐶))
90	2, 8, 4, 5, 6, 35	axtgcgrrflx 28803	. . 3 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐷 − 𝐵))
91	2, 3, 4, 5, 6, 35, 29, 37, 35, 6, 8, 41, 90	lnext 28909	. 2 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 ⟨“𝐵𝐷𝑋”⟩(cgrG‘𝐺)⟨“𝐷𝐵𝑥”⟩)
92	89, 91	r19.29a 3170	1 ⊢ (𝜑 → 𝐴 = (𝑀‘𝐶))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ∨ wo 861   = wceq 1570   ∈ wcel 2145   ≠ wne 2955   class class class wbr 5103  ‘cfv 6533  (class class class)co 7413  ⟨“cs3 14913  Basecbs 17301  distcds 17351  TarskiGcstrkg 28768  Itvcitv 28774  LineGclng 28775  cgrGccgrg 28852  pInvGcmir 29003

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736  ax-cnex 11180  ax-resscn 11181  ax-1cn 11182  ax-icn 11183  ax-addcl 11184  ax-addrcl 11185  ax-mulcl 11186  ax-mulrcl 11187  ax-mulcom 11188  ax-addass 11189  ax-mulass 11190  ax-distr 11191  ax-i2m1 11192  ax-1ne0 11193  ax-1rid 11194  ax-rnegex 11195  ax-rrecex 11196  ax-cnre 11197  ax-pre-lttri 11198  ax-pre-lttrn 11199  ax-pre-ltadd 11200  ax-pre-mulgt0 11201

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-oadd 8459  df-er 8696  df-pm 8829  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-dju 9906  df-card 9944  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11467  df-neg 11468  df-nn 12258  df-2 12327  df-3 12328  df-n0 12529  df-xnn0 12602  df-z 12616  df-uz 12888  df-fz 13562  df-fzo 13710  df-hash 14395  df-word 14579  df-concat 14636  df-s1 14663  df-s2 14919  df-s3 14920  df-trkgc 28789  df-trkgb 28790  df-trkgcb 28791  df-trkg 28794  df-cgrg 28853  df-mir 29004

This theorem is used by:  symquadprlnglem  29044  opphllem  29090  symquadmid  29183  symquadprlng  29319