Step * 1 of Lemma pgeo-minimum-order-proof2


1. pg ProjectivePlane
2. : ℕ
3. Line
4. p,q:{p:Point| l} //p ≡ ~ ℕ1
⊢ n ≥ 
BY
(SupposeNot
   THEN (InstLemma `pgeo-three-points-axiom` [⌜pg⌝;⌜l⌝]⋅ THENA Auto)
   THEN ExRepD
   THEN (Assert {p:Point| l}  ⊆(p,q:{p:Point| l} //p ≡ q) BY
               Auto)
   THEN (Assert (a ∈ {p:Point| l} ) ∧ (b ∈ {p:Point| l} ) ∧ (c ∈ {p:Point| l} BY
               Auto)
   THEN (InstLemma `cardinality-le-no_repeats-length`  [⌜p,q:{p:Point| l} //p ≡ q⌝;⌜2⌝;⌜[a; b; c]⌝]⋅ THENA Auto)) }

1
1. pg ProjectivePlane
2. : ℕ
3. Line
4. p,q:{p:Point| l} //p ≡ ~ ℕ1
5. ¬(n ≥ )
6. Point
7. Point
8. Point
9. l
10. l
11. l
12. a ≠ b
13. b ≠ c
14. c ≠ a
15. {p:Point| l}  ⊆(p,q:{p:Point| l} //p ≡ q)
16. a ∈ {p:Point| l} 
17. b ∈ {p:Point| l} 
18. c ∈ {p:Point| l} 
⊢ |p,q:{p:Point| l} //p ≡ q| ≤ 2

2
1. pg ProjectivePlane
2. : ℕ
3. Line
4. p,q:{p:Point| l} //p ≡ ~ ℕ1
5. ¬(n ≥ )
6. Point
7. Point
8. Point
9. l
10. l
11. l
12. a ≠ b
13. b ≠ c
14. c ≠ a
15. {p:Point| l}  ⊆(p,q:{p:Point| l} //p ≡ q)
16. a ∈ {p:Point| l} 
17. b ∈ {p:Point| l} 
18. c ∈ {p:Point| l} 
19. no_repeats(p,q:{p:Point| l} //p ≡ q;[c])
⊢ ¬(b ∈ [c])

3
1. pg ProjectivePlane
2. : ℕ
3. Line
4. p,q:{p:Point| l} //p ≡ ~ ℕ1
5. ¬(n ≥ )
6. Point
7. Point
8. Point
9. l
10. l
11. l
12. a ≠ b
13. b ≠ c
14. c ≠ a
15. {p:Point| l}  ⊆(p,q:{p:Point| l} //p ≡ q)
16. a ∈ {p:Point| l} 
17. b ∈ {p:Point| l} 
18. c ∈ {p:Point| l} 
19. no_repeats(p,q:{p:Point| l} //p ≡ q;[b; c])
⊢ ¬(a ∈ [b; c])

4
1. pg ProjectivePlane
2. : ℕ
3. Line
4. p,q:{p:Point| l} //p ≡ ~ ℕ1
5. ¬(n ≥ )
6. Point
7. Point
8. Point
9. l
10. l
11. l
12. a ≠ b
13. b ≠ c
14. c ≠ a
15. {p:Point| l}  ⊆(p,q:{p:Point| l} //p ≡ q)
16. (a ∈ {p:Point| l} ) ∧ (b ∈ {p:Point| l} ) ∧ (c ∈ {p:Point| l} )
17. ||[a; b; c]|| ≤ 2
⊢ n ≥ 


Latex:


Latex:

1.  pg  :  ProjectivePlane
2.  n  :  \mBbbN{}
3.  l  :  Line
4.  p,q:\{p:Point|  p  I  l\}  //p  \mequiv{}  q  \msim{}  \mBbbN{}n  +  1
\mvdash{}  n  \mgeq{}  2 


By


Latex:
(SupposeNot
  THEN  (InstLemma  `pgeo-three-points-axiom`  [\mkleeneopen{}pg\mkleeneclose{};\mkleeneopen{}l\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  ExRepD
  THEN  (Assert  \{p:Point|  p  I  l\}    \msubseteq{}r  (p,q:\{p:Point|  p  I  l\}  //p  \mequiv{}  q)  BY
                          Auto)
  THEN  (Assert  (a  \mmember{}  \{p:Point|  p  I  l\}  )  \mwedge{}  (b  \mmember{}  \{p:Point|  p  I  l\}  )  \mwedge{}  (c  \mmember{}  \{p:Point|  p  I  l\}  )  BY
                          Auto)
  THEN  (InstLemma  `cardinality-le-no\_repeats-length`
                [\mkleeneopen{}p,q:\{p:Point|  p  I  l\}  //p  \mequiv{}  q\mkleeneclose{};\mkleeneopen{}2\mkleeneclose{};\mkleeneopen{}[a;  b;  c]\mkleeneclose{}]\mcdot{}
              THENA  Auto
              ))




Home Index