I made more than one change to solvequad; in addition to
replacing the simpart function call, I replaced
(SOLVE3 (FULLRATSIMP `((MQUOTIENT) ((MPLUS) ,B ,DISCRIM) ,A)) MULT)
with
(SOLVE3 `((MQUOTIENT) ((MPLUS) ,B ,DISCRIM) ,A) MULT)
and made the same change to
(SOLVE3 (FULLRATSIMP `((MQUOTIENT) ((MPLUS) ,B ((MMINUS) ,DISCRIM)) ,A))
MULT))))
I don't think simpnrt is the problem. Removing only the two calls to
fullratsimp alows maxima to solve the equation. Maybe this will help
somebody find the real bug.
Barton