|\^/|     Maple V Release 3 (SUNY at Albany)
._|\|   |/|_. Copyright (c) 1981-1994 by Waterloo Maple Software and the
 \  MAPLE  /  University of Waterloo. All rights reserved. Maple and Maple V
 <____ ____>  are registered trademarks of Waterloo Maple Software.
      |       Type ? for help.
Warning: new definition for   norm
Warning: new definition for   trace
Error, unable to read /home2/faculty/cr569/.webmaple
> f := x -> (2*x^4 - 2*x^2 + x + 5) / (x^2 - 3*x - 5);

                                      4      2
                                   2 x  - 2 x  + x + 5
                         f := x -> -------------------
                                        2
                                       x  - 3 x - 5

> f(0);
                                       -1

> Denf := denom(f(x));
                                       2
                              Denf := x  - 3 x - 5

> Numf := numer(f(x));
                                     4      2
                          Numf := 2 x  - 2 x  + x + 5

> simplify(f(x));

                                 4      2
                              2 x  - 2 x  + x + 5
                              -------------------
                                   2
                                  x  - 3 x - 5

> solve(Numf);

                                    4       2
                         RootOf(2 _Z  - 2 _Z  + _Z + 5)

> allvalues(");

         - 1.021241745 - .6484864618 I,  - 1.021241745 + .6484864618 I,

            1.021241745 - .8156805205 I, 1.021241745 + .8156805205 I

> # Use the allvalues command to expand a RootOf. 

> # Notice the imaginary solutions.

> solve(Denf);

                                    1/2              1/2
                        3/2 + 1/2 29   , 3/2 - 1/2 29

> evalf(",2);

                                   4.2, -1.2

> # so the function blows up