Step
*
1
1
1
1
4
1
3
1
of Lemma
Steiner-LehmusTheorem
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. a # bc
8. a-x-b
9. c-y-b
10. ay ≅ cx
11. cay ≅a bay
12. acx ≅a bcx
13. b # xy
14. m : Point
15. x=m=y
16. x # m
17. a # m
18. t : Point
19. a-m-t
20. mt ≅ am
21. amx ≅a ymt
22. xa ≅ yt
23. xt ≅ ay
24. xay ≅a ytx
25. m # ax
26. ∃p:Point [(a-m-p ∧ b-p-y)]
⊢ ab ≅ cb
BY
{ (Assert geo-parallel-points(e;a;x;y;t) BY
         ((Assert a # xy BY Auto) THEN D -1)) }
1
.....aux..... 
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. a # bc
8. a-x-b
9. c-y-b
10. ay ≅ cx
11. cay ≅a bay
12. acx ≅a bcx
13. b # xy
14. m : Point
15. x=m=y
16. x # m
17. a # m
18. t : Point
19. a-m-t
20. mt ≅ am
21. amx ≅a ymt
22. xa ≅ yt
23. xt ≅ ay
24. xay ≅a ytx
25. m # ax
26. ∃p:Point [(a-m-p ∧ b-p-y)]
27. a leftof xy
⊢ geo-parallel-points(e;a;x;y;t)
2
.....aux..... 
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. a # bc
8. a-x-b
9. c-y-b
10. ay ≅ cx
11. cay ≅a bay
12. acx ≅a bcx
13. b # xy
14. m : Point
15. x=m=y
16. x # m
17. a # m
18. t : Point
19. a-m-t
20. mt ≅ am
21. amx ≅a ymt
22. xa ≅ yt
23. xt ≅ ay
24. xay ≅a ytx
25. m # ax
26. ∃p:Point [(a-m-p ∧ b-p-y)]
27. a leftof yx
⊢ geo-parallel-points(e;a;x;y;t)
3
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. a # bc
8. a-x-b
9. c-y-b
10. ay ≅ cx
11. cay ≅a bay
12. acx ≅a bcx
13. b # xy
14. m : Point
15. x=m=y
16. x # m
17. a # m
18. t : Point
19. a-m-t
20. mt ≅ am
21. amx ≅a ymt
22. xa ≅ yt
23. xt ≅ ay
24. xay ≅a ytx
25. m # ax
26. ∃p:Point [(a-m-p ∧ b-p-y)]
27. geo-parallel-points(e;a;x;y;t)
⊢ ab ≅ cb
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  x  :  Point
6.  y  :  Point
7.  a  \#  bc
8.  a-x-b
9.  c-y-b
10.  ay  \mcong{}  cx
11.  cay  \mcong{}\msuba{}  bay
12.  acx  \mcong{}\msuba{}  bcx
13.  b  \#  xy
14.  m  :  Point
15.  x=m=y
16.  x  \#  m
17.  a  \#  m
18.  t  :  Point
19.  a-m-t
20.  mt  \mcong{}  am
21.  amx  \mcong{}\msuba{}  ymt
22.  xa  \mcong{}  yt
23.  xt  \mcong{}  ay
24.  xay  \mcong{}\msuba{}  ytx
25.  m  \#  ax
26.  \mexists{}p:Point  [(a-m-p  \mwedge{}  b-p-y)]
\mvdash{}  ab  \mcong{}  cb
By
Latex:
(Assert  geo-parallel-points(e;a;x;y;t)  BY
              ((Assert  a  \#  xy  BY  Auto)  THEN  D  -1))
Home
Index