60 setangle_repere
-10 10 setxrange
-6 11 setyrange
-10 6 sub 10 5 add setxrange
masque
/I {5 -4} def
/J {-8 5} def
quadrillage
marks
tracerepere
{} courbe
[I J] points
bleu
I 2.5 cercle
rouge
J 2.5 cercle
noir
setTimesItalic
(I) I urtext
(J) J urtext
|