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=BaseG
tglineintmo.i I=ItvG
tglineintmo.l L=Line𝒢G
tglineintmo.g φG𝒢Tarski
tglineintmo.a φAranL
tglineintmo.b φBranL
tglineintmo.c φAB
tglineineq.x φXAB
tglineineq.y φYAB
Assertion tglineineq φX=Y

Proof

Step Hyp Ref Expression
1 tglineintmo.p P=BaseG
2 tglineintmo.i I=ItvG
3 tglineintmo.l L=Line𝒢G
4 tglineintmo.g φG𝒢Tarski
5 tglineintmo.a φAranL
6 tglineintmo.b φBranL
7 tglineintmo.c φAB
8 tglineineq.x φXAB
9 tglineineq.y φYAB
10 1 2 3 4 5 6 7 tglineintmo φ*xxAxB
11 elin XABXAXB
12 8 11 sylib φXAXB
13 elin YABYAYB
14 9 13 sylib φYAYB
15 eleq1 x=XxAXA
16 eleq1 x=XxBXB
17 15 16 anbi12d x=XxAxBXAXB
18 eleq1 x=YxAYA
19 eleq1 x=YxBYB
20 18 19 anbi12d x=YxAxBYAYB
21 17 20 moi XABYAB*xxAxBXAXBYAYBX=Y
22 8 9 10 12 14 21 syl212anc φX=Y