diff options
author | Karl Berry <karl@freefriends.org> | 2011-09-04 16:35:48 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-09-04 16:35:48 +0000 |
commit | 60b4ec6f2bf1ba57aa206b2ac46c454d75f3bf93 (patch) | |
tree | cbf61d6f8bd4a2c6ff62d5e7940e22c352757cfa /Master/texmf-dist/doc/latex/lapdf/roundtri.tex | |
parent | d422465c9efb44dd32ba6a50f6ef9879bce018be (diff) |
lapdf is back (2sep11)
git-svn-id: svn://tug.org/texlive/trunk@23806 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/lapdf/roundtri.tex')
-rw-r--r-- | Master/texmf-dist/doc/latex/lapdf/roundtri.tex | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/lapdf/roundtri.tex b/Master/texmf-dist/doc/latex/lapdf/roundtri.tex new file mode 100644 index 00000000000..9d38ee35f09 --- /dev/null +++ b/Master/texmf-dist/doc/latex/lapdf/roundtri.tex @@ -0,0 +1,37 @@ +% --------------------------------------------------------------------------- +% Rounded Triangles: x=a*exp(cos(t)), y =a*exp(sin(t)) +% --------------------------------------------------------------------------- +\input preamble.tex + +\Defdim(\a,1) +\newdimen\x +\newdimen\y + +\def\Roundtriangle(#1,#2){ + \def\Tx(##1,##2){\Cos(##1,\x) \Pow(2,\Np\x,##2) \Dmul(##2,\a) + ##2=#1##2} + \def\Ty(##1,##2){\Sin(##1,\y) \Pow(2,\Np\y,##2) \Dmul(##2,\a) + ##2=#2##2} + \Tplot(100)(0,6.2832) \Stroke} + +% --------------------------------------------------------------------------- +\begin{document} + +\begin{center} +{\Huge\bf{Rounded Triangles}} +\bigskip + +\begin{lapdf}(18,18)(-9,-9) + \Lingrid(10)(1,2)(-9,9)(-9,9) + \Whiledim{\a<5}{ + \Stepcol(0,23,2) + \Roundtriangle(+1,+1) + \Roundtriangle(-1,+1) + \Roundtriangle(-1,-1) + \Roundtriangle(+1,-1) + \Dadd(\a,0.5)} +\end{lapdf} + +$x=a \cdot 2^{\cos t}$ \qquad $y=a \cdot 2^{\sin t}$ +\end{center} +\end{document} |