No, you didn't do anything wrong. For now, I deleted (mfuncall '$declare
'$lambertw '$complex)
and added a comment that we need to do this somewhere. Right now, I can't
think
of how to do this correctly.
My apologies --- I did load & testsuite, not make & testsuite.
Barton
maxima-bounces at math.utexas.edu wrote on 02/19/2008 11:49:33 AM:
> Barton Willis wrote:
> > Update of /cvsroot/maxima/maxima/src
> > In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv21460/src
> >
> > Modified Files:
> > specfn.lisp
> > Log Message:
> > o Declare lambertw to be complex so that imagpart(lambertw(x + %
> i)) --/--> 0.
> > o Add gradef for lambertw.
> >
> > Index: specfn.lisp
> > ===================================================================
> > RCS file: /cvsroot/maxima/maxima/src/specfn.lisp,v
> > retrieving revision 1.21
> > retrieving revision 1.22
> > diff -u -d -r1.21 -r1.22
> > --- specfn.lisp 19 Feb 2008 00:13:04 -0000 1.21
> > +++ specfn.lisp 19 Feb 2008 03:07:06 -0000 1.22
> > @@ -424,6 +424,11 @@
> >
> > ;;; Lambert W
> >
> > +(setf (get '$lambertw 'grad)
> > + '((x) ((mtimes) ((mexpt) x -1) (($lambertw) x) ((mexpt)
> ((mplus) 1 (($lambertw) x)) -1))))
> > +
> > +(mfuncall '$declare '$lambertw '$complex)
>
> Am I doing something wrong? I'm unable to compile maxima because of the
> mfuncall above. Removing it allows me to compile.
>
> Ray
> _______________________________________________
> Maxima mailing list
> Maxima at math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima