---

Step * 2 2 2 1 1 of Lemma tarski-erect-perp-same-side


1. e : HeytingGeometry
2. p : Point
3. a : Point
4. b : Point
5. c : Point
6. c # ba
7. x : Point
8. Colinear(a;b;x)
9. ab  ⊥x cx
10. b # x
11. c1 : Point
12. c' : Point
13. c=b=c1
14. c=x=c'
15. c'b ≅ cb
16. c' # c1b
17. b # cc'
18. c1=p=c'
19. ba  ⊥b pb
20. p # ba
21. d : Point
22. p-b-d
23. bd ≅ pb
24. c2 : Point
25. p1 : Point
26. d=a=c2
27. d=b=p
28. pa ≅ da
29. p # c2a
30. a # dp
31. c2=p1=p
32. ab  ⊥a p1a
33. p1 # ab
34. ∃q:Point. (p1-q-d ∧ a-q-b)
⊢ ∃p,t,d:Point. (((ab ⊥ pa ∧ Colinear(a;b;t)) ∧ p-t-d) ∧ geo-tar-same-side(e;c;d;a;b))
BY
{ (Assert c # c'c1 BY
         ((InstLemma `geo-triangle-colinear` [⌜e⌝;⌜b⌝;⌜c⌝;⌜c'⌝;⌜c1⌝]⋅ THENA (Auto THEN D 13 THEN Auto)) THEN Auto)) }

1
1. e : HeytingGeometry
2. p : Point
3. a : Point
4. b : Point
5. c : Point
6. c # ba
7. x : Point
8. Colinear(a;b;x)
9. ab  ⊥x cx
10. b # x
11. c1 : Point
12. c' : Point
13. c=b=c1
14. c=x=c'
15. c'b ≅ cb
16. c' # c1b
17. b # cc'
18. c1=p=c'
19. ba  ⊥b pb
20. p # ba
21. d : Point
22. p-b-d
23. bd ≅ pb
24. c2 : Point
25. p1 : Point
26. d=a=c2
27. d=b=p
28. pa ≅ da
29. p # c2a
30. a # dp
31. c2=p1=p
32. ab  ⊥a p1a
33. p1 # ab
34. ∃q:Point. (p1-q-d ∧ a-q-b)
35. c # c'c1
⊢ ∃p,t,d:Point. (((ab ⊥ pa ∧ Colinear(a;b;t)) ∧ p-t-d) ∧ geo-tar-same-side(e;c;d;a;b))

---

Latex:

---

Latex:

1.  e  :  HeytingGeometry
2.  p  :  Point
3.  a  :  Point
4.  b  :  Point
5.  c  :  Point
6.  c  \#  ba
7.  x  :  Point
8.  Colinear(a;b;x)
9.  ab    \mbot{}x  cx
10.  b  \#  x
11.  c1  :  Point
12.  c'  :  Point
13.  c=b=c1
14.  c=x=c'
15.  c'b  \mcong{}  cb
16.  c'  \#  c1b
17.  b  \#  cc'
18.  c1=p=c'
19.  ba    \mbot{}b  pb
20.  p  \#  ba
21.  d  :  Point
22.  p-b-d
23.  bd  \mcong{}  pb
24.  c2  :  Point
25.  p1  :  Point
26.  d=a=c2
27.  d=b=p
28.  pa  \mcong{}  da
29.  p  \#  c2a
30.  a  \#  dp
31.  c2=p1=p
32.  ab    \mbot{}a  p1a
33.  p1  \#  ab
34.  \mexists{}q:Point.  (p1-q-d  \mwedge{}  a-q-b)
\mvdash{}  \mexists{}p,t,d:Point.  (((ab  \mbot{}  pa  \mwedge{}  Colinear(a;b;t))  \mwedge{}  p-t-d)  \mwedge{}  geo-tar-same-side(e;c;d;a;b))


By

---

Latex:
(Assert  c  \#  c'c1  BY
              ((InstLemma  `geo-triangle-colinear`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}c'\mkleeneclose{};\mkleeneopen{}c1\mkleeneclose{}]\mcdot{}
                  THENA  (Auto  THEN  D  13  THEN  Auto)
                  )
                THEN  Auto
                ))

---

Home Index