Ошибка при замене функции на другую

restart;
                                                 Ëàáîðàòîðíàÿ ðàáîòà ¹1.
                                                 Ðåøåíèå íåëèíåéíûõ óðàâíåíèé.
with(CurveFitting):
f:=(x) -> tan(x)^2-(1+1/sqrt(3))*tan(x)+1/sqrt(3);                       
 
f1:=(x) -> -((1+1/sqrt(3))*sec(x)^2)+(sec(x)^2)*2*tan(x);                       
 
f2:=(x) -> -2*(1+1/sqrt(3))*sec(x)^2*tan(x)+2*((sec(x)^4)+2*(sec(x)^2)*tan(x)^2);                       
 
eps:=1.0e-8;
                                  -8
                            1.0 10  
plot(f(x),x=0..1,axes=BOXED);
 
                                        Òî÷íîå ðåøåíèå
sols:=solve(f(x)=0,x);
                           1     1   
                           - Pi, - Pi
                           4     6   
evalf(sols);
                   0.7853981635, 0.5235987758
                                       Ìåòîä Íüþòîíà
x0:=0.5;
                              0.5
y0:=f(x0):
evalf(y0);
                          0.0140863003
x1:=x0-y0/f1(x0):
evalf(x1);
                          0.5223799605
y1:=f(x1):
evalf(y1);
                          0.0006889973
while (abs(x1-x0) > eps) do
x0:=x1:
y0:=y1:
x1:=x0-y0/f1(x0):
y1:=f(x1):
end do;
Error, cannot determine if this expression is true or false: 0.10e-7 < -(-.2478560794+.1512325034*3^(1/2))/(.120242603-.4328154700*3^(1/2))
otvet:=x1;
                                               (1/2)
                 -0.2478560794 + 0.1512325034 3     
           0.5 - -----------------------------------
                                              (1/2) 
                  0.120242603 - 0.4328154700 3