Metamath Proof Explorer


Theorem tglnne

Description: It takes two different points to form a line. (Contributed by Thierry Arnoux, 27-Nov-2019)

Ref Expression
Hypotheses tglineelsb2.p 𝐵 = ( Base ‘ 𝐺 )
tglineelsb2.i 𝐼 = ( Itv ‘ 𝐺 )
tglineelsb2.l 𝐿 = ( LineG ‘ 𝐺 )
tglineelsb2.g ( 𝜑𝐺 ∈ TarskiG )
tglnne.x ( 𝜑𝑋𝐵 )
tglnne.y ( 𝜑𝑌𝐵 )
tglnne.1 ( 𝜑 → ( 𝑋 𝐿 𝑌 ) ∈ ran 𝐿 )
Assertion tglnne ( 𝜑𝑋𝑌 )

Proof

Step Hyp Ref Expression
1 tglineelsb2.p 𝐵 = ( Base ‘ 𝐺 )
2 tglineelsb2.i 𝐼 = ( Itv ‘ 𝐺 )
3 tglineelsb2.l 𝐿 = ( LineG ‘ 𝐺 )
4 tglineelsb2.g ( 𝜑𝐺 ∈ TarskiG )
5 tglnne.x ( 𝜑𝑋𝐵 )
6 tglnne.y ( 𝜑𝑌𝐵 )
7 tglnne.1 ( 𝜑 → ( 𝑋 𝐿 𝑌 ) ∈ ran 𝐿 )
8 4 ad3antrrr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝐺 ∈ TarskiG )
9 5 ad3antrrr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑋𝐵 )
10 6 ad3antrrr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑌𝐵 )
11 simpllr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑥𝐵 )
12 simplr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑦𝐵 )
13 simprr ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑥𝑦 )
14 eqid ( dist ‘ 𝐺 ) = ( dist ‘ 𝐺 )
15 1 14 2 8 11 12 tgbtwntriv1 ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑥 ∈ ( 𝑥 𝐼 𝑦 ) )
16 1 2 3 8 11 12 11 13 15 btwnlng1 ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑥 ∈ ( 𝑥 𝐿 𝑦 ) )
17 simprl ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) )
18 16 17 eleqtrrd ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑥 ∈ ( 𝑋 𝐿 𝑌 ) )
19 1 3 2 8 9 10 18 tglngne ( ( ( ( 𝜑𝑥𝐵 ) ∧ 𝑦𝐵 ) ∧ ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) ) → 𝑋𝑌 )
20 1 2 3 4 7 tgisline ( 𝜑 → ∃ 𝑥𝐵𝑦𝐵 ( ( 𝑋 𝐿 𝑌 ) = ( 𝑥 𝐿 𝑦 ) ∧ 𝑥𝑦 ) )
21 19 20 r19.29vva ( 𝜑𝑋𝑌 )