summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex')
-rw-r--r--macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex16
1 files changed, 16 insertions, 0 deletions
diff --git a/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex
new file mode 100644
index 0000000000..5e4a94e15a
--- /dev/null
+++ b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-21.4.2.tex
@@ -0,0 +1,16 @@
+\input{preamble-standalone.ltx}
+\begin{document}
+
+% Ex. No. 182 (Section 21.4.2 : Example of marking a right angle, german style)
+
+\begin{tikzpicture}
+ \tkzDefPoints{0/0/A,3/1/B,0.9/-1.2/P}
+ \tkzDefPointBy[projection = onto B--A](P) \tkzGetPoint{H}
+ \tkzDrawLines[add=.5 and .5](P,H)
+ \tkzMarkRightAngle[german,size=.5,draw](A,H,P)
+ \tkzDrawPoints[](A,B,P,H)
+ \tkzDrawLines[add=.5 and .5,fill=blue!20](A,B)
+ \tkzMarkRightAngle[german,size=.8](P,H,B)
+\end{tikzpicture}
+
+\end{document} \ No newline at end of file