-20 20 setxrange
-20 20 setyrange
7 setxunit
%% on charge les definitions de ligne tenant compte de l'epaisseur
usespecialline
-3 3 setxrange
-3 3 setyrange
%% on dessine notre grille :
%% des lignes entre -2 et 2 ds le repere jps
[-2 2 1 stepto]
dup {shrule} apply
{svrule} apply
|