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 28885

Description: Lemma for hypcgr 28887, 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 481	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐺 ∈ TarskiG)
6		hypcgr.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
7	6	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐶 ∈ 𝑃)
8		hypcgr.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
9	8	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐴 ∈ 𝑃)
10		hypcgr.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
11	10	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 ∈ 𝑃)
12		hypcgr.d	. . . 4 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
13	12	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 ∈ 𝑃)
14		eqid 2739	. . . . . . 7 ⊢ (LineG‘𝐺) = (LineG‘𝐺)
15		eqid 2739	. . . . . . 7 ⊢ (pInvG‘𝐺) = (pInvG‘𝐺)
16		hypcgr.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
17		hypcgr.1	. . . . . . 7 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
18	1, 2, 3, 14, 15, 4, 8, 16, 6, 17	ragcom 28784	. . . . . 6 ⊢ (𝜑 → ⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺))
19	1, 2, 3, 14, 15, 4, 6, 16, 8	israg 28783	. . . . . 6 ⊢ (𝜑 → (⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴))))
20	18, 19	mpbid 233	. . . . 5 ⊢ (𝜑 → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
21	20	adantr 481	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
22		hypcgrlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐶 = 𝐹)
23	22	eqcomd 2745	. . . . . 6 ⊢ (𝜑 → 𝐹 = 𝐶)
24	23	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐹 = 𝐶)
25		hypcgr.h	. . . . . . 7 ⊢ (𝜑 → 𝐺Dim_TarskiG≥2)
26	1, 2, 3, 4, 25, 8, 12, 15, 16	ismidb 28864	. . . . . 6 ⊢ (𝜑 → (𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = 𝐵))
27	26	biimpar 478	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴))
28	24, 27	oveq12d 7374	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐹 − 𝐷) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
29	21, 28	eqtr4d 2777	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐹 − 𝐷))
30	1, 2, 3, 5, 7, 9, 11, 13, 29	tgcgrcomlr 28566	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
31		simpr 485	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐴 = 𝐷)
32	22	ad2antrr 732	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐶 = 𝐹)
33	31, 32	oveq12d 7374	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
34	17	ad2antrr 732	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
35	4	ad2antrr 732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺 ∈ TarskiG)
36	8	ad2antrr 732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ 𝑃)
37	16	ad2antrr 732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ 𝑃)
38	6	ad2antrr 732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐶 ∈ 𝑃)
39	1, 2, 3, 14, 15, 35, 36, 37, 38	israg 28783	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
40	34, 39	mpbid 233	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
41	25	ad2antrr 732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺Dim_TarskiG≥2)
42		hypcgrlem1.s	. . . . . . 7 ⊢ 𝑆 = ((lInvG‘𝐺)‘((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
43	12	ad2antrr 732	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ∈ 𝑃)
44	1, 2, 3, 35, 41, 36, 43	midcl 28863	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ 𝑃)
45		simplr 774	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ≠ 𝐵)
46	1, 3, 14, 35, 44, 37, 45	tgelrnln 28716	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∈ ran (LineG‘𝐺))
47		eqid 2739	. . . . . . 7 ⊢ ((pInvG‘𝐺)‘𝐵) = ((pInvG‘𝐺)‘𝐵)
48		eqid 2739	. . . . . . . . 9 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
49	1, 2, 3, 14, 15, 35, 37, 47, 38	mircl 28747	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((pInvG‘𝐺)‘𝐵)‘𝐶) ∈ 𝑃)
50		simpr 485	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ 𝐷)
51	1, 2, 3, 35, 41, 36, 43	midbtwn 28865	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐴𝐼𝐷))
52	1, 14, 3, 35, 36, 44, 43, 51	btwncolg3 28643	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 ∈ (𝐴(LineG‘𝐺)(𝐴(midG‘𝐺)𝐷)) ∨ 𝐴 = (𝐴(midG‘𝐺)𝐷)))
53		eqidd 2740	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷 = 𝐷)
54		hypcgrlem2.b	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 = 𝐸)
55	53, 54, 22	s3eqd 14817	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
56	55	ad2antrr 732	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
57		hypcgr.2	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
58	57	ad2antrr 732	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
59	56, 58	eqeltrd 2839	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺))
60	1, 2, 3, 14, 15, 35, 43, 37, 38	israg 28783	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
61	59, 60	mpbid 233	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
62	1, 14, 3, 35, 36, 43, 44, 48, 38, 49, 2, 50, 52, 40, 61	lncgr 28655	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
63	1, 2, 3, 14, 15, 35, 44, 37, 38	israg 28783	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
64	62, 63	mpbird 258	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“(𝐴(midG‘𝐺)𝐷)𝐵𝐶”⟩ ∈ (∟G‘𝐺))
65	1, 3, 14, 35, 44, 37, 45	tglinerflx1 28719	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
66	1, 3, 14, 35, 44, 37, 45	tglinerflx2 28720	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
67	1, 2, 3, 35, 41, 42, 14, 46, 44, 47, 64, 65, 66, 38, 45	lmimid 28880	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝑆‘𝐶) = (((pInvG‘𝐺)‘𝐵)‘𝐶))
68	67	oveq2d 7372	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
69	40, 68	eqtr4d 2777	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (𝑆‘𝐶)))
70	1, 2, 3, 35, 41, 43, 36	midcom 28868	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) = (𝐴(midG‘𝐺)𝐷))
71	70, 65	eqeltrd 2839	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
72	50	necomd 2989	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ≠ 𝐴)
73	1, 3, 14, 35, 43, 36, 72	tgelrnln 28716	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(LineG‘𝐺)𝐴) ∈ ran (LineG‘𝐺))
74	1, 2, 3, 35, 36, 44, 43, 51	tgbtwncom 28574	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷𝐼𝐴))
75	1, 3, 14, 35, 43, 36, 44, 72, 74	btwnlng1 28705	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷(LineG‘𝐺)𝐴))
76	65, 75	elind 4129	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∩ (𝐷(LineG‘𝐺)𝐴)))
77	1, 3, 14, 35, 43, 36, 72	tglinerflx2 28720	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ (𝐷(LineG‘𝐺)𝐴))
78	45	necomd 2989	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ≠ (𝐴(midG‘𝐺)𝐷))
79	4	ad2antrr 732	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺 ∈ TarskiG)
80	8	ad2antrr 732	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 ∈ 𝑃)
81	12	ad2antrr 732	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐷 ∈ 𝑃)
82	25	ad2antrr 732	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺Dim_TarskiG≥2)
83		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = (𝐴(midG‘𝐺)𝐷))
84	83	eqcomd 2745	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴(midG‘𝐺)𝐷) = 𝐴)
85	1, 2, 3, 79, 82, 80, 81, 84	midcgr 28866	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐴) = (𝐴 − 𝐷))
86	85	eqcomd 2745	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐷) = (𝐴 − 𝐴))
87	1, 2, 3, 79, 80, 81, 80, 86	axtgcgrid 28549	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = 𝐷)
88	87	ex 413	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 = (𝐴(midG‘𝐺)𝐷) → 𝐴 = 𝐷))
89	88	necon3d 2955	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 ≠ 𝐷 → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷)))
90	89	imp 407	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ (𝐴(midG‘𝐺)𝐷))
91		hypcgr.e	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
92		hypcgr.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐷 − 𝐸))
93	1, 2, 3, 4, 8, 16, 12, 91, 92	tgcgrcomlr 28566	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
94	54	oveq1d 7371	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐸 − 𝐷))
95	93, 94	eqtr4d 2777	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐵 − 𝐷))
96	95	ad2antrr 732	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − 𝐷))
97		eqidd 2740	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷))
98	1, 2, 3, 35, 41, 36, 43, 15, 44	ismidb 28864	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷)))
99	97, 98	mpbird 258	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))
100	99	oveq2d 7372	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐷) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
101	96, 100	eqtrd 2774	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
102	1, 2, 3, 14, 15, 35, 37, 44, 36	israg 28783	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))))
103	101, 102	mpbird 258	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐵(𝐴(midG‘𝐺)𝐷)𝐴”⟩ ∈ (∟G‘𝐺))
104	1, 2, 3, 14, 35, 46, 73, 76, 66, 77, 78, 90, 103	ragperp 28803	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴))
105	104	orcd 879	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))
106	1, 2, 3, 35, 41, 42, 14, 46, 43, 36	islmib 28873	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 = (𝑆‘𝐷) ↔ ((𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∧ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))))
107	71, 105, 106	mpbir2and 719	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 = (𝑆‘𝐷))
108	107	oveq1d 7371	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = ((𝑆‘𝐷) − (𝑆‘𝐶)))
109	1, 2, 3, 35, 41, 42, 14, 46, 43, 38	lmiiso 28883	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝑆‘𝐷) − (𝑆‘𝐶)) = (𝐷 − 𝐶))
110	22	oveq2d 7372	. . . . . 6 ⊢ (𝜑 → (𝐷 − 𝐶) = (𝐷 − 𝐹))
111	110	ad2antrr 732	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − 𝐹))
112	108, 109, 111	3eqtrd 2778	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐷 − 𝐹))
113	69, 112	eqtrd 2774	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
114	33, 113	pm2.61dane 3021	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
115	30, 114	pm2.61dane 3021	1 ⊢ (𝜑 → (𝐴 − 𝐶) = (𝐷 − 𝐹))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 ∨ wo 853 = wceq 1547 ∈ wcel 2119 ≠ wne 2934 class class class wbr 5072 ‘cfv 6485 (class class class)co 7356 2c2 12227 ⟨“cs3 14795 Basecbs 17170 distcds 17220 TarskiGcstrkg 28513 Dim_TarskiG≥cstrkgld 28517 Itvcitv 28519 LineGclng 28520 cgrGccgrg 28596 pInvGcmir 28738 ∟Gcrag 28779 ⟂Gcperpg 28781 midGcmid 28858 lInvGclmi 28859

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 2711 ax-rep 5199 ax-sep 5218 ax-nul 5228 ax-pow 5294 ax-pr 5362 ax-un 7678 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106

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 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-nel 3039 df-ral 3054 df-rex 3064 df-rmo 3344 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4262 df-if 4455 df-pw 4531 df-sn 4556 df-pr 4558 df-tp 4560 df-op 4562 df-uni 4839 df-int 4878 df-iun 4923 df-br 5073 df-opab 5135 df-mpt 5154 df-tr 5180 df-id 5513 df-eprel 5518 df-po 5526 df-so 5527 df-fr 5571 df-we 5573 df-xp 5624 df-rel 5625 df-cnv 5626 df-co 5627 df-dm 5628 df-rn 5629 df-res 5630 df-ima 5631 df-pred 6252 df-ord 6313 df-on 6314 df-lim 6315 df-suc 6316 df-iota 6441 df-fun 6487 df-fn 6488 df-f 6489 df-f1 6490 df-fo 6491 df-f1o 6492 df-fv 6493 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-1o 8395 df-oadd 8399 df-er 8633 df-map 8765 df-pm 8766 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-dju 9816 df-card 9854 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-nn 12166 df-2 12235 df-3 12236 df-n0 12429 df-xnn0 12502 df-z 12516 df-uz 12780 df-fz 13453 df-fzo 13600 df-hash 14284 df-word 14467 df-concat 14524 df-s1 14550 df-s2 14801 df-s3 14802 df-trkgc 28534 df-trkgb 28535 df-trkgcb 28536 df-trkgld 28538 df-trkg 28539 df-cgrg 28597 df-leg 28669 df-mir 28739 df-rag 28780 df-perpg 28782 df-mid 28860 df-lmi 28861

This theorem is referenced by: hypcgrlem2 28886

W3C validator