complex conjugate and modulus



-----maxima-bounces at math.utexas.edu wrote: -----

>For some reason, this lispcode does not work on my system. I
>was using maxima 5.13 with sbcl, the lisp below failed to
>load.

With CVS maxima + SBCL 1.0.13 my code loads and my examples OK. Maybe
fixing
it isn't worthwhile; the Maxima code from Stavros is likely better; with my
code things like

 (%i27) e : sin(x) * conjugate(sin(x));
 (%o27) sin(x)*sin(conjugate(x))

Doesn't work:

 (%i28) conj_to_abs(''e);
 (%o28) sin(x)*sin(conjugate(x))

Works:

 (%i29) conj_to_abs(sin(x) * conjugate(sin(x)));
 (%o29) cabs(sin(x))^2

Barton