summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/tkz-euclide/examples/tkzEuclide-13-1-6.tex
blob: f9c12b5df19e1fffc00382d6d615ce744d0b70ee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
\input{preamble-standalone.ltx}
\begin{document}

% Ex. No. 73 (Section 13.1.6 : Drawing a tangent option \tkzimp{from})

  \begin{tikzpicture}[scale=.5]
   \tkzDefPoint(0,0){B}
   \tkzDefPoint(0,8){A}
   \tkzDefSquare(A,B)
   \tkzGetPoints{C}{D}
   \tkzDrawSquare(A,B)
   \tkzClipPolygon(A,B,C,D)
   \tkzDefPoint(4,8){F}
   \tkzDefPoint(4,0){E}
   \tkzDefPoint(4,4){Q}
   \tkzFillPolygon[color = green](A,B,C,D)
   \tkzDrawCircle[fill = orange](B,A)
   \tkzDrawCircle[fill = purple](E,B)
   \tkzDefTangent[from=B](F,A)
   \tkzInterLL(F,tkzFirstPointResult)(C,D)
   \tkzInterLL(A,tkzPointResult)(F,E)
   \tkzDrawCircle[fill = yellow](tkzPointResult,Q)
   \tkzDefPointBy[projection= onto B--A](tkzPointResult)
   \tkzDrawCircle[fill = blue!50!black](tkzPointResult,A)
\end{tikzpicture}

\end{document}