%@AUTEUR: Juergen Gilg
%@DATE: 22 février 2008

\psset{SphericalCoor=true,viewpoint=50 -20 20,Decran=50}
\begin{pspicture}(-8,-8)(8,8)
\psset{unit=5}
\codejps{
    1 newdodecaedre
    dup 0.995 solidchampfreine
    dualpolyedreregulier
    dup videsolid
    dup (rouge) inputcolors
    dup (bleu) outputcolors
    dup drawsolid**
}
\end{pspicture}