kill(all);

van=facebook.com/LearningCalculus$

f(x):=3*sin(2*x)-7*sin(x)+2;

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

b:newton(newton(2.986262991961061));

a:newton(newton(0.7954785150026804));

f(a);

f(b);