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/line.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/line.tex')
-rw-r--r-- | Master/texmf-dist/doc/latex/lapdf/line.tex | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/lapdf/line.tex b/Master/texmf-dist/doc/latex/lapdf/line.tex new file mode 100644 index 00000000000..2fd0f67ceb8 --- /dev/null +++ b/Master/texmf-dist/doc/latex/lapdf/line.tex @@ -0,0 +1,45 @@ +\input preamble.tex + +\Defnum(\n,10) +\Defdim(\m,0) +\Defdim(\r,7) +\newdimen\a +\newdimen\x +\newdimen\y + +% --------------------------------------------------------------------------- +\begin{document} +\unitlength1.25cm + +\begin{center} +{\Huge\bf{Line}} +\bigskip + +\begin{lapdf}(14,14)(-7,-7) + \Whiledim{\m<360}{\Rad(\Np\m,\a) + \Cos(\Np\a,\x) \Mul(\x,7) + \Sin(\Np\a,\y) \Mul(\y,7) + \Nextcol(0,23) + \Line(0,0)(\Np\x,\Np\y) \Stroke + \Dadd(\m,7.5)} +\end{lapdf} +\end{center} + +\newpage + +\begin{center} +{\Huge\bf{Lineto}} +\bigskip + +\begin{lapdf}(14,14)(-7,-7) + \Moveto(\Np\r,0) + \Whilenum{\n<1445}{\Rad(\n,\a) + \Cos(\Np\a,\x) \Dmul(\x,\r) + \Sin(\Np\a,\y) \Dmul(\y,\r) + \Nextcol(0,23) + \Lineto(\Np\x,\Np\y) \Stroke + \Moveto(\Np\x,\Np\y) + \Add(\n,10) \Dsub(\r,0.05)} +\end{lapdf} +\end{center} +\end{document} |