Step
*
1
1
of Lemma
geo-intersect-points-symmetry
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a ≠ b
7. c ≠ d
8. a1 : Point
9. b1 : Point
10. c1 : Point
11. d1 : Point
12. v : Point
13. a1-v-b1
14. c1-v-d1
15. Colinear(a1;a;b)
16. Colinear(b1;a;b)
17. Colinear(c1;c;d)
18. Colinear(d1;c;d)
19. a1 leftof c1d1
20. b1 leftof d1c1
21. d1-v-c1
22. a1-v-b1
23. Colinear(d1;c;d)
24. Colinear(c1;c;d)
25. Colinear(a1;a;b)
26. Colinear(b1;a;b)
⊢ d1 leftof a1b1
BY
{ ((InstLemma `between-preserves-left-5` [⌜e⌝;⌜c1⌝;⌜d1⌝;⌜a1⌝;⌜v⌝]⋅ THENA Auto)
   THEN RepeatFor 2 ((FLemma `left-symmetry` [-1] THENA Auto))
   THEN InstLemma `between-preserves-left-1` [⌜e⌝;⌜a1⌝;⌜v⌝;⌜d1⌝;⌜b1⌝]⋅
   THEN Auto) }
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  a  \mneq{}  b
7.  c  \mneq{}  d
8.  a1  :  Point
9.  b1  :  Point
10.  c1  :  Point
11.  d1  :  Point
12.  v  :  Point
13.  a1-v-b1
14.  c1-v-d1
15.  Colinear(a1;a;b)
16.  Colinear(b1;a;b)
17.  Colinear(c1;c;d)
18.  Colinear(d1;c;d)
19.  a1  leftof  c1d1
20.  b1  leftof  d1c1
21.  d1-v-c1
22.  a1-v-b1
23.  Colinear(d1;c;d)
24.  Colinear(c1;c;d)
25.  Colinear(a1;a;b)
26.  Colinear(b1;a;b)
\mvdash{}  d1  leftof  a1b1
By
Latex:
((InstLemma  `between-preserves-left-5`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}c1\mkleeneclose{};\mkleeneopen{}d1\mkleeneclose{};\mkleeneopen{}a1\mkleeneclose{};\mkleeneopen{}v\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  RepeatFor  2  ((FLemma  `left-symmetry`  [-1]  THENA  Auto))
  THEN  InstLemma  `between-preserves-left-1`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a1\mkleeneclose{};\mkleeneopen{}v\mkleeneclose{};\mkleeneopen{}d1\mkleeneclose{};\mkleeneopen{}b1\mkleeneclose{}]\mcdot{}
  THEN  Auto)
Home
Index