Problem running symmgrp2009.max with recent versions of Maxima

Am Freitag, den 11.11.2011, 08:20 +0000 schrieb Wiltshire R J (AT):
> 
> On 10 Nov 2011, at 20:47, Dieter Kaiser wrote:
> 
> > Am Donnerstag, den 10.11.2011, 08:44 +0000 schrieb Wiltshire R J (AT):
> >> Dear Dieter,
> >> 
> >> 
> >> Thanks for your reply and certainly what you describe is compatible
> >> with the following error message which I get when I run the program
> >> (Maxima 5.25.0 on a Mac):
> >> 
> >> 
> >> 
> >> 
> >> depends: argument must be a symbol; found x[1]   
> >> #0: symmetry(ind1=1,ind2=0,ind3=0)(symmgrp2009.max line 924)
> >> -- an error. To debug this try: debugmode(true);
> >> 
> > 
> > I had a look at the problem in general. I will try an implementation of
> > dependencies which allows subscripted variables in addition. I need some
> > days.
> > 
> > Dieter Kaiser
> > 
> > 
> Thanks for taking time to look at this problem.
> 
> Ron Wiltshire

I have committed a change to the function depends, which allows
subscripted variables. These are examples:

(%i1) depends(g,f,f,[x[1],x[2],x[3]],x,t);
(%o1) [g(f),f(x[1],x[2],x[3]),x(t)]

(%i2) diff(g,f);
(%o2) 'diff(g,f,1)

(%i3) diff(f,x[1]);
(%o3) 'diff(f,x[1],1)

(%i4) diff(x[1],t);
(%o4) 'diff(x[1],t,1)

(%i5) diff(f,x[1],1,x[2],1,x[3],1);
(%o5) 'diff(f,x[1],1,x[2],1,x[3],1)

(%i6) diff(f,t);
(%o6) 'diff(x[3],t,1)*'diff(f,x[3],1)+'diff(x[2],t,1)*'diff(f,x[2],1)
                                     +'diff(x[1],t,1)*'diff(f,x[1],1)
(%i7) diff(g,t);
(%o7) ('diff(x[3],t,1)*'diff(f,x[3],1)+'diff(x[2],t,1)*'diff(f,x[2],1)
                                      +'diff(x[1],t,1)*'diff(f,x[1],1))
 *'diff(g,f,1)

I have added some more examples to the test file rtest5.mac.

I have loaded your file "symmgrp2009.mac" (Be aware, that I have changed
the extension from .max to .mac, because .mac is the default for Maxima
batch files).

Maxima 5.25post http://maxima.sourceforge.net
using Lisp SBCL 1.0.45
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) load("symmgrp2009.mac");
Code symmgrp2009.max of Janurary 1, 2010 is being loaded. 
Code symmgrp2009.max of January 1, 2010 was successfully loaded. 
(%o1)                           symmgrp2009.mac

Now, It would be nice when I could get some simple examples and the
expected results, which I can type into the console to test the package.
I have not installed wxMaxima at this time.

Dieter Kaiser