%% auteur : 

-3 3 setxrange
-5 5 setyrange

/f {
   3 exp
} def

70 setxunit
[1 1 .5 .5 .1 .1] {orange} Quadrillage
.7 setlinewidth
tracerepere
marks

<tex>
$$
   y = x^3
$$
</tex>

/dx_boxit 2 def
/dy_boxit 2 def
/fillstyle {jaune fill} def
/linearc .05 def
boxit
2.5 3 [2 dup] cctexlabel
   
1.5 setlinewidth
gsave
      {f} courbe
grestore

setTimesItalic
   (C) Xmax dup f ultext
   (f) indice
   (O) O drtext