Source
autocrop
-2 2 setxrange
-1.8 1.5 setyrange
100 setxunit

5 -3 4 SetCamPos
%0.1 0.1 8 SetCamPos
0 0 0 SetCamView

-10 10 setxrange3d
-3 3 setyrange3d

5 -3 4 setlightsrc
1.5 setlightintensity

2 setlinejoin 
20 setfontsize
setTimes

%/aretescachees false def
1 newdodecaedre
dup [.5 .6] solidputhuecolors

drawsolid*

setTimesItalic
(Dodécaèdre)
xmin xmax add 2 div ymin uctext