kill(all);

van=facebook.com/LearningCalculus;

y(x):=2^(x+1)-3^(3*x-5);

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

guess:2.376852168930104;

newton(newton(newton(guess)));

float(y(guess));