Fichier ln_01.jps — Modifié le 15 Mai 2006 à 10 h 13
50 setxunit
-1 6 setxrange
-5 3 setyrange
ticks
subticks
marks
traceaxes
axesarrow
unites
/g {setxvar
#rpn# ln (x)
} def
/f {setxvar
#rpn# x-1
} def
.75 setlinewidth
bleu
0.01 6 {g} Courbe
noir
{f} courbe
/A {e 1} def
A dashpoint
setTimesItalic
(O) O drtext
6.5 settailletangente
e {g} tangente
#latex# $y=\ln x$
4.2 dup g [1.3 dup] drtexlabel
#latex# $y= x-1$
4 dup f [1.3 dup] drtexlabel
#latex# $e$
e 0 [1.3 dup] dctexlabel