---

Step * 1 1 1 1 2 1 1 of Lemma common-P_point-intersecting-P_lines2


1. e : EuclideanParPlane
2. p : Point
3. l : Line
4. n : Line
5. P4 : p I n
6. P5 : p # l
7. l2 : Line
8. L3 : p:Point × n:{n:Line| p I n}  × p # l2
9. l1 : Line
10. L2 : p:Point × n:{n:Line| p I n}  × p # l1
11. ¬((l \/ l2 ∨ n \/ l2) ∧ (∀x:{x:Point| x I l ∧ x I n} . x # l2))
12. ¬((l \/ l1 ∨ n \/ l1) ∧ (∀x:{x:Point| x I l ∧ x I n} . x # l1))
13. l2 \/ l1
14. ∀l,m,n:Line.  (l \/ m ⇒ (l \/ n ∨ m \/ n))
15. l2 \/ l
16. l2 \/ n
17. l2 \/ l ⇐ (l2 # l) ∧ (∃x:Point. (x I l2 ∧ x I l))
18. (l2 # l)
19. x : Point
20. x I l2
21. x I l
22. x I l
23. x I n
24. x I l2
25. x # l1
26. l \/ l1 ∨ n \/ l1
⊢ False
BY
{ (((((D 12 THEN Auto) THEN InstLemma `geo-intersect-unique` [⌜e⌝;⌜l⌝;⌜n⌝;⌜x⌝;⌜x1⌝]⋅) THEN EAuto 1)
    THENA (((InstLemma `geo-intersect-lines-iff` [⌜e⌝;⌜n⌝;⌜l⌝]⋅ THEN Auto) THEN D -1 THEN EAuto 1)
           THEN Unfold `geo-line-sep` 0        
           THEN D 0 With ⌜p⌝ 
           THEN Auto)
    )
   THEN RWO "-1" (24)
   THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  EuclideanParPlane
2.  p  :  Point
3.  l  :  Line
4.  n  :  Line
5.  P4  :  p  I  n
6.  P5  :  p  \#  l
7.  l2  :  Line
8.  L3  :  p:Point  \mtimes{}  n:\{n:Line|  p  I  n\}    \mtimes{}  p  \#  l2
9.  l1  :  Line
10.  L2  :  p:Point  \mtimes{}  n:\{n:Line|  p  I  n\}    \mtimes{}  p  \#  l1
11.  \mneg{}((l  \mbackslash{}/  l2  \mvee{}  n  \mbackslash{}/  l2)  \mwedge{}  (\mforall{}x:\{x:Point|  x  I  l  \mwedge{}  x  I  n\}  .  x  \#  l2))
12.  \mneg{}((l  \mbackslash{}/  l1  \mvee{}  n  \mbackslash{}/  l1)  \mwedge{}  (\mforall{}x:\{x:Point|  x  I  l  \mwedge{}  x  I  n\}  .  x  \#  l1))
13.  l2  \mbackslash{}/  l1
14.  \mforall{}l,m,n:Line.    (l  \mbackslash{}/  m  {}\mRightarrow{}  (l  \mbackslash{}/  n  \mvee{}  m  \mbackslash{}/  n))
15.  l2  \mbackslash{}/  l
16.  l2  \mbackslash{}/  n
17.  l2  \mbackslash{}/  l  \mLeftarrow{}{}  (l2  \#  l)  \mwedge{}  (\mexists{}x:Point.  (x  I  l2  \mwedge{}  x  I  l))
18.  (l2  \#  l)
19.  x  :  Point
20.  x  I  l2
21.  x  I  l
22.  x  I  l
23.  x  I  n
24.  x  I  l2
25.  x  \#  l1
26.  l  \mbackslash{}/  l1  \mvee{}  n  \mbackslash{}/  l1
\mvdash{}  False


By

---

Latex:
(((((D  12  THEN  Auto)  THEN  InstLemma  `geo-intersect-unique`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}x1\mkleeneclose{}]\mcdot{})  THEN  EAuto  1)
    THENA  (((InstLemma  `geo-intersect-lines-iff`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{}]\mcdot{}  THEN  Auto)  THEN  D  -1  THEN  EAuto  1)
                  THEN  Unfold  `geo-line-sep`  0               
                  THEN  D  0  With  \mkleeneopen{}p\mkleeneclose{} 
                  THEN  Auto)
    )
  THEN  RWO  "-1"  (24)
  THEN  Auto)

---

Home Index