List on Maxima



One workaround (might need error checking, and  ...)

(%i42) aref(l,[k]) := apply('inpart, cons(l,map(lambda([s], s+1),k)))$

(%i43) aref([a,b,c],0);
(%o43) a

(%i44) aref([[1,2,3],[5,6,7]],0,1);
(%o44) 2

(%i45) m : matrix([1,2,3],[4,5,6],[7,8,9]);
(%o45) matrix([1,2,3],[4,5,6],[7,8,9])

(%i46) aref(m,0,1);
(%o46) 2


The use of apply  will be a problem (too many arguments for some versions 
of CL)

--Barton



From:   Raymond Toy <toy.raymond at gmail.com>
To:     Henry Baker <hbaker1 at pipeline.com>
Cc:     maxima at math.utexas.edu, Miguel Marinho 
<miguelmarinho at seoutopia.com>
Date:   03/09/2012 11:04 AM
Subject:        Re: [Maxima] List on Maxima
Sent by:        maxima-bounces at math.utexas.edu





On Fri, Mar 9, 2012 at 8:58 AM, Henry Baker <hbaker1 at pipeline.com> wrote:
Maxima/Macsyma's Fortran envy strikes again!


What?  Does Macsyma allow zero-indexed lists?

And for those who don't use Fortran, even Fortran 77 (!) supports 
zero-indexed or even negative indexed arrays.  (
http://www.fortran.com/F77_std/rjcnf0001-sh-5.html#sh-5.1.1)

Ray
 _______________________________________________
Maxima mailing list
Maxima at math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima