Fichier 2333.jps — Modifié le 21 Mars 2007 à 18 h 31
30 setxunit
-1 6 setxrange
-1 4 setyrange
traceaxes
axesarrow
marks
/id { setxvar x } def
mixte
xmin xmax {id} Courbe
/f {
setxvar
x 2 exp
1 sub
.5 exp
x add
ln
} def
/g {
cosh
} def
continu
2 setlinewidth
bleu
1.0001 xmax {f} Courbe
noir
pointilles
0 xmax {g} Courbe