Metamath Proof Explorer


Theorem hlcgreulem

Description: Lemma for hlcgreu . (Contributed by Thierry Arnoux, 9-Aug-2020)

Ref Expression
Hypotheses ishlg.p ⊢ P = Base G
ishlg.i ⊢ I = Itv ⁡ G
ishlg.k ⊢ K = hl 𝒢 ⁡ G
ishlg.a ⊢ φ → A ∈ P
ishlg.b ⊢ φ → B ∈ P
ishlg.c ⊢ φ → C ∈ P
hlln.1 ⊢ φ → G ∈ 𝒢 Tarski
hltr.d ⊢ φ → D ∈ P
hlcgrex.m ⊢ - ˙ = dist ⁡ G
hlcgrex.1 ⊢ φ → D ≠ A
hlcgrex.2 ⊢ φ → B ≠ C
hlcgreulem.x ⊢ φ → X ∈ P
hlcgreulem.y ⊢ φ → Y ∈ P
hlcgreulem.1 ⊢ φ → X K ⁡ A D
hlcgreulem.2 ⊢ φ → Y K ⁡ A D
hlcgreulem.3 ⊢ φ → A - ˙ X = B - ˙ C
hlcgreulem.4 ⊢ φ → A - ˙ Y = B - ˙ C
Assertion hlcgreulem ⊢ φ → X = Y

Proof

Step Hyp Ref Expression
1 ishlg.p ⊢ P = Base G
2 ishlg.i ⊢ I = Itv ⁡ G
3 ishlg.k ⊢ K = hl 𝒢 ⁡ G
4 ishlg.a ⊢ φ → A ∈ P
5 ishlg.b ⊢ φ → B ∈ P
6 ishlg.c ⊢ φ → C ∈ P
7 hlln.1 ⊢ φ → G ∈ 𝒢 Tarski
8 hltr.d ⊢ φ → D ∈ P
9 hlcgrex.m ⊢ - ˙ = dist ⁡ G
10 hlcgrex.1 ⊢ φ → D ≠ A
11 hlcgrex.2 ⊢ φ → B ≠ C
12 hlcgreulem.x ⊢ φ → X ∈ P
13 hlcgreulem.y ⊢ φ → Y ∈ P
14 hlcgreulem.1 ⊢ φ → X K ⁡ A D
15 hlcgreulem.2 ⊢ φ → Y K ⁡ A D
16 hlcgreulem.3 ⊢ φ → A - ˙ X = B - ˙ C
17 hlcgreulem.4 ⊢ φ → A - ˙ Y = B - ˙ C
18 7 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → G ∈ 𝒢 Tarski
19 4 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ P
20 5 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → B ∈ P
21 6 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → C ∈ P
22 simplr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → y ∈ P
23 12 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → X ∈ P
24 13 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → Y ∈ P
25 simprr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ≠ y
26 25 necomd ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → y ≠ A
27 8 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → D ∈ P
28 1 2 3 12 8 4 7 14 hlcomd ⊢ φ → D K ⁡ A X
29 28 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → D K ⁡ A X
30 simprl ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ D I y
31 1 2 3 27 23 22 18 19 29 30 btwnhl ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ X I y
32 1 9 2 18 23 19 22 31 tgbtwncom ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ y I X
33 1 2 3 13 8 4 7 15 hlcomd ⊢ φ → D K ⁡ A Y
34 33 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → D K ⁡ A Y
35 1 2 3 27 24 22 18 19 34 30 btwnhl ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ Y I y
36 1 9 2 18 24 19 22 35 tgbtwncom ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A ∈ y I Y
37 16 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A - ˙ X = B - ˙ C
38 17 ad2antrr ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → A - ˙ Y = B - ˙ C
39 1 9 2 18 19 20 21 22 23 24 26 32 36 37 38 tgsegconeq ⊢ φ ∧ y ∈ P ∧ A ∈ D I y ∧ A ≠ y → X = Y
40 1 fvexi ⊢ P ∈ V
41 40 a1i ⊢ φ → P ∈ V
42 41 5 6 11 nehash2 ⊢ φ → 2 ≤ P
43 1 9 2 7 8 4 42 tgbtwndiff ⊢ φ → ∃ y ∈ P A ∈ D I y ∧ A ≠ y
44 39 43 r19.29a ⊢ φ → X = Y