2
0
Fork 0
mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-18 19:18:21 +02:00
LaTeX-examples/documents/GeoTopo/figures/two-perpendiculars.tex
Martin Thoma 7740f0147f Remove trailing spaces
The commands

find . -type f -name '*.md' -exec sed --in-place 's/[[:space:]]\+$//' {} \+

and

find . -type f -name '*.tex' -exec sed --in-place 's/[[:space:]]\+$//' {} \+

were used to do so.
2015-10-14 14:25:34 +02:00

27 lines
No EOL
916 B
TeX

\begin{tikzpicture}
\tkzSetUpPoint[shape=circle,size=10,color=black,fill=black]
\tkzSetUpLine[line width=1]
\tkzDefPoints{0/3/A, 4/0/B, 3/3/P, 3/0.75/G}
\tkzDefLine[perpendicular=through P,/tikz/overlay](A,B)\tkzGetPoint{x}
\tkzInterLL(A,B)(P,x) \tkzGetPoint{F}
\tkzMarkAngle[arc=l,size=0.4cm,color=red,fill=red!20](B,F,P)
\tkzLabelAngle[pos = 0.2](B,F,P){$\cdot$}
\tkzMarkAngle[arc=l,size=0.4cm,color=red,fill=red!20](P,G,A)
\tkzLabelAngle[pos = 0.2](P,G,A){$\cdot$}
\tkzDrawPoints(A,F,P,G)
\tkzDrawSegments(A,B)
\tkzDrawLines(A,B)
\tkzDrawLine[dashed,color=orange,add=0.5 and 0.2](F,P)
\tkzDrawLine[dashed,color=blue,add=0.5 and 0.2](G,P)
%
\tkzLabelPoint[below left](A){$A$}
\tkzLabelPoint[below left](G){$G$}
\tkzLabelPoint[above left](P){$P$}
\tkzLabelPoint[left](F){$F$}
\tkzLabelLine[below,pos=1](A,B){$g$}
\end{tikzpicture}