anim.tex

 
\documentclass{article}
\usepackage{pstricks,pstricks-add,pst-solides3d}
 
\pagestyle{empty}
\begin{document}
 
 
\begin{center}
%\psset{unit=0.75}
\psset{lightsrc=30 -10 10,linewidth=0.5\pslinewidth}
\multido{\r=1+1}{60}{
\psset{SphericalCoor,viewpoint=30 \r\space 30,Decran=50}
\begin{pspicture}(-5,-5)(5,5)
\psSurface[
   fillcolor=cyan!50,algebraic,
   ngrid=.25 .25,incolor=yellow,
   Zmin=-4,Zmax=4,](-4,-4)(4,4){%
   10*(x^3+x*y^4-x/5)*Euler^(-(x^2+y^2))+Euler^(-((x-1.225)^2+y^2)) }
\end{pspicture}
\newpage
}
\end{center}
 
\end{document}