Fichier 429.jps — Modifié le 12 Janvier 2008 à 14 h 48
%% auteur : Peric
%-1.25 2.75 setxrange
-1.2 2.7 setxrange
-2.9 2.9 setyrange
56.90 setxunit
28.45 setyunit
%1 setymkstep
/xmarkstyle {[1.3 dup] dctext} def
/ymarkstyle {[1.3 dup] cltext} def
/quadrillagewidth[.4 .4 .1] def
continu
gris
[0.25 0.5]{0.5 setlinewidth} Quadrillage
noir
continu
1.2 setlinewidth
%0.5 0.5 setsubtkstep
traceaxes
ticks
marks
/ymarkstyle {[1.3 dup] dltext} def
0 ymark
%tracerepere
axesarrow
<latex>
$x$
</latex>
2.5 0.05 [1.3 dup] drtexlabel
<latex>
$y$
</latex>
0.05 3 [1.3 dup] dltexlabel
/A{-1 2} def
/B{0 0} def
/C{1 -2} def
/D{1.75 0} def
/E{2 2} def
/f{setxvar
#rpn# x^3-3*x
} def
/f'{setxvar
#rpn# 0
} def
gsave
/ahangle{20} def
1.5 setlinewidth
continu
-1 2 {f} (-) Courbe
1 settailletangente
-1 {f} tangente+
1 {f} tangente
grestore