Re Martin's bug report:
> rhs(solve(f(x),x)[1]),rectform,numer;
=> complex answer (incorrect)
> y:rhs(solve(f(x),x)[1]);
> y,rectform,numer;
=> real answer (correct)
The problem is in the function MUL2*, which uses f* to multiply
non-fixnums: (MUL2* -1 -150.5) returns -269521184.
The correction is to replace "f*" by "*" in MUL2* (in opers.lisp).
-s