summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex')
-rw-r--r--macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex33
1 files changed, 33 insertions, 0 deletions
diff --git a/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex
new file mode 100644
index 0000000000..68bedb7537
--- /dev/null
+++ b/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-30.1.5.tex
@@ -0,0 +1,33 @@
+\input{preamble-standalone.ltx}
+\begin{document}
+
+% Ex. No. 230 (Section 30.1.5 : Altitudes - other construction)
+
+\begin{tikzpicture}[scale=.75]
+ \tkzDefPoint(0,0){A}
+ \tkzDefPoint(8,0){B}
+ \tkzDefPoint(3.5,10){C}
+ \tkzDefMidPoint(A,B)
+ \tkzGetPoint{O}
+ \tkzDefPointBy[projection=onto A--B](C)
+ \tkzGetPoint{P}
+ \tkzInterLC(C,A)(O,A)
+ \tkzGetSecondPoint{M}
+ \tkzInterLC(C,B)(O,A)
+ \tkzGetFirstPoint{N}
+ \tkzInterLL(B,M)(A,N)
+ \tkzGetPoint{I}
+ \tkzDrawCircle[diameter](A,B)
+ \tkzDrawSegments(C,A C,B A,B B,M A,N)
+ \tkzMarkRightAngles[fill=brown!20](A,M,B A,N,B A,P,C)
+ \tkzDrawSegment[style=dashed,color=orange](C,P)
+ \tkzLabelPoints(O,A,B,P)
+ \tkzLabelPoint[left](M){$M$}
+ \tkzLabelPoint[right](N){$N$}
+ \tkzLabelPoint[above](C){$C$}
+ \tkzLabelPoint[above right](I){$I$}
+ \tkzDrawPoints[color=red](M,N,P,I)
+ \tkzDrawPoints[color=brown](O,A,B,C)
+\end{tikzpicture}
+
+\end{document} \ No newline at end of file