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 28744

Description: Lemma for hypcgr 28746, 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 2729	. . . . . . 7 ⊢ (LineG‘𝐺) = (LineG‘𝐺)
15		eqid 2729	. . . . . . 7 ⊢ (pInvG‘𝐺) = (pInvG‘𝐺)
16		hypcgr.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
17		hypcgr.1	. . . . . . 7 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
18	1, 2, 3, 14, 15, 4, 8, 16, 6, 17	ragcom 28643	. . . . . 6 ⊢ (𝜑 → ⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺))
19	1, 2, 3, 14, 15, 4, 6, 16, 8	israg 28642	. . . . . 6 ⊢ (𝜑 → (⟨“𝐶𝐵𝐴”⟩ ∈ (∟G‘𝐺) ↔ (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴))))
20	18, 19	mpbid 232	. . . . 5 ⊢ (𝜑 → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
21	20	adantr 480	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
22		hypcgrlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐶 = 𝐹)
23	22	eqcomd 2735	. . . . . 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 28723	. . . . . 6 ⊢ (𝜑 → (𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = 𝐵))
27	26	biimpar 477	. . . . 5 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → 𝐷 = (((pInvG‘𝐺)‘𝐵)‘𝐴))
28	24, 27	oveq12d 7367	. . . 4 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐹 − 𝐷) = (𝐶 − (((pInvG‘𝐺)‘𝐵)‘𝐴)))
29	21, 28	eqtr4d 2767	. . 3 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐶 − 𝐴) = (𝐹 − 𝐷))
30	1, 2, 3, 5, 7, 9, 11, 13, 29	tgcgrcomlr 28425	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) = 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
31		simpr 484	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐴 = 𝐷)
32	22	ad2antrr 726	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → 𝐶 = 𝐹)
33	31, 32	oveq12d 7367	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
34	17	ad2antrr 726	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺))
35	4	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺 ∈ TarskiG)
36	8	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ 𝑃)
37	16	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ 𝑃)
38	6	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐶 ∈ 𝑃)
39	1, 2, 3, 14, 15, 35, 36, 37, 38	israg 28642	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (⟨“𝐴𝐵𝐶”⟩ ∈ (∟G‘𝐺) ↔ (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶))))
40	34, 39	mpbid 232	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
41	25	ad2antrr 726	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐺Dim_TarskiG≥2)
42		hypcgrlem1.s	. . . . . . 7 ⊢ 𝑆 = ((lInvG‘𝐺)‘((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
43	12	ad2antrr 726	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ∈ 𝑃)
44	1, 2, 3, 35, 41, 36, 43	midcl 28722	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ 𝑃)
45		simplr 768	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ≠ 𝐵)
46	1, 3, 14, 35, 44, 37, 45	tgelrnln 28575	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∈ ran (LineG‘𝐺))
47		eqid 2729	. . . . . . 7 ⊢ ((pInvG‘𝐺)‘𝐵) = ((pInvG‘𝐺)‘𝐵)
48		eqid 2729	. . . . . . . . 9 ⊢ (cgrG‘𝐺) = (cgrG‘𝐺)
49	1, 2, 3, 14, 15, 35, 37, 47, 38	mircl 28606	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((pInvG‘𝐺)‘𝐵)‘𝐶) ∈ 𝑃)
50		simpr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ≠ 𝐷)
51	1, 2, 3, 35, 41, 36, 43	midbtwn 28724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐴𝐼𝐷))
52	1, 14, 3, 35, 36, 44, 43, 51	btwncolg3 28502	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 ∈ (𝐴(LineG‘𝐺)(𝐴(midG‘𝐺)𝐷)) ∨ 𝐴 = (𝐴(midG‘𝐺)𝐷)))
53		eqidd 2730	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷 = 𝐷)
54		hypcgrlem2.b	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 = 𝐸)
55	53, 54, 22	s3eqd 14771	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
56	55	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ = ⟨“𝐷𝐸𝐹”⟩)
57		hypcgr.2	. . . . . . . . . . . 12 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
58	57	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐸𝐹”⟩ ∈ (∟G‘𝐺))
59	56, 58	eqeltrd 2828	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ⟨“𝐷𝐵𝐶”⟩ ∈ (∟G‘𝐺))
60	1, 2, 3, 14, 15, 35, 43, 37, 38	israg 28642	. . . . . . . . . 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 28514	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷) − 𝐶) = ((𝐴(midG‘𝐺)𝐷) − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
63	1, 2, 3, 14, 15, 35, 44, 37, 38	israg 28642	. . . . . . . 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 28578	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
66	1, 3, 14, 35, 44, 37, 45	tglinerflx2 28579	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
67	1, 2, 3, 35, 41, 42, 14, 46, 44, 47, 64, 65, 66, 38, 45	lmimid 28739	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝑆‘𝐶) = (((pInvG‘𝐺)‘𝐵)‘𝐶))
68	67	oveq2d 7365	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐴 − (((pInvG‘𝐺)‘𝐵)‘𝐶)))
69	40, 68	eqtr4d 2767	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐴 − (𝑆‘𝐶)))
70	1, 2, 3, 35, 41, 43, 36	midcom 28727	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) = (𝐴(midG‘𝐺)𝐷))
71	70, 65	eqeltrd 2828	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵))
72	50	necomd 2980	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 ≠ 𝐴)
73	1, 3, 14, 35, 43, 36, 72	tgelrnln 28575	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷(LineG‘𝐺)𝐴) ∈ ran (LineG‘𝐺))
74	1, 2, 3, 35, 36, 44, 43, 51	tgbtwncom 28433	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷𝐼𝐴))
75	1, 3, 14, 35, 43, 36, 44, 72, 74	btwnlng1 28564	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (𝐷(LineG‘𝐺)𝐴))
76	65, 75	elind 4151	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) ∈ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∩ (𝐷(LineG‘𝐺)𝐴)))
77	1, 3, 14, 35, 43, 36, 72	tglinerflx2 28579	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 ∈ (𝐷(LineG‘𝐺)𝐴))
78	45	necomd 2980	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐵 ≠ (𝐴(midG‘𝐺)𝐷))
79	4	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺 ∈ TarskiG)
80	8	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 ∈ 𝑃)
81	12	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐷 ∈ 𝑃)
82	25	ad2antrr 726	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐺Dim_TarskiG≥2)
83		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = (𝐴(midG‘𝐺)𝐷))
84	83	eqcomd 2735	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴(midG‘𝐺)𝐷) = 𝐴)
85	1, 2, 3, 79, 82, 80, 81, 84	midcgr 28725	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐴) = (𝐴 − 𝐷))
86	85	eqcomd 2735	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → (𝐴 − 𝐷) = (𝐴 − 𝐴))
87	1, 2, 3, 79, 80, 81, 80, 86	axtgcgrid 28408	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 = (𝐴(midG‘𝐺)𝐷)) → 𝐴 = 𝐷)
88	87	ex 412	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 = (𝐴(midG‘𝐺)𝐷) → 𝐴 = 𝐷))
89	88	necon3d 2946	. . . . . . . . . 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 28425	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐸 − 𝐷))
94	54	oveq1d 7364	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 − 𝐷) = (𝐸 − 𝐷))
95	93, 94	eqtr4d 2767	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐵 − 𝐷))
96	95	ad2antrr 726	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − 𝐷))
97		eqidd 2730	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷))
98	1, 2, 3, 35, 41, 36, 43, 15, 44	ismidb 28723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐷) = (𝐴(midG‘𝐺)𝐷)))
99	97, 98	mpbird 257	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐷 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴))
100	99	oveq2d 7365	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐷) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
101	96, 100	eqtrd 2764	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐵 − 𝐴) = (𝐵 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐷))‘𝐴)))
102	1, 2, 3, 14, 15, 35, 37, 44, 36	israg 28642	. . . . . . . . . 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 28662	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴))
105	104	orcd 873	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))
106	1, 2, 3, 35, 41, 42, 14, 46, 43, 36	islmib 28732	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 = (𝑆‘𝐷) ↔ ((𝐷(midG‘𝐺)𝐴) ∈ ((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵) ∧ (((𝐴(midG‘𝐺)𝐷)(LineG‘𝐺)𝐵)(⟂G‘𝐺)(𝐷(LineG‘𝐺)𝐴) ∨ 𝐷 = 𝐴))))
107	71, 105, 106	mpbir2and 713	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → 𝐴 = (𝑆‘𝐷))
108	107	oveq1d 7364	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = ((𝑆‘𝐷) − (𝑆‘𝐶)))
109	1, 2, 3, 35, 41, 42, 14, 46, 43, 38	lmiiso 28742	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → ((𝑆‘𝐷) − (𝑆‘𝐶)) = (𝐷 − 𝐶))
110	22	oveq2d 7365	. . . . . 6 ⊢ (𝜑 → (𝐷 − 𝐶) = (𝐷 − 𝐹))
111	110	ad2antrr 726	. . . . 5 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐷 − 𝐶) = (𝐷 − 𝐹))
112	108, 109, 111	3eqtrd 2768	. . . 4 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − (𝑆‘𝐶)) = (𝐷 − 𝐹))
113	69, 112	eqtrd 2764	. . 3 ⊢ (((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) ∧ 𝐴 ≠ 𝐷) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
114	33, 113	pm2.61dane 3012	. 2 ⊢ ((𝜑 ∧ (𝐴(midG‘𝐺)𝐷) ≠ 𝐵) → (𝐴 − 𝐶) = (𝐷 − 𝐹))
115	30, 114	pm2.61dane 3012	1 ⊢ (𝜑 → (𝐴 − 𝐶) = (𝐷 − 𝐹))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 ∨ wo 847 = wceq 1540 ∈ wcel 2109 ≠ wne 2925 class class class wbr 5092 ‘cfv 6482 (class class class)co 7349 2c2 12183 ⟨“cs3 14749 Basecbs 17120 distcds 17170 TarskiGcstrkg 28372 Dim_TarskiG≥cstrkgld 28376 Itvcitv 28378 LineGclng 28379 cgrGccgrg 28455 pInvGcmir 28597 ∟Gcrag 28638 ⟂Gcperpg 28640 midGcmid 28717 lInvGclmi 28718

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 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5218 ax-sep 5235 ax-nul 5245 ax-pow 5304 ax-pr 5371 ax-un 7671 ax-cnex 11065 ax-resscn 11066 ax-1cn 11067 ax-icn 11068 ax-addcl 11069 ax-addrcl 11070 ax-mulcl 11071 ax-mulrcl 11072 ax-mulcom 11073 ax-addass 11074 ax-mulass 11075 ax-distr 11076 ax-i2m1 11077 ax-1ne0 11078 ax-1rid 11079 ax-rnegex 11080 ax-rrecex 11081 ax-cnre 11082 ax-pre-lttri 11083 ax-pre-lttrn 11084 ax-pre-ltadd 11085 ax-pre-mulgt0 11086

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3343 df-reu 3344 df-rab 3395 df-v 3438 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4285 df-if 4477 df-pw 4553 df-sn 4578 df-pr 4580 df-tp 4582 df-op 4584 df-uni 4859 df-int 4897 df-iun 4943 df-br 5093 df-opab 5155 df-mpt 5174 df-tr 5200 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6249 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6438 df-fun 6484 df-fn 6485 df-f 6486 df-f1 6487 df-fo 6488 df-f1o 6489 df-fv 6490 df-riota 7306 df-ov 7352 df-oprab 7353 df-mpo 7354 df-om 7800 df-1st 7924 df-2nd 7925 df-frecs 8214 df-wrecs 8245 df-recs 8294 df-rdg 8332 df-1o 8388 df-oadd 8392 df-er 8625 df-map 8755 df-pm 8756 df-en 8873 df-dom 8874 df-sdom 8875 df-fin 8876 df-dju 9797 df-card 9835 df-pnf 11151 df-mnf 11152 df-xr 11153 df-ltxr 11154 df-le 11155 df-sub 11349 df-neg 11350 df-nn 12129 df-2 12191 df-3 12192 df-n0 12385 df-xnn0 12458 df-z 12472 df-uz 12736 df-fz 13411 df-fzo 13558 df-hash 14238 df-word 14421 df-concat 14478 df-s1 14503 df-s2 14755 df-s3 14756 df-trkgc 28393 df-trkgb 28394 df-trkgcb 28395 df-trkgld 28397 df-trkg 28398 df-cgrg 28456 df-leg 28528 df-mir 28598 df-rag 28639 df-perpg 28641 df-mid 28719 df-lmi 28720

This theorem is referenced by: hypcgrlem2 28745

W3C validator