autocrop -2 2 setxrange -1.5 1.5 setyrange 100 setxunit 5 -3 6 SetCamPos 0 0 0 SetCamView -10 10 setxrange3d -3 3 setyrange3d 5 -3 10 setlightsrc 1.5 setlightintensity 2 setlinejoin 20 setfontsize setTimes %/aretescachees false def 1 newtetraedre dup .5 solidaffine dup .8 solidaffine dup videsolid dup [.5 .6] solidputhuecolors dup (.8 setgray) inputcolors dup drawsolid** setTimesItalic (Tétračdre) xmin xmax add 2 div ymin uctext