Script started on Wed Sep 19 16:38:51 2001

lnx1 1> cat tladd
############################################################
#  Tests 
#     ladd
#     laddnew
############################################################
read ladd;

l1 := [1,2,3,4];

############################################################
#  Note the use of the 'printf' procedure, and the '%a'
#  format specification.
############################################################
printf("ladd(...) is %a \n", ladd(l1));
printf("laddnew(...) is %a \n", laddnew(l1));


lnx1 2> maple
    |\^/|     Maple 6 (IBM INTEL LINUX)
._|\|   |/|_. Copyright (c) 2000 by Waterloo Maple Inc.
 \  MAPLE  /  All rights reserved. Maple is a registered trademark of
 <____ ____>  Waterloo Maple Inc.
      |       Type ? for help.
> read tladd;
   l1 := [1, 2, 3, 4]

ladd(...) is 10 
laddnew(...) is 10 
> quit;
bytes used=110940, alloc=131048, time=0.02