%% %% syntaxe : a b ln_seq : genere une sequence pour une echelle
%% %% logarithmique de graduations entre e^a et e^b
%% %% syntaxe : a b ln_seq
%% %% --> e^a 2.e^a 3.e^a ... 9.e^a e^(a+1) 2.e^(a+1) ... 9.e^(a+1) ... 9.e^b
%% /ln_seq {
%% 5 dict begin
%% /b exch def
%% /a exch def
%% /j 0 def
%% b a sub {
%% /k e a j add exp def
%% /i 1 def
%% 9 {
%% k i mul
%% /i i 1 add store
%% } repeat
%% /j j 1 add store
%% } repeat
%% k i mul
%% end
%% } def
|