18 setfontsize -4 4 setxrange -2 6 setyrange 40 setxunit /f { 2 exp } def [1 1 .5 .5 .1 .1] {orange} Quadrillage tracerepere marks gsave bleu 1.75 setlinewidth {f} courbe grestore setTimesItalic (O) O drtext $$ y = x^2 $$ /dx_boxit 2 def /dy_boxit 2 def /fillstyle {jaune fill} def /linearc .05 def boxit -2.5 -1.5 [2 dup] cctexlabel