%% taille de la fenetre
-2.5 3.5 setxrange
-2 2 setyrange
%% definition des fonctions
/f {Sin} def %% en utilisant la pile d'arguments
/g { %% en utilisant 'setxvar'
setxvar
x Cos
} def
%% repere et graduations
tracerepere
marks
%% l'epaisseur du trait
1.5 setlinewidth
%% trace des courbes
{f} courbe
bleu pointilles
{g} courbe
|