summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/tkz-euclide/examples/tkzeuclide-31-2-2.tex
blob: 47c8f5aa9ca073e99fd503ca470374eccd7882b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
\begin{tikzpicture}
  \edef\alphaR{\fpeval{asin(2/3)}}
  \edef\xB{8-3*cos(\alphaR)}
  \tkzDrawX[noticks,label=$(d)$]
  \tkzDefPoint["$A$" above right](8,2){A}
  \tkzDefPoint[color=red,"$O$" above right](0,0){O}
  \tkzDefPoint["$B$" above left](\xB,4){B}
  \tkzDefLine[orthogonal=through B](A,B) \tkzGetPoint{b}
  \tkzDefPoint(1,0){i}
  \tkzInterLL(B,b)(O,i) \tkzGetPoint{B'}
  \tkzDrawSegment[line width=1pt](A,B)
  \tkzHLine[color=red,style=dashed]{4}
  \tkzText[above](12,4){$\delta$}
  \tkzDrawCircle[R,color=blue,line width=.8pt](A,3 cm)
  \tkzDrawPoint(B')
  \tkzDrawLine(B,B')
 \end{tikzpicture}