hypcgrlem1 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > hypcgrlem1		Structured version Visualization version GIF version

Theorem hypcgrlem1 28317

Description: Lemma for hypcgr 28319, case where triangles share a cathetus. (Contributed by Thierry Arnoux, 15-Dec-2019.)

**Hypotheses**
Ref	Expression
hypcgr.p	⊢ 𝑃 = (Base‘𝐺)
hypcgr.m	⊢ − = (dist‘𝐺)
hypcgr.i	⊢ 𝐼 = (Itv‘𝐺)
hypcgr.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
hypcgr.h	⊢ (𝜑 → 𝐺Dim_TarskiG≥2)
hypcgr.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
hypcgr.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
hypcgr.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
hypcgr.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
hypcgr.e	⊢ (𝜑 → 𝐸 ∈ 𝑃)
hypcgr.f	⊢ (𝜑 → 𝐹 ∈ 𝑃)
hypcgr.1	⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
hypcgr.2	⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
hypcgr.3	⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
hypcgr.4	⊢ (𝜑 → (𝐵 − 𝐶) = (𝐸 − 𝐹))
hypcgrlem2.b	⊢ (𝜑 → 𝐵 = 𝐸)
hypcgrlem1.s	⊢ 𝑆 = ((lInvG‘𝐺)‘((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
hypcgrlem1.a	⊢ (𝜑 → 𝐶 = 𝐹)

**Assertion**
Ref	Expression
hypcgrlem1	⊢ (𝜑 → (𝐴 − 𝐶) = (𝐷 − 𝐹))

**Proof of Theorem hypcgrlem1**
Step	Hyp	Ref	Expression
1		hypcgr.p	. . 3 ⊢ 𝑃 = (Base‘𝐺)
2		hypcgr.m	. . 3 ⊢ − = (dist‘𝐺)
3		hypcgr.i	. . 3 ⊢ 𝐼 = (Itv‘𝐺)
4		hypcgr.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
5	4	adantr 479	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐺 ∈ TarskiG)
6		hypcgr.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
7	6	adantr 479	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐶 ∈ 𝑃)
8		hypcgr.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
9	8	adantr 479	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐴 ∈ 𝑃)
10		hypcgr.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
11	10	adantr 479	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 ∈ 𝑃)
12		hypcgr.d	. . . 4 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
13	12	adantr 479	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 ∈ 𝑃)
14		eqid 2730	. . . . . . 7 ⊢ (LineG‘𝐺) = (LineG‘𝐺)
15		eqid 2730	. . . . . . 7 ⊢ (pInvG‘𝐺) = (pInvG‘𝐺)
16		hypcgr.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
17		hypcgr.1	. . . . . . 7 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
18	1, 2, 3, 14, 15, 4, 8, 16, 6, 17	ragcom 28216	. . . . . 6 ⊢ (𝜑 → ⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺))
19	1, 2, 3, 14, 15, 4, 6, 16, 8	israg 28215	. . . . . 6 ⊢ (𝜑 → (⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴))))
20	18, 19	mpbid 231	. . . . 5 ⊢ (𝜑 → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
21	20	adantr 479	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
22		hypcgrlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐶 = 𝐹)
23	22	eqcomd 2736	. . . . . 6 ⊢ (𝜑 → 𝐹 = 𝐶)
24	23	adantr 479	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 = 𝐶)
25		hypcgr.h	. . . . . . 7 ⊢ (𝜑 → 𝐺Dim_TarskiG≥2)
26	1, 2, 3, 4, 25, 8, 12, 15, 16	ismidb 28296	. . . . . 6 ⊢ (𝜑 → (𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = 𝐵))
27	26	biimpar 476	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴))
28	24, 27	oveq12d 7429	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐹 − 𝐷) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
29	21, 28	eqtr4d 2773	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐹 − 𝐷))
30	1, 2, 3, 5, 7, 9, 11, 13, 29	tgcgrcomlr 27998	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
31		simpr 483	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐴 = 𝐷)
32	22	ad2antrr 722	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐶 = 𝐹)
33	31, 32	oveq12d 7429	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
34	17	ad2antrr 722	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
35	4	ad2antrr 722	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺 ∈ TarskiG)
36	8	ad2antrr 722	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ 𝑃)
37	16	ad2antrr 722	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ 𝑃)
38	6	ad2antrr 722	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐶 ∈ 𝑃)
39	1, 2, 3, 14, 15, 35, 36, 37, 38	israg 28215	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
40	34, 39	mpbid 231	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
41	25	ad2antrr 722	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺Dim_TarskiG≥2)
42		hypcgrlem1.s	. . . . . . 7 ⊢ 𝑆 = ((lInvG‘𝐺)‘((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
43	12	ad2antrr 722	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ∈ 𝑃)
44	1, 2, 3, 35, 41, 36, 43	midcl 28295	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ 𝑃)
45		simplr 765	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ≠ 𝐵)
46	1, 3, 14, 35, 44, 37, 45	tgelrnln 28148	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∈ ran (LineG‘𝐺))
47		eqid 2730	. . . . . . 7 ⊢ ((pInvG‘𝐺)‘𝐵) = ((pInvG‘𝐺)‘𝐵)
48		eqid 2730	. . . . . . . . 9 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
49	1, 2, 3, 14, 15, 35, 37, 47, 38	mircl 28179	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((pInvG‘𝐺)‘𝐵)‘𝐶) ∈ 𝑃)
50		simpr 483	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ 𝐷)
51	1, 2, 3, 35, 41, 36, 43	midbtwn 28297	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐴𝐼𝐷))
52	1, 14, 3, 35, 36, 44, 43, 51	btwncolg3 28075	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 ∈ (𝐴(LineG‘𝐺)(𝐴(midG‘𝐺)𝐷)) ∨ 𝐴 = (𝐴(midG‘𝐺)𝐷)))
53		eqidd 2731	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷 = 𝐷)
54		hypcgrlem2.b	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 = 𝐸)
55	53, 54, 22	s3eqd 14819	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
56	55	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
57		hypcgr.2	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
58	57	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
59	56, 58	eqeltrd 2831	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺))
60	1, 2, 3, 14, 15, 35, 43, 37, 38	israg 28215	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
61	59, 60	mpbid 231	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
62	1, 14, 3, 35, 36, 43, 44, 48, 38, 49, 2, 50, 52, 40, 61	lncgr 28087	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
63	1, 2, 3, 14, 15, 35, 44, 37, 38	israg 28215	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
64	62, 63	mpbird 256	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺))
65	1, 3, 14, 35, 44, 37, 45	tglinerflx1 28151	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
66	1, 3, 14, 35, 44, 37, 45	tglinerflx2 28152	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
67	1, 2, 3, 35, 41, 42, 14, 46, 44, 47, 64, 65, 66, 38, 45	lmimid 28312	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝑆‘𝐶) = (((pInvG‘𝐺)‘𝐵)‘𝐶))
68	67	oveq2d 7427	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
69	40, 68	eqtr4d 2773	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (𝑆‘𝐶)))
70	1, 2, 3, 35, 41, 43, 36	midcom 28300	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) = (𝐴(midG‘𝐺)𝐷))
71	70, 65	eqeltrd 2831	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
72	50	necomd 2994	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ≠ 𝐴)
73	1, 3, 14, 35, 43, 36, 72	tgelrnln 28148	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(LineG‘𝐺)𝐴) ∈ ran (LineG‘𝐺))
74	1, 2, 3, 35, 36, 44, 43, 51	tgbtwncom 28006	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷𝐼𝐴))
75	1, 3, 14, 35, 43, 36, 44, 72, 74	btwnlng1 28137	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷(LineG‘𝐺)𝐴))
76	65, 75	elind 4193	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∩ (𝐷(LineG‘𝐺)𝐴)))
77	1, 3, 14, 35, 43, 36, 72	tglinerflx2 28152	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ (𝐷(LineG‘𝐺)𝐴))
78	45	necomd 2994	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ≠ (𝐴(midG‘𝐺)𝐷))
79	4	ad2antrr 722	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺 ∈ TarskiG)
80	8	ad2antrr 722	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 ∈ 𝑃)
81	12	ad2antrr 722	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐷 ∈ 𝑃)
82	25	ad2antrr 722	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺Dim_TarskiG≥2)
83		simpr 483	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = (𝐴(midG‘𝐺)𝐷))
84	83	eqcomd 2736	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴(midG‘𝐺)𝐷) = 𝐴)
85	1, 2, 3, 79, 82, 80, 81, 84	midcgr 28298	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐴) = (𝐴 − 𝐷))
86	85	eqcomd 2736	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐷) = (𝐴 − 𝐴))
87	1, 2, 3, 79, 80, 81, 80, 86	axtgcgrid 27981	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = 𝐷)
88	87	ex 411	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 = (𝐴(midG‘𝐺)𝐷) → 𝐴 = 𝐷))
89	88	necon3d 2959	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 ≠ 𝐷 → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷)))
90	89	imp 405	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷))
91		hypcgr.e	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
92		hypcgr.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
93	1, 2, 3, 4, 8, 16, 12, 91, 92	tgcgrcomlr 27998	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
94	54	oveq1d 7426	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐸 − 𝐷))
95	93, 94	eqtr4d 2773	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐵 − 𝐷))
96	95	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − 𝐷))
97		eqidd 2731	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷))
98	1, 2, 3, 35, 41, 36, 43, 15, 44	ismidb 28296	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷)))
99	97, 98	mpbird 256	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))
100	99	oveq2d 7427	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐷) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
101	96, 100	eqtrd 2770	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
102	1, 2, 3, 14, 15, 35, 37, 44, 36	israg 28215	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))))
103	101, 102	mpbird 256	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺))
104	1, 2, 3, 14, 35, 46, 73, 76, 66, 77, 78, 90, 103	ragperp 28235	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴))
105	104	orcd 869	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))
106	1, 2, 3, 35, 41, 42, 14, 46, 43, 36	islmib 28305	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 = (𝑆‘𝐷) ↔ ((𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∧ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))))
107	71, 105, 106	mpbir2and 709	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 = (𝑆‘𝐷))
108	107	oveq1d 7426	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = ((𝑆‘𝐷) − (𝑆‘𝐶)))
109	1, 2, 3, 35, 41, 42, 14, 46, 43, 38	lmiiso 28315	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝑆‘𝐷) − (𝑆‘𝐶)) = (𝐷 − 𝐶))
110	22	oveq2d 7427	. . . . . 6 ⊢ (𝜑 → (𝐷 − 𝐶) = (𝐷 − 𝐹))
111	110	ad2antrr 722	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − 𝐹))
112	108, 109, 111	3eqtrd 2774	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐷 − 𝐹))
113	69, 112	eqtrd 2770	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
114	33, 113	pm2.61dane 3027	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
115	30, 114	pm2.61dane 3027	1 ⊢ (𝜑 → (𝐴 − 𝐶) = (𝐷 − 𝐹))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 394 ∨ wo 843 = wceq 1539 ∈ wcel 2104 ≠ wne 2938 class class class wbr 5147 ‘cfv 6542 (class class class)co 7411 2c2 12271 ⟨“cs3 14797 Basecbs 17148 distcds 17210 TarskiGcstrkg 27945 Dim_TarskiG≥cstrkgld 27949 Itvcitv 27951 LineGclng 27952 cgrGccgrg 28028 pInvGcmir 28170 ∟Gcrag 28211 ⟂Gcperpg 28213 midGcmid 28290 lInvGclmi 28291

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7727 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-tp 4632 df-op 4634 df-uni 4908 df-int 4950 df-iun 4998 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5573 df-eprel 5579 df-po 5587 df-so 5588 df-fr 5630 df-we 5632 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-pred 6299 df-ord 6366 df-on 6367 df-lim 6368 df-suc 6369 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-om 7858 df-1st 7977 df-2nd 7978 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-1o 8468 df-oadd 8472 df-er 8705 df-map 8824 df-pm 8825 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-dju 9898 df-card 9936 df-pnf 11254 df-mnf 11255 df-xr 11256 df-ltxr 11257 df-le 11258 df-sub 11450 df-neg 11451 df-nn 12217 df-2 12279 df-3 12280 df-n0 12477 df-xnn0 12549 df-z 12563 df-uz 12827 df-fz 13489 df-fzo 13632 df-hash 14295 df-word 14469 df-concat 14525 df-s1 14550 df-s2 14803 df-s3 14804 df-trkgc 27966 df-trkgb 27967 df-trkgcb 27968 df-trkgld 27970 df-trkg 27971 df-cgrg 28029 df-leg 28101 df-mir 28171 df-rag 28212 df-perpg 28214 df-mid 28292 df-lmi 28293

This theorem is referenced by: hypcgrlem2 28318

W3C validator