Fichier archimede_02.jps — Modifié le 25 Janvier 2008 à 12 h 21
-2 2 setxrange
-1.8 1.5 setyrange
100 setxunit
5 -3 4 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 newcube
dup 1 3 div solidtronque
dup [.5 .6] solidputhuecolors
dup drawsolid*
setTimesItalic
(Cube tronqué)
xmin xmax add 2 div ymin uctext