-2 2 setxrange -1.5 1.5 setyrange 100 setxunit 5 -3 6 SetCamPos %0.1 0.1 8 SetCamPos 0 0 0 SetCamView -10 10 setxrange3d -3 3 setyrange3d 5 -3 10 setlightsrc 1.5 setlightintensity 2 setlinejoin 20 setfontsize setTimes /n 3 def /r 5 def /aretescachees false def [(geode-35-dual-sommets.dat) run] [(geode-35-dual-faces.dat) run] generesolid dup [.5 .6] solidputhuecolors drawsolid* setTimesItalic (Dual de géode : n=) n ( ) cvs append (, r=) append r ( ) cvs append xmin xmax add 2 div ymin uctext