Présentation de 118.jps

/syracuse/bbgraf/tmp/118.jpg
28.4527 setxunit %% 10 mm 14.2263 setyunit %% 5 mm /arrowscale {.6 dup} def /dotscale {.8 dup} def -4 4 setyrange -3 2.9 setxrange tracerepere xmarks /f {setxvar #rpn# x^3 } def /B {1.4 dup f} def .9 setlinewidth -2 1.2 {f} Courbe noir /hwidth .5 def /hstep 4 def [B] {xdashpoint} papply setTimesItalic (O) O dltext (B) B crtext setTimes (2) indice setTimesItalic setTimes (1) indice #tex# $\vec \jmath $ 0 .5 cltexlabel #tex# $\vec \imath $ .5 0 dctexlabel