% Input: f,  function handle della funzione f
%        df, function handle della derivata di f, f'
%        x,  ascissa di partenza
%        tol, tolleranza assoluta sulla distanza tra le due ascisse finali
% Output: x, zero di f, f(x)=0
		
function [ x , iter ] = metodo_Newton(f, df, x, tol) 
  Delta = Inf ;
  iter = 0 ;
  while abs( Delta ) > tol
    iter = iter + 1 ;
    % Calcolo del Delta dalla formula di Newton
    f0 = f(x) ;
    Delta = -f0 / df(x) ;  
    
    % Verifica caso che f0 sia lo zero esatto: uscita dal ciclo while
    if f0 == 0 ; break ; end  

    % Calcolo della nuova x
    x = x + Delta ;
  end  
end