%% syntaxe : array str astr2str --> str
%% convertit le contenu de array en chaines de caracteres puis les
%% concatene avec str, en inserant un caractere "space" apres chaque
%% element du tableau array
/astr2str {
5 dict begin
/str exch def
/table exch def
/n table length def
n 0 eq {
str
} {
table 0 n 1 sub getinterval
table n 1 sub get ( ) cvs
( ) append
str append
astr2str
} ifelse
end
} def
|