%% syntaxe : n log_ymark --> affiche la numerotation en 10^n sur Oy
/log_ymark {
1 dict begin
/y exch def
setCourrier
y 0 eq
{
(1) Ox y yscale-1 ymarkstyle
}
{
(10) Ox y yscale-1 ymarkstyle
y 1 eq
{}
{y cvi chaine cvs exposant}
ifelse
}
ifelse
end
} def
|