Édition du fichier fiab

Retour

%autocrop
1.1 setxunit
250 setyunit
7.5 setborder
%% y est dans [ 1 ; 10], donc on regle le yrange
%% entre log (1) et log (10). (avec .3 de plus pour la legende)
%% Le .3 est a ajuster : il correspond a 30% de yunit
-0.1 1.1 setyrange
-20 370 setxrange
0 350 setxrange
%% on definit maintenant l'echelle sur Oy
/yscale {log} def
%% ainsi que l'echelle reciproque
/yscale-1 {10 ln mul Exp} def
%% puis on regle le yrange avec la nouvelle echelle
1 10 setyrange
%% Enfin, on redefinit l'origine du repere
0 1 setorigine
gsave

gsave
orange
0 log_ybande
grestore

gsave
   %% niveau de gris du quadrillage vertical 
   .4 setlinewidth
   0.6 setgray
   %% grillage vertical
   [0 xmax truncate 5 stepto] {svrule} apply
   .6 setlinewidth
   0.4 setgray
   %% grillage vertical
   [0 xmax truncate 50 stepto] 
   dup {svrule} apply
grestore
{xmark} apply

%% grillage simple horizontal
%% niveau de gris du quadrillage horizontal
0.4 setgray
noir %% pour mieux voir (commenter cette ligne pour avoir du gris)
[0 1 log_seq] {shrule} apply
grestore
%% les graduations sur l'axe Oy
[0 1 log_seq] 
dup {ytick} apply
{truncate cvi ymark} apply

traceaxes
axesarrow
masque

Tapez les 3 lettres : AWE

Édition du fichier fiab_001.jps