summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/tkz-euclide/examples/tkzeuclide-15-1-5.tex
blob: 60e7b1c69556cccbe264af6f6b17ff8432483d88 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
  \begin{tikzpicture}[scale=.5]
  \tkzDefPoint(0,0){O}
  \tkzDefPoint(6,6){E}
  \tkzDefRandPointOn[circle=center O radius 4cm]
  \tkzGetPoint{A}
  \tkzDefRandPointOn[circle=center O radius 4cm]
  \tkzGetPoint{B}
  \tkzDrawSegments(O,A O,B)
  \tkzDrawCircle(O,A)
  \tkzDefTangent[from with R=E](O,4cm)
  \tkzGetSecondPoint{k}
  \tkzDefTangent[at=A](O)
  \tkzGetPoint{h}
  \tkzDrawPoints(E)
  \tkzDrawLine[add = .5 and .5](A,h)
  \tkzDrawLine[add = .5 and .5](E,k)
  \tkzMarkRightAngle[fill=red!30](O,A,h)
  \end{tikzpicture}