Metamath Proof Explorer


Theorem tglineineq

Description: Two distinct lines intersect in at most one point, variation. 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
tglineintmo.a φ A ran L
tglineintmo.b φ B ran L
tglineintmo.c φ A B
tglineineq.x φ X A B
tglineineq.y φ Y A B
Assertion tglineineq φ 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 tglineintmo.a φ A ran L
6 tglineintmo.b φ B ran L
7 tglineintmo.c φ A B
8 tglineineq.x φ X A B
9 tglineineq.y φ Y A B
10 1 2 3 4 5 6 7 tglineintmo φ * x x A x B
11 elin X A B X A X B
12 8 11 sylib φ X A X B
13 elin Y A B Y A Y B
14 9 13 sylib φ Y A Y B
15 eleq1 x = X x A X A
16 eleq1 x = X x B X B
17 15 16 anbi12d x = X x A x B X A X B
18 eleq1 x = Y x A Y A
19 eleq1 x = Y x B Y B
20 18 19 anbi12d x = Y x A x B Y A Y B
21 17 20 moi X A B Y A B * x x A x B X A X B Y A Y B X = Y
22 8 9 10 12 14 21 syl212anc φ X = Y