Fichier solide_affine_01.jps — Modifié le 10 Mai 2008 à 11 h 25
autocrop
6 -6 4 SetCamPos
0 0 0 SetCamView
2 setlinejoin
.1 setlinewidth
3 newcube
.5 solidtronque
dup .8 solidaffine
%dup .8 solidaffine
dup videsolid
dup [.5 .6] solidputhuecolors
dup (.5 setgray) inputcolors
drawsolid**