Step * 2 of Lemma hp-right-angles-out


1. EuclideanPlane
2. Point
3. Point
4. p1 Point
5. p2 Point
6. Rbap1
7. Rbap2
8. p1 ab
9. p1 leftof ab  p2 leftof ab
10. p1 leftof ab  p2 leftof ab
11. p1 leftof ba  p2 leftof ba
12. p1 leftof ba  p2 leftof ba
⊢ ¬((¬a_p1_p2) ∧ a_p2_p1))
BY
((Assert Colinear(p1;a;p2) BY
          GeometryFor ``right-angle geo-colinear geo-sep`` 2)
   THEN gSimpleColinearCases (-1)
   THEN Auto) }

1
1. EuclideanPlane
2. Point
3. Point
4. p1 Point
5. p2 Point
6. Rbap1
7. Rbap2
8. p1 ab
9. p1 leftof ab  p2 leftof ab
10. p1 leftof ab  p2 leftof ab
11. p1 leftof ba  p2 leftof ba
12. p1 leftof ba  p2 leftof ba
13. Colinear(p1;a;p2)
14. p1_a_p2
⊢ ¬((¬a_p1_p2) ∧ a_p2_p1))


Latex:


Latex:

1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  p1  :  Point
5.  p2  :  Point
6.  Rbap1
7.  Rbap2
8.  p1  \#  ab
9.  p1  leftof  ab  {}\mRightarrow{}  p2  leftof  ab
10.  p1  leftof  ab  \mLeftarrow{}{}  p2  leftof  ab
11.  p1  leftof  ba  {}\mRightarrow{}  p2  leftof  ba
12.  p1  leftof  ba  \mLeftarrow{}{}  p2  leftof  ba
\mvdash{}  \mneg{}((\mneg{}a\_p1\_p2)  \mwedge{}  (\mneg{}a\_p2\_p1))


By


Latex:
((Assert  Colinear(p1;a;p2)  BY
                GeometryFor  ``right-angle  geo-colinear  geo-sep``  2)
  THEN  gSimpleColinearCases  (-1)
  THEN  Auto)




Home Index