---

Step * 1 1 1 1 1 1 of Lemma lsep-implies-sep-or-not-colinear


1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. a # bc
7. ∀p:Point. (Colinear(a;b;p) ⇒ p ≠ c)
8. a ≠ x
9. b ≠ x
10. a1 : Point
11. b-a-a1
12. aa1 ≅ ax
13. a2 : Point
14. a1-a-a2
15. aa2 ≅ ax
16. b1 : Point
17. a-b-b1
18. bb1 ≅ bx
19. b2 : Point
20. b1-b-b2
21. bb2 ≅ bx
22. a1 ≠ x
23. a2 ≠ x
24. b1 ≠ x
25. b2 ≠ x
26. Colinear(a;b;x)
27. a-b-x
⊢ False
BY
{ (InstLemma `geo-construction-unicity` [⌜e⌝;⌜a⌝;⌜b⌝;⌜b1⌝;⌜x⌝]⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  x  :  Point
6.  a  \#  bc
7.  \mforall{}p:Point.  (Colinear(a;b;p)  {}\mRightarrow{}  p  \mneq{}  c)
8.  a  \mneq{}  x
9.  b  \mneq{}  x
10.  a1  :  Point
11.  b-a-a1
12.  aa1  \mcong{}  ax
13.  a2  :  Point
14.  a1-a-a2
15.  aa2  \mcong{}  ax
16.  b1  :  Point
17.  a-b-b1
18.  bb1  \mcong{}  bx
19.  b2  :  Point
20.  b1-b-b2
21.  bb2  \mcong{}  bx
22.  a1  \mneq{}  x
23.  a2  \mneq{}  x
24.  b1  \mneq{}  x
25.  b2  \mneq{}  x
26.  Colinear(a;b;x)
27.  a-b-x
\mvdash{}  False


By

---

Latex:
(InstLemma  `geo-construction-unicity`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}b1\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index