25 setxunit
7.5 setborder
90 setangle_repere
-5 5 setxrange
-2 2 setyrange
1 1 settkstep
.5 .5 setsubtkstep
1 1 setmkstep
ticks
subticks
marks
traceaxes
axesarrow
/f {setxvar
    x Sin
} def
/g {setxvar
    x Cos
} def
gsave
   bleu
   1.75 setlinewidth
   continu
   {f} courbe
grestore
gsave
   rouge
   1.75 setlinewidth
   pointilles
   {g} courbe
grestore