Step * 1 2 1 of Lemma geo-left_functionality


1. EuclideanPlane
2. ∀a,b:Point.  (a  a)
3. ∀a1,a2,b,c:Point.  (a1 ≡ a2  a1 leftof bc  a2 leftof bc)
4. a1 Point
5. a2 Point
6. b1 Point
7. b2 Point
8. c1 Point
9. c2 Point
10. a1 ≡ a2
11. b1 ≡ b2
12. c1 ≡ c2
13. a1 leftof b1c1
14. a2 leftof b1c1
⊢ a2 leftof b2c2
BY
(((FLemma `left-symmetry` [-1] THENA Auto) THEN (Assert b2 leftof c1a2 BY Auto))
   THEN (FLemma `left-symmetry` [-1] THENA Auto)
   THEN (Assert c2 leftof a2b2 BY
               Auto)
   THEN FLemma `left-symmetry` [-1]
   THEN Auto) }


Latex:


Latex:

1.  e  :  EuclideanPlane
2.  \mforall{}a,b:Point.    (a  \#  b  {}\mRightarrow{}  b  \#  a)
3.  \mforall{}a1,a2,b,c:Point.    (a1  \mequiv{}  a2  {}\mRightarrow{}  a1  leftof  bc  {}\mRightarrow{}  a2  leftof  bc)
4.  a1  :  Point
5.  a2  :  Point
6.  b1  :  Point
7.  b2  :  Point
8.  c1  :  Point
9.  c2  :  Point
10.  a1  \mequiv{}  a2
11.  b1  \mequiv{}  b2
12.  c1  \mequiv{}  c2
13.  a1  leftof  b1c1
14.  a2  leftof  b1c1
\mvdash{}  a2  leftof  b2c2


By


Latex:
(((FLemma  `left-symmetry`  [-1]  THENA  Auto)  THEN  (Assert  b2  leftof  c1a2  BY  Auto))
  THEN  (FLemma  `left-symmetry`  [-1]  THENA  Auto)
  THEN  (Assert  c2  leftof  a2b2  BY
                          Auto)
  THEN  FLemma  `left-symmetry`  [-1]
  THEN  Auto)




Home Index