10 setborder
822 setheight
556 setwidth
%% ces valeurs correspondent a log (0.01) - qquechose et log (100) + qquechose
-2.1 2.1 setxrange
-2.1 2.1 setyrange
%% on passe a l'echelle logarithmique
/xscale {
log
} def
/xscale-1 {
10 ln mul Exp
} def
/yscale {
log
} def
/yscale-1 {
10 ln mul Exp
} def
.009 110 setxrange
.009 110 setyrange
.01 .01 setorigine
gris
.7 setlinewidth
[.01 .1 1 10 100] {svrule} apply
[.01 .1 1 10 100] {shrule} apply
.0095 105 setxrange
.0095 105 setyrange
[-2 2 log_seq] {shrule} apply
[-2 2 log_seq] {svrule} apply
.01 100 setxrange
.01 100 setyrange
.4 setlinewidth
[-2 1 1 stepto] {log_xbande} apply
[-2 1 1 stepto] {log_ybande} apply
|