summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex')
-rw-r--r--macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex24
1 files changed, 24 insertions, 0 deletions
diff --git a/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex
new file mode 100644
index 0000000000..706b2255ca
--- /dev/null
+++ b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-25-3-0.tex
@@ -0,0 +1,24 @@
+\input{preamble-standalone.ltx}
+\begin{document}
+
+% Ex. No. 186 (Section 25.3 : Macro de configuration \tkzcname{tkzSetUpCompass})
+
+\begin{tikzpicture}[scale=.75,
+ showbi/.style={bisector,size=2,gap=3}]
+ \tkzSetUpCompass[color=blue,line width=.3 pt]
+ \tkzDefPoints{0/1/A, 8/3/B, 3/6/C}
+ \tkzDrawPolygon(A,B,C)
+ \tkzDefLine[bisector](B,A,C) \tkzGetPoint{a}
+ \tkzDefLine[bisector](C,B,A) \tkzGetPoint{b}
+ \tkzShowLine[showbi](B,A,C)
+ \tkzShowLine[showbi](C,B,A)
+ \tkzInterLL(A,a)(B,b) \tkzGetPoint{I}
+ \tkzDefPointBy[projection= onto A--B](I)
+ \tkzGetPoint{H}
+ \tkzDrawCircle[radius,color=gray](I,H)
+ \tkzDrawSegments[color=gray!50](I,H)
+ \tkzDrawLines[add=0 and -.2,color=blue!50 ](A,a B,b)
+ \tkzShowBB
+\end{tikzpicture}
+
+\end{document}