diff options
Diffstat (limited to 'Master/texmf-dist/doc/latex/lapdf/hippo.tex')
-rw-r--r-- | Master/texmf-dist/doc/latex/lapdf/hippo.tex | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/lapdf/hippo.tex b/Master/texmf-dist/doc/latex/lapdf/hippo.tex new file mode 100644 index 00000000000..2fe1ec48f9d --- /dev/null +++ b/Master/texmf-dist/doc/latex/lapdf/hippo.tex @@ -0,0 +1,22 @@ +\input preamble.tex + +\Defnum(\n,-1) + +% --------------------------------------------------------------------------- +\begin{document} +\unitlength1.4cm + +\begin{center} +{\Huge\bf{Hippopede Curves}} +\bigskip + +\begin{lapdf}(12,14)(-6,-7) + \Polgrid(1,4)(6) + \def\Px(#1,#2){\Sin(#1,#2) \Dmul(#2,#2) #2=\n#2 + \Dsub(#2,10) #2=-#2 \Sqrt(\Np#2,#2) #2=1.897#2} + \Whilenum{\n<10}{\Add(\n,1) \Stepcol(0,23,2) \Pplot(150)(0,2) \Stroke} +\end{lapdf} + +$r(\phi)=6 \cdot \sqrt{1-c \cdot \sin^2\phi}$ with ($c=0,1 \dots 1,0$) +\end{center} +\end{document} |