Step * 2 1 1 of Lemma geo-sep-irrefl_gt-prim


1. EuclideanPlane
2. Point
3. Point
4. Point
5. b ≡ c
6. aa>cc
⊢ False
BY
((Assert BY
          (Unfold `geo-sep` THEN InstLemma  `geo-cong-preserves-gt-prim2` [⌜e⌝;⌜a⌝;⌜a⌝;⌜c⌝;⌜c⌝;⌜a⌝;⌜a⌝]⋅ THEN Auto))
   THEN Auto
   }

1
.....aux..... 
1. EuclideanPlane
2. Point
3. Point
4. Point
5. b ≡ c
6. aa>cc
⊢ cc ≅ aa

2
1. EuclideanPlane
2. Point
3. Point
4. Point
5. b ≡ c
6. aa>cc
7. a
⊢ False


Latex:


Latex:

1.  e  :  EuclideanPlane
2.  c  :  Point
3.  a  :  Point
4.  b  :  Point
5.  b  \mequiv{}  c
6.  aa>cc
\mvdash{}  False


By


Latex:
((Assert  a  \#  a  BY
                (Unfold  `geo-sep`  0
                  THEN  InstLemma    `geo-cong-preserves-gt-prim2`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{}]\mcdot{}
                  THEN  Auto))
  THEN  Auto
  )




Home Index