Fichier 213.jps — Modifié le 11 Mars 2006 à 10 h 53
%% auteur :
90 setangle_repere
-3.2 7 setxrange
-8 2.6 setyrange
/quadrillagegray 0.4 def
1 setquadrillagexstep
1 setquadrillageystep
quadrillage
1 1 settkstep
.5 .5 setsubtkstep
1 1 setmkstep
ticks
subticks
marks
traceaxes
unites
/f {setxvar
#rpn# 0.0004044366*x^7-0.002160299*x^6-0.01820935*x^5+0.07477522*x^4+0.1776286*x^3-0.1646595*x^2-0.7518683*x-2
} def
/g {setxvar
#rpn# (2/5)*x-2
} def
gsave
%bleu
0.75 setlinewidth
continu
3 neg 7 {f} Courbe
grestore
gsave
%rouge
0.75 setlinewidth
continu
3 neg 7 {g} Courbe
grestore
/A {-3 2} def
/B {-3 -3.2} def
/O {0 0} def
/I {1 0} def
/J {0 1} def
12 setfontsize
setTimesItalic
(O) O dltext
(I) I uctext
(J) J crtext
%% definition du label
<tex>
$$
y=f(x)
$$
</tex>
A crtexlabel
%% definition du label
<tex>
$$
y=g(x)
$$
</tex>
B crtexlabel