Linear equation



hi
I think  Robert  is right.
>Not sure what's up with subtracting %pi over and over.
(%i1) ton:eibe*%e^(%i*phi)*rho*s+%e^(2*%i*phi+2*%i*%pi*m+%i*al)*r*rho^2
                      +2*%e^(%i*%pi*m)*r*rho
                      +%e^(2*%i*phi+2*%i*%pi*m+%i*al)*r;
(%i2) :lisp (setf $%o1 (sublis '(($%PI . $b) ($%I . $c)) $ton))
(%i2) solve([%o1],eibe);
          - c phi    2 c phi + 2 b c m + al c       2       b c m
(%o2) [eibe = - %e      (%e                  r rho  + 2 %e      r rho
                       2 c phi + 2 b c m + al c
                       + %e                r)/(rho s)]
(%i3)  :lisp (setf $%o2 (sublis '(($b . $%PI) ($c . $%I)) $%o2))
(%i3) %o2;
          - %i phi    2 %i phi + 2 %pi %i m + al %i     2
(%o3) [eibe = - %e       (%e                    r rho
           %pi %i m          2 %i phi + 2 %pi %i m + al %i
         + 2 %e        r rho + %e                    r)/(rho s)]
it's correct.
so %pi,%i caused problem.
gosei




2007/6/9, Robert Dodier <robert.dodier at gmail.com>:
>
> > On 6/7/07, George Leeman <george.leeman at sbcglobal.net> wrote:
> >
> > >
> eibe*%e^(%i*phi)*rho*s+%e^(2*%i*phi+2*%i*%pi*m+%i*al)*r*rho^2+2*%e^(%i*%pi*m
> > > )*r*rho+%e^(2*%i*phi+2*%i*%pi*m+%i*al)*r
> > >
> > > (%i2) solve( %, eibe );
> > >
> > > Maxima encountered a Lisp error: Error in PROGN [or a callee]: Bind
> stack
> > > overflow.
>
> After looking into this a little bit, it seems possible the
> problem originates in TIMESIN (in src/simp.lisp).
> Not sure what's going on here.
>
> Robert
> _______________________________________________
> Maxima mailing list
> Maxima at math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima
>