Metamath Proof Explorer


Theorem tglnpt2

Description: Find a second point on a line. (Contributed by Thierry Arnoux, 18-Oct-2019)

Ref Expression
Hypotheses tglnpt2.p P=BaseG
tglnpt2.i I=ItvG
tglnpt2.l L=Line𝒢G
tglnpt2.g φG𝒢Tarski
tglnpt2.a φAranL
tglnpt2.x φXA
Assertion tglnpt2 φyAXy

Proof

Step Hyp Ref Expression
1 tglnpt2.p P=BaseG
2 tglnpt2.i I=ItvG
3 tglnpt2.l L=Line𝒢G
4 tglnpt2.g φG𝒢Tarski
5 tglnpt2.a φAranL
6 tglnpt2.x φXA
7 4 ad4antr φxPzPA=xLzxzX=xG𝒢Tarski
8 simp-4r φxPzPA=xLzxzX=xxP
9 simpllr φxPzPA=xLzxzX=xzP
10 simplrr φxPzPA=xLzxzX=xxz
11 1 2 3 7 8 9 10 tglinerflx2 φxPzPA=xLzxzX=xzxLz
12 simplrl φxPzPA=xLzxzX=xA=xLz
13 11 12 eleqtrrd φxPzPA=xLzxzX=xzA
14 simpr φxPzPA=xLzxzX=xX=x
15 14 10 eqnetrd φxPzPA=xLzxzX=xXz
16 neeq2 y=zXyXz
17 16 rspcev zAXzyAXy
18 13 15 17 syl2anc φxPzPA=xLzxzX=xyAXy
19 4 ad4antr φxPzPA=xLzxzXxG𝒢Tarski
20 simp-4r φxPzPA=xLzxzXxxP
21 simpllr φxPzPA=xLzxzXxzP
22 simplrr φxPzPA=xLzxzXxxz
23 1 2 3 19 20 21 22 tglinerflx1 φxPzPA=xLzxzXxxxLz
24 simplrl φxPzPA=xLzxzXxA=xLz
25 23 24 eleqtrrd φxPzPA=xLzxzXxxA
26 simpr φxPzPA=xLzxzXxXx
27 neeq2 y=xXyXx
28 27 rspcev xAXxyAXy
29 25 26 28 syl2anc φxPzPA=xLzxzXxyAXy
30 18 29 pm2.61dane φxPzPA=xLzxzyAXy
31 1 2 3 4 5 tgisline φxPzPA=xLzxz
32 30 31 r19.29vva φyAXy