Hello,
I am porting a program from maple to maxima. There is a procedure which
takes an integer "n" as a argument and then creates a certain number of
array's with n (or n-1) elements. One of the arrays, a, then has each
element as an array. Looking through the program, I believe this is the
only tricky part to port. Here is the relevant portion of the maple
program
go:=proc(n1)
local i,j,k,this;
global psi,psisq,psioddpower,psievenpower,sinpsi,lsinp,cospsi,
lambda,a,c,C,Cpp,K,b,m,n,A,x,y;
n:=n1;
m:=1;
a:=array(1..n);
C:=array(0..n);
Cpp:=array(0..n);
K:=array(0..n);
b:='b';
c:='c';
C[0]:=c; Cpp[0]:=-c; K[0]:=1;
j:='j';
for i from 1 to n do
a[i]:=array(1..i);
C[i]:=sum(a[i][j]*c^(2*j+1),j=1..i);
Cpp[i]:=sum(a[i][j]*(-(2*j+1)^2*c^(2*j+1)
+(2*j+1)*(2*j)*c^(2*j-1)),j=1..i);
end do;
I have been reading the "maxima book sept 2004" as well as other
reference material on the website but I can't seem to find any pointers.
Zoho