colorz-10.tex

\documentclass[a4paper]{article}
\usepackage{pst-solides3d}
 
\begin{document}
\pagestyle {empty}
\begin{pspicture}(-4,-4.5)(4,4.5)
\psset{viewpoint=50 30 40 rtp2xyz}
\psset{solidmemory}
\psset[pst-solides3d]{color1=red!60}
\psset[pst-solides3d]{color2=red!20}
\defFunction[algebraic]{f}(x,y)
   {cos(abs(x-y))}
   {}
   {}
\psSolid[object=surface*,
%   base=-4 4 -4 4,
   linewidth=.001,
   r=5,
   ngrid=1. .25,
   function=f,
   name=A,
   color1=red!20,
   color2=red!60,
   tablez=-1 .2 1 {} for, 
   zcolor=(Red) (Yellow)
]
 
\end{pspicture}
 
\end{document}