Step * of Lemma point-implies-plsep-exists

g:ProjectivePlane. ∀a:Point.  ∃l:Line. a ≠ l
BY
(((((Auto THEN InstLemma `pgeo-three-lines-axiom` [⌜g⌝;⌜a⌝]⋅ THEN Auto) THEN ExRepD)
     THEN ((Duplicate THEN -1) THEN InstLemma `pgeo-three-points-axiom` [⌜g⌝;⌜m⌝]⋅ THEN Auto)
     THEN ExRepD)
    THEN (Duplicate 21 THEN -1)
    THEN ExRepD)
   THEN (InstLemma `LP-sep-or` [⌜g⌝;⌜l1⌝;⌜b⌝;⌜a⌝]⋅ THEN Auto)
   THEN -1) }

1
1. ProjectivePlane
2. Point
3. Line
4. Line
5. Line
6. l
7. m
8. n
9. l ≠ m
10. m ≠ n
11. n ≠ l
12. a1 Point
13. a1 l
14. a1 ≠ m
15. a2 Point
16. Point
17. Point
18. a2 m
19. m
20. m
21. a2 ≠ b
22. b ≠ c
23. c ≠ a2
24. l1 Line
25. a2 l1
26. b ≠ l1
27. a ≠ l1
⊢ ∃l:Line. a ≠ l

2
1. ProjectivePlane
2. Point
3. Line
4. Line
5. Line
6. l
7. m
8. n
9. l ≠ m
10. m ≠ n
11. n ≠ l
12. a1 Point
13. a1 l
14. a1 ≠ m
15. a2 Point
16. Point
17. Point
18. a2 m
19. m
20. m
21. a2 ≠ b
22. b ≠ c
23. c ≠ a2
24. l1 Line
25. a2 l1
26. b ≠ l1
27. a ≠ b
⊢ ∃l:Line. a ≠ l


Latex:


Latex:
\mforall{}g:ProjectivePlane.  \mforall{}a:Point.    \mexists{}l:Line.  a  \mneq{}  l


By


Latex:
(((((Auto  THEN  InstLemma  `pgeo-three-lines-axiom`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{}]\mcdot{}  THEN  Auto)  THEN  ExRepD)
      THEN  ((Duplicate  9  THEN  D  -1)  THEN  InstLemma  `pgeo-three-points-axiom`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{}]\mcdot{}  THEN  Auto)
      THEN  ExRepD)
    THEN  (Duplicate  21  THEN  D  -1)
    THEN  ExRepD)
  THEN  (InstLemma  `LP-sep-or`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}l1\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  D  -1)




Home Index