Metamath Proof Explorer


Theorem tglineinteq

Description: Two distinct lines intersect in at most one point. Theorem 6.21 of Schwabhauser p. 46. (Contributed by Thierry Arnoux, 6-Aug-2019)

Ref Expression
Hypotheses tglineintmo.p ⊢ P = Base G
tglineintmo.i ⊢ I = Itv ⁡ G
tglineintmo.l ⊢ L = Line 𝒢 ⁡ G
tglineintmo.g ⊢ φ → G ∈ 𝒢 Tarski
tglineinteq.a ⊢ φ → A ∈ P
tglineinteq.b ⊢ φ → B ∈ P
tglineinteq.c ⊢ φ → C ∈ P
tglineinteq.d ⊢ φ → D ∈ P
tglineinteq.e ⊢ φ → ¬ A ∈ B L C ∨ B = C
tglineinteq.1 ⊢ φ → X ∈ A L B
tglineinteq.2 ⊢ φ → Y ∈ A L B
tglineinteq.3 ⊢ φ → X ∈ C L D
tglineinteq.4 ⊢ φ → Y ∈ C L D
Assertion tglineinteq ⊢ φ → X = Y

Proof

Step Hyp Ref Expression
1 tglineintmo.p ⊢ P = Base G
2 tglineintmo.i ⊢ I = Itv ⁡ G
3 tglineintmo.l ⊢ L = Line 𝒢 ⁡ G
4 tglineintmo.g ⊢ φ → G ∈ 𝒢 Tarski
5 tglineinteq.a ⊢ φ → A ∈ P
6 tglineinteq.b ⊢ φ → B ∈ P
7 tglineinteq.c ⊢ φ → C ∈ P
8 tglineinteq.d ⊢ φ → D ∈ P
9 tglineinteq.e ⊢ φ → ¬ A ∈ B L C ∨ B = C
10 tglineinteq.1 ⊢ φ → X ∈ A L B
11 tglineinteq.2 ⊢ φ → Y ∈ A L B
12 tglineinteq.3 ⊢ φ → X ∈ C L D
13 tglineinteq.4 ⊢ φ → Y ∈ C L D
14 1 3 2 4 5 6 10 tglngne ⊢ φ → A ≠ B
15 1 2 3 4 5 6 14 tgelrnln ⊢ φ → A L B ∈ ran ⁡ L
16 1 3 2 4 7 8 12 tglngne ⊢ φ → C ≠ D
17 1 2 3 4 7 8 16 tgelrnln ⊢ φ → C L D ∈ ran ⁡ L
18 1 2 3 4 5 6 7 8 9 tglineneq ⊢ φ → A L B ≠ C L D
19 1 2 3 4 15 17 18 tglineintmo ⊢ φ → ∃* x x ∈ A L B ∧ x ∈ C L D
20 10 12 jca ⊢ φ → X ∈ A L B ∧ X ∈ C L D
21 11 13 jca ⊢ φ → Y ∈ A L B ∧ Y ∈ C L D
22 eleq1 ⊢ x = X → x ∈ A L B ↔ X ∈ A L B
23 eleq1 ⊢ x = X → x ∈ C L D ↔ X ∈ C L D
24 22 23 anbi12d ⊢ x = X → x ∈ A L B ∧ x ∈ C L D ↔ X ∈ A L B ∧ X ∈ C L D
25 eleq1 ⊢ x = Y → x ∈ A L B ↔ Y ∈ A L B
26 eleq1 ⊢ x = Y → x ∈ C L D ↔ Y ∈ C L D
27 25 26 anbi12d ⊢ x = Y → x ∈ A L B ∧ x ∈ C L D ↔ Y ∈ A L B ∧ Y ∈ C L D
28 24 27 moi ⊢ X ∈ A L B ∧ Y ∈ A L B ∧ ∃* x x ∈ A L B ∧ x ∈ C L D ∧ X ∈ A L B ∧ X ∈ C L D ∧ Y ∈ A L B ∧ Y ∈ C L D → X = Y
29 10 11 19 20 21 28 syl212anc ⊢ φ → X = Y