Question: Approximation

Can someone help me please?

> eq1 := 0;

> m2 := 1;

                              
> c2 := -1;

> m3 := 13/45;

> c3 := .99;


> h := 1;

                                     
> r := 4;

                                     
> k := 3;

                                     
> eq2 := m2*x+c2;

> eq3 := m3*x+c3;
     
> circleequation := (x-h)^2+(eq1-k)^2-r^2;


> A := solve(eq2 = eq1, x);


> eq2 := m2*x+c2;

> eq3 := m3*x+c3;

> B := solve(eq3 = eq2, x);



> x1 := min(solve((x-h)^2+(eq2-k)^2-r^2));

> x2 := min(solve(eq1 = circleequation));

> if x1 < A then lowerbound := x2 else lowerbound := x1 end if;

Error, cannot determine if this expression is true or false: -(1/2)*23^(1/2) < -3/2

> x1 := max(solve((x-h)^2+(eq2-k)^2-r^2));

> x3 := max(solve((x-h)^2+(eq3-k)^2-r^2));

> if x1 > B then upperbound := x3 else upperbound := x1 end if;

Error, cannot determine if this expression is true or false: 0. < -.298437500+(1/2)*23^(1/2)

x1, x1 and x3 are yielding values in surd form. is there any way I could get maple to approximate the values so that they can be used further in the algorithm?

thanks

Nash