Fichier JPS

Présentation de lect_004a.jps

Retour Texte non formaté Éditer PostScript
/syracuse/bbgraf/albums/analyse_2nd/lect_004a.jpg
 

-3 3 setxrange
-4 4 setyrange
1 1 setsubtkstep

quadrillage

tracerepere
marks

/f {
   setxvar
   x 3 exp
   x 3 mul sub
   1 add
} def

medium setlinewidth
{f} courbe

setTimesItalic
   (y = f) -2 -3.5 text
setTimes
   (\() show
setTimesItalic
   (x) show
setTimes
   (\)) show