summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex')
-rw-r--r--macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex30
1 files changed, 30 insertions, 0 deletions
diff --git a/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex
new file mode 100644
index 0000000000..cfedad22b4
--- /dev/null
+++ b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-12-5-1.tex
@@ -0,0 +1,30 @@
+\input{preamble-standalone.ltx}
+\begin{document}
+
+% Ex. No. 66 (Section 12.5.1 : Random example and circle of Apollonius)
+
+\begin{tikzpicture}[scale=1]
+ \tkzDefPoints{0/0/A,3/0/B}
+ \def\coeffK{2}
+ \tkzApolloniusCenter[K=\coeffK](A,B)
+ \tkzGetPoint{P}
+ \tkzDefApolloniusPoint[K=\coeffK](A,B)
+ \tkzGetPoint{M}
+ \tkzDefApolloniusRadius[K=\coeffK](A,B)
+ \tkzDrawCircle[R,color = blue!50!black,
+ fill=blue!20,
+ opacity=.4](tkzPointResult,\tkzLengthResult pt)
+ \tkzDefRandPointOn[circle through= center P through M]
+ \tkzGetPoint{N}
+ \tkzDrawPoints(A,B,P,M,N)
+ \tkzLabelPoints(A,B,P,M,N)
+ \tkzDrawSegments[red](N,A N,B)
+ \tkzDrawPoints(A,B)
+ \tkzDrawSegments[red](A,B)
+ \tkzLabelCircle[R,draw,fill=green!10,%
+ text width=3cm,%
+ text centered](P,\tkzLengthResult pt-20pt)(-120)%
+ { $MA/MB=\coeffK$\\$NA/NB=\coeffK$}
+\end{tikzpicture}
+
+\end{document}