[pstricks] morphing from a square to a circle over 10 steps

[Poul Riis]

Just one suggestion:

\documentclass{article}
\usepackage{pstricks-add}
\usepackage{multido}

\begin{document}

\begin{pspicture}{->}(-5,-5)(5,5)
\psaxes[ticksize=-3pt 0]{->}(0,0)(-5,-5)(5,5)
\multido{\n=1+0.1}{9}{
\parametricplot[linecolor=red,plotpoints=200]{0}{180}{t cos 5 mul t cos
abs \n\space exp neg 1 add \n\space 1 exch div exp 5 mul}%
\parametricplot[linecolor=red,plotpoints=200]{0}{180}{t cos 5 mul t cos
abs \n\space exp neg 1 add \n\space 1 exch div exp 5 mul neg}}%
\end{pspicture}

\end{document}


Poul Riis