triangle-gergonne-point.tex 1.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. \documentclass{article}
  2. \usepackage[pdftex,active,tightpage]{preview}
  3. \setlength\PreviewBorder{2mm}
  4. \usepackage{tikz}
  5. \usepackage{tkz-euclide}
  6. \usetkzobj{all}
  7. \usetikzlibrary{shapes, calc, decorations}
  8. \usepackage{amsmath,amssymb}
  9. \usepackage{helvet}
  10. \usepackage[eulergreek]{sansmath}
  11. \begin{document}
  12. \begin{preview}
  13. \begin{tikzpicture}[very thick,font=\sansmath\sffamily]
  14. \tkzDefPoint(0,0){A}
  15. \tkzDefPoint(6,0){B}
  16. \tkzDefPoint(1,4){C}
  17. \tkzLabelPoints[below left,font=\sansmath\sffamily](A)
  18. \tkzLabelPoints[below right,font=\sansmath\sffamily](B)
  19. \tkzLabelPoints[above,font=\sansmath\sffamily](C)
  20. % Draw polygon
  21. \tkzDrawPolygon[thick,fill=gray!10](A,B,C)
  22. % Draw polygon
  23. \tkzDrawPolygon[thick](A,B,C)
  24. \tkzDefCircle[in,/tikz/overlay](A,B,C) \tkzGetPoint{Ocircle}\tkzGetLength{dOcircle}
  25. \tkzDrawCircle[R](Ocircle,\dOcircle pt)
  26. \tkzInterLC[R,/tikz/overlay](B,C)(Ocircle,\dOcircle pt)\tkzGetPoints{X}{X2}
  27. \tkzInterLC[R,/tikz/overlay](A,C)(Ocircle,\dOcircle pt)\tkzGetPoints{Y}{Y2}
  28. \tkzInterLC[R,/tikz/overlay](A,B)(Ocircle,\dOcircle pt)\tkzGetPoints{Z}{Z2}
  29. \tkzInterLL(A,X)(B,Y)\tkzGetPoint{G}
  30. \tkzDrawSegments[dashed](A,X B,Y C,Z)
  31. \tkzDrawPoints[size=2,fill=black](Ocircle,X,Y,Z)
  32. \tkzDrawPoints[size=2,fill=red,color=red](G)
  33. \tkzLabelPoints[above right,font=\sansmath\sffamily](X)
  34. \tkzLabelPoints[left,font=\sansmath\sffamily](Y)
  35. \tkzLabelPoints[below,font=\sansmath\sffamily](Z)
  36. \tkzLabelPoints[red,above left,font=\sansmath\sffamily](G)
  37. \end{tikzpicture}
  38. \end{preview}
  39. \end{document}