summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/examples/tkzEuclide-22-4-1.tex
blob: 6ddd6bb111d8fa4ea398d0552f992649eb8b1466 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
\input{preamble-standalone.ltx}
\begin{document}

% Ex. No. 162 (Section 22.4.1 : Exemple de marquage d'un angle droit)

\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[fill=blue!20,size=.5,draw](A,H,P)
  \tkzDrawPoints[](A,B,P,H)
  \tkzDrawLines[add=.5 and .5](A,B)
  \tkzMarkRightAngle[fill=red!20,size=.8](B,H,P)
\end{tikzpicture}

\end{document}