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 28884

Description: Lemma for hypcgr 28886, 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 480	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐺 ∈ TarskiG)
6		hypcgr.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
7	6	adantr 480	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐶 ∈ 𝑃)
8		hypcgr.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
9	8	adantr 480	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐴 ∈ 𝑃)
10		hypcgr.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
11	10	adantr 480	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 ∈ 𝑃)
12		hypcgr.d	. . . 4 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
13	12	adantr 480	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 ∈ 𝑃)
14		eqid 2737	. . . . . . 7 ⊢ (LineG‘𝐺) = (LineG‘𝐺)
15		eqid 2737	. . . . . . 7 ⊢ (pInvG‘𝐺) = (pInvG‘𝐺)
16		hypcgr.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
17		hypcgr.1	. . . . . . 7 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
18	1, 2, 3, 14, 15, 4, 8, 16, 6, 17	ragcom 28783	. . . . . 6 ⊢ (𝜑 → ⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺))
19	1, 2, 3, 14, 15, 4, 6, 16, 8	israg 28782	. . . . . 6 ⊢ (𝜑 → (⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴))))
20	18, 19	mpbid 232	. . . . 5 ⊢ (𝜑 → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
21	20	adantr 480	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
22		hypcgrlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐶 = 𝐹)
23	22	eqcomd 2743	. . . . . 6 ⊢ (𝜑 → 𝐹 = 𝐶)
24	23	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 = 𝐶)
25		hypcgr.h	. . . . . . 7 ⊢ (𝜑 → 𝐺Dim_TarskiG≥2)
26	1, 2, 3, 4, 25, 8, 12, 15, 16	ismidb 28863	. . . . . 6 ⊢ (𝜑 → (𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = 𝐵))
27	26	biimpar 477	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴))
28	24, 27	oveq12d 7379	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐹 − 𝐷) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
29	21, 28	eqtr4d 2775	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐹 − 𝐷))
30	1, 2, 3, 5, 7, 9, 11, 13, 29	tgcgrcomlr 28565	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
31		simpr 484	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐴 = 𝐷)
32	22	ad2antrr 727	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐶 = 𝐹)
33	31, 32	oveq12d 7379	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
34	17	ad2antrr 727	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
35	4	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺 ∈ TarskiG)
36	8	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ 𝑃)
37	16	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ 𝑃)
38	6	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐶 ∈ 𝑃)
39	1, 2, 3, 14, 15, 35, 36, 37, 38	israg 28782	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
40	34, 39	mpbid 232	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
41	25	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺Dim_TarskiG≥2)
42		hypcgrlem1.s	. . . . . . 7 ⊢ 𝑆 = ((lInvG‘𝐺)‘((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
43	12	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ∈ 𝑃)
44	1, 2, 3, 35, 41, 36, 43	midcl 28862	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ 𝑃)
45		simplr 769	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ≠ 𝐵)
46	1, 3, 14, 35, 44, 37, 45	tgelrnln 28715	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∈ ran (LineG‘𝐺))
47		eqid 2737	. . . . . . 7 ⊢ ((pInvG‘𝐺)‘𝐵) = ((pInvG‘𝐺)‘𝐵)
48		eqid 2737	. . . . . . . . 9 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
49	1, 2, 3, 14, 15, 35, 37, 47, 38	mircl 28746	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((pInvG‘𝐺)‘𝐵)‘𝐶) ∈ 𝑃)
50		simpr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ 𝐷)
51	1, 2, 3, 35, 41, 36, 43	midbtwn 28864	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐴𝐼𝐷))
52	1, 14, 3, 35, 36, 44, 43, 51	btwncolg3 28642	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 ∈ (𝐴(LineG‘𝐺)(𝐴(midG‘𝐺)𝐷)) ∨ 𝐴 = (𝐴(midG‘𝐺)𝐷)))
53		eqidd 2738	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷 = 𝐷)
54		hypcgrlem2.b	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 = 𝐸)
55	53, 54, 22	s3eqd 14820	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
56	55	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
57		hypcgr.2	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
58	57	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
59	56, 58	eqeltrd 2837	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺))
60	1, 2, 3, 14, 15, 35, 43, 37, 38	israg 28782	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
61	59, 60	mpbid 232	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
62	1, 14, 3, 35, 36, 43, 44, 48, 38, 49, 2, 50, 52, 40, 61	lncgr 28654	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
63	1, 2, 3, 14, 15, 35, 44, 37, 38	israg 28782	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
64	62, 63	mpbird 257	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺))
65	1, 3, 14, 35, 44, 37, 45	tglinerflx1 28718	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
66	1, 3, 14, 35, 44, 37, 45	tglinerflx2 28719	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
67	1, 2, 3, 35, 41, 42, 14, 46, 44, 47, 64, 65, 66, 38, 45	lmimid 28879	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝑆‘𝐶) = (((pInvG‘𝐺)‘𝐵)‘𝐶))
68	67	oveq2d 7377	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
69	40, 68	eqtr4d 2775	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (𝑆‘𝐶)))
70	1, 2, 3, 35, 41, 43, 36	midcom 28867	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) = (𝐴(midG‘𝐺)𝐷))
71	70, 65	eqeltrd 2837	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
72	50	necomd 2988	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ≠ 𝐴)
73	1, 3, 14, 35, 43, 36, 72	tgelrnln 28715	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(LineG‘𝐺)𝐴) ∈ ran (LineG‘𝐺))
74	1, 2, 3, 35, 36, 44, 43, 51	tgbtwncom 28573	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷𝐼𝐴))
75	1, 3, 14, 35, 43, 36, 44, 72, 74	btwnlng1 28704	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷(LineG‘𝐺)𝐴))
76	65, 75	elind 4141	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∩ (𝐷(LineG‘𝐺)𝐴)))
77	1, 3, 14, 35, 43, 36, 72	tglinerflx2 28719	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ (𝐷(LineG‘𝐺)𝐴))
78	45	necomd 2988	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ≠ (𝐴(midG‘𝐺)𝐷))
79	4	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺 ∈ TarskiG)
80	8	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 ∈ 𝑃)
81	12	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐷 ∈ 𝑃)
82	25	ad2antrr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺Dim_TarskiG≥2)
83		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = (𝐴(midG‘𝐺)𝐷))
84	83	eqcomd 2743	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴(midG‘𝐺)𝐷) = 𝐴)
85	1, 2, 3, 79, 82, 80, 81, 84	midcgr 28865	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐴) = (𝐴 − 𝐷))
86	85	eqcomd 2743	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐷) = (𝐴 − 𝐴))
87	1, 2, 3, 79, 80, 81, 80, 86	axtgcgrid 28548	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = 𝐷)
88	87	ex 412	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 = (𝐴(midG‘𝐺)𝐷) → 𝐴 = 𝐷))
89	88	necon3d 2954	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 ≠ 𝐷 → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷)))
90	89	imp 406	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷))
91		hypcgr.e	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
92		hypcgr.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
93	1, 2, 3, 4, 8, 16, 12, 91, 92	tgcgrcomlr 28565	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
94	54	oveq1d 7376	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐸 − 𝐷))
95	93, 94	eqtr4d 2775	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐵 − 𝐷))
96	95	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − 𝐷))
97		eqidd 2738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷))
98	1, 2, 3, 35, 41, 36, 43, 15, 44	ismidb 28863	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷)))
99	97, 98	mpbird 257	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))
100	99	oveq2d 7377	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐷) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
101	96, 100	eqtrd 2772	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
102	1, 2, 3, 14, 15, 35, 37, 44, 36	israg 28782	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))))
103	101, 102	mpbird 257	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺))
104	1, 2, 3, 14, 35, 46, 73, 76, 66, 77, 78, 90, 103	ragperp 28802	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴))
105	104	orcd 874	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))
106	1, 2, 3, 35, 41, 42, 14, 46, 43, 36	islmib 28872	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 = (𝑆‘𝐷) ↔ ((𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∧ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))))
107	71, 105, 106	mpbir2and 714	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 = (𝑆‘𝐷))
108	107	oveq1d 7376	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = ((𝑆‘𝐷) − (𝑆‘𝐶)))
109	1, 2, 3, 35, 41, 42, 14, 46, 43, 38	lmiiso 28882	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝑆‘𝐷) − (𝑆‘𝐶)) = (𝐷 − 𝐶))
110	22	oveq2d 7377	. . . . . 6 ⊢ (𝜑 → (𝐷 − 𝐶) = (𝐷 − 𝐹))
111	110	ad2antrr 727	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − 𝐹))
112	108, 109, 111	3eqtrd 2776	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐷 − 𝐹))
113	69, 112	eqtrd 2772	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
114	33, 113	pm2.61dane 3020	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
115	30, 114	pm2.61dane 3020	1 ⊢ (𝜑 → (𝐴 − 𝐶) = (𝐷 − 𝐹))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 ∨ wo 848 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 class class class wbr 5086 ‘cfv 6493 (class class class)co 7361 2c2 12230 ⟨“cs3 14798 Basecbs 17173 distcds 17223 TarskiGcstrkg 28512 Dim_TarskiG≥cstrkgld 28516 Itvcitv 28518 LineGclng 28519 cgrGccgrg 28595 pInvGcmir 28737 ∟Gcrag 28778 ⟂Gcperpg 28780 midGcmid 28857 lInvGclmi 28858

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5213 ax-sep 5232 ax-nul 5242 ax-pow 5303 ax-pr 5371 ax-un 7683 ax-cnex 11088 ax-resscn 11089 ax-1cn 11090 ax-icn 11091 ax-addcl 11092 ax-addrcl 11093 ax-mulcl 11094 ax-mulrcl 11095 ax-mulcom 11096 ax-addass 11097 ax-mulass 11098 ax-distr 11099 ax-i2m1 11100 ax-1ne0 11101 ax-1rid 11102 ax-rnegex 11103 ax-rrecex 11104 ax-cnre 11105 ax-pre-lttri 11106 ax-pre-lttrn 11107 ax-pre-ltadd 11108 ax-pre-mulgt0 11109

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-uni 4852 df-int 4891 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 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 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7318 df-ov 7364 df-oprab 7365 df-mpo 7366 df-om 7812 df-1st 7936 df-2nd 7937 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-1o 8399 df-oadd 8403 df-er 8637 df-map 8769 df-pm 8770 df-en 8888 df-dom 8889 df-sdom 8890 df-fin 8891 df-dju 9819 df-card 9857 df-pnf 11175 df-mnf 11176 df-xr 11177 df-ltxr 11178 df-le 11179 df-sub 11373 df-neg 11374 df-nn 12169 df-2 12238 df-3 12239 df-n0 12432 df-xnn0 12505 df-z 12519 df-uz 12783 df-fz 13456 df-fzo 13603 df-hash 14287 df-word 14470 df-concat 14527 df-s1 14553 df-s2 14804 df-s3 14805 df-trkgc 28533 df-trkgb 28534 df-trkgcb 28535 df-trkgld 28537 df-trkg 28538 df-cgrg 28596 df-leg 28668 df-mir 28738 df-rag 28779 df-perpg 28781 df-mid 28859 df-lmi 28860

This theorem is referenced by: hypcgrlem2 28885

W3C validator