Metamath Proof Explorer


Theorem prlngd

Description: Deduce parallelism between two lines A and B . (Contributed by Thierry Arnoux, 18-Jun-2026)

Ref Expression
Hypotheses brprlng.l 𝐿 = ( LineG ‘ 𝐺 )
brprlng.e 𝐸 = ( hlG ‘ 𝐺 )
brprlng.p = ( parlnG ‘ 𝐺 )
brprlng.g ( 𝜑𝐺𝑉 )
prlngd.a ( 𝜑𝐴 ∈ ran 𝐿 )
prlngd.b ( 𝜑𝐵 ∈ ran 𝐿 )
prlngd.h ( 𝜑𝐻 ∈ ran 𝐸 )
prlngd.1 ( 𝜑𝐴𝐻 )
prlngd.2 ( 𝜑𝐵𝐻 )
prlngd.3 ( 𝜑 → ( 𝐴𝐵 ) = ∅ )
Assertion prlngd ( 𝜑𝐴 𝐵 )

Proof

Step Hyp Ref Expression
1 brprlng.l 𝐿 = ( LineG ‘ 𝐺 )
2 brprlng.e 𝐸 = ( hlG ‘ 𝐺 )
3 brprlng.p = ( parlnG ‘ 𝐺 )
4 brprlng.g ( 𝜑𝐺𝑉 )
5 prlngd.a ( 𝜑𝐴 ∈ ran 𝐿 )
6 prlngd.b ( 𝜑𝐵 ∈ ran 𝐿 )
7 prlngd.h ( 𝜑𝐻 ∈ ran 𝐸 )
8 prlngd.1 ( 𝜑𝐴𝐻 )
9 prlngd.2 ( 𝜑𝐵𝐻 )
10 prlngd.3 ( 𝜑 → ( 𝐴𝐵 ) = ∅ )
11 5 6 jca ( 𝜑 → ( 𝐴 ∈ ran 𝐿𝐵 ∈ ran 𝐿 ) )
12 sseq2 ( = 𝐻 → ( 𝐴𝐴𝐻 ) )
13 sseq2 ( = 𝐻 → ( 𝐵𝐵𝐻 ) )
14 12 13 anbi12d ( = 𝐻 → ( ( 𝐴𝐵 ) ↔ ( 𝐴𝐻𝐵𝐻 ) ) )
15 8 9 jca ( 𝜑 → ( 𝐴𝐻𝐵𝐻 ) )
16 14 7 15 rspcedvdw ( 𝜑 → ∃ ∈ ran 𝐸 ( 𝐴𝐵 ) )
17 16 10 jca ( 𝜑 → ( ∃ ∈ ran 𝐸 ( 𝐴𝐵 ) ∧ ( 𝐴𝐵 ) = ∅ ) )
18 17 olcd ( 𝜑 → ( 𝐴 = 𝐵 ∨ ( ∃ ∈ ran 𝐸 ( 𝐴𝐵 ) ∧ ( 𝐴𝐵 ) = ∅ ) ) )
19 1 2 3 4 brprlng ( 𝜑 → ( 𝐴 𝐵 ↔ ( ( 𝐴 ∈ ran 𝐿𝐵 ∈ ran 𝐿 ) ∧ ( 𝐴 = 𝐵 ∨ ( ∃ ∈ ran 𝐸 ( 𝐴𝐵 ) ∧ ( 𝐴𝐵 ) = ∅ ) ) ) ) )
20 11 18 19 mpbir2and ( 𝜑𝐴 𝐵 )