%Aufgabe 3b Serie 5 marco Weber

function[x_n,x_hist,k]=my_damp_newton(F,Df,x0,tol,maxit,alpha)
x_old=x0
x_hist=x0;
for k=1:1:maxit
    J=Df
x_new = x_o - alpha*(feval(DF,x_old)\feval(F,x_old))
x_hist = [x_hist,x_new];
if(norm(x_n-x_o)<tol)
return
end
x_old = x_new;
end