---

Step * 1 1 1 1 1 of Lemma Euclid-Prop21


1. g : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a leftof bc
7. d leftof bc
8. d leftof ca
9. d leftof ab
10. a leftof bd
11. c leftof db
12. x : Point
13. Colinear(b;d;x)
14. a-x-c
15. x ≡ b
⊢ B(bdx)
BY
{ ((Assert False BY
          ((RWO  "-1" (-2) THEN Auto) THEN InstLemma `not-lsep-iff-colinear` [⌜g⌝;⌜a⌝;⌜b⌝;⌜c⌝]⋅ THEN EAuto 1))
   THEN Auto
   ) }

---

Latex:

---

Latex:

1.  g  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  a  leftof  bc
7.  d  leftof  bc
8.  d  leftof  ca
9.  d  leftof  ab
10.  a  leftof  bd
11.  c  leftof  db
12.  x  :  Point
13.  Colinear(b;d;x)
14.  a-x-c
15.  x  \mequiv{}  b
\mvdash{}  B(bdx)


By

---

Latex:
((Assert  False  BY
                ((RWO    "-1"  (-2)  THEN  Auto)
                  THEN  InstLemma  `not-lsep-iff-colinear`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{}]\mcdot{}
                  THEN  EAuto  1))
  THEN  Auto
  )

---

Home Index