%% taille de la fenetre
-3.5 3.5 setxrange
-2 2 setyrange
%% definition de la fonction
/f {
Cos
} def
%% definition du dessin auquel on veut appliquer l'effet relief
/dessin {
tracerepere %% le repere
marks %% les graduation
gsave %% on encapsule le changement de couleur
bleu
{f} courbe %% dessin de la courbe
grestore %% fin de l'encapsulage
setTimesItalic %% la legende
(O) O drtext
} def
%% l'epaisseur du trait
1.5 setlinewidth
%% le dessin avec l'effet
{dessin} relief
|