#functions to simulate old maple3 behaviour

olprint:=proc()
 local e;
 for e in args[1..nargs-1] do 
   printf("%s   ", convert(e,string));
 od:
 printf("%s\n", convert(args[nargs], string));
end:

printlist:=proc(list)
 local e;
 for e in list do
  printf(convert(e,string));
 od:
 printf("\n");
end: