-5 5 setxrange
-5 5 setyrange
%% on se garde de la place pour inscrire les graduations
%% et on preserve un entourage de largeur 1
-4 4 setxrange
-4 4 setyrange
%% bricolage pour avoir un repere 'boxed'
4 dup setorigine
traceaxes
%% on met un dictionnaire pour que les redefinitions des 'markstyle'
%% restent locales. Et on redefinit ces styles pour que la
%% numerotation soit suffisamment eloignee du dessin
2 dict begin
/xmarkstyle {(0 3) uctext} def
/ymarkstyle {(3 0) brtext} def
marks
%% la commande 'marks' ne marque pas en O
0 xmark
0 ymark
end
%% et rebelote pour les 2 autres cotes de notre repere
-4 dup setorigine
traceaxes
2 dict begin
/xmarkstyle {(0 -3) dctext} def
/ymarkstyle {(-3 0) bltext} def
marks
%% la commande 'marks' ne marque pas en O
0 xmark
0 ymark
end
%% puis on masque pour rester dans notre nouvelle fenêtre de dessin
masque
quadrillage
0 -3 2 cercle
|