Apprendre Maple

[lol]

bonjour ,
j'ai fait une procédure qui approxime le 0 d'une fonction mais il y a un truc bizarre , lorsque je rentre f(x)=x-racine(2) la procédure me renvoit 1 c'est pas normal , en plus je vois pas vraiment l'erreur dans la procédure même : la tête de la procédure:
bisection:=proc(f,a,b,e);

a1:=a;

b1:=b;

while evalf(b1-a1)>=e do

if evalb(f(a1)*f((a1+b1)/2)<0)=true then b1:=evalf(((a1+b1)/2)) ;

elif evalb(f(a1)*f((a1+b1)/2)>0)=true then a1:=evalf(((a1+b1)/2));

else return(x=evalf((a1+b1)/2));

end if ;

end do;

return(x=evalf(((a1+b1)/2)))

end proc;

[ALS]

Il fallait passer une fonction x->f(x) à la procédure.
Exemple: bissection(x->x-sqrt(2),0,2,10^(-6));