-3 4 setxrange
-3 6 setyrange
tracerepere
marks
/f {
setxvar
1 x add
-2 x mul Exp
mul
x add
1 add
} def
/f' {pop 0} def
{f} courbe
2 settailletangente
0 (f) tangente
-1 0 {f} Hachcourbe
O point
-1 0 point
/g {1 add} def
setTimesItalic
(C) xmax dup f ultext
(f) indice
(O) O dltext
setSymbol
(D) xmin dup g drtext
mixte
{g} courbe
|