kill(all);

van=facebook.com/LearningCalculus$

f(a):=3*(a+1)^(5/2)-5*(a+1)^(3/2)-sqrt(1-a^2)/(sqrt(1-a)*(3*a^3+a-2));

f(x);

newton(t):=float(subst(t,x,x-f(x)/diff(f(x),x)));

newton(newton(newton(0.9)));

newton(newton(newton(0.48)));

newton(newton(newton(-.9)));