% Running Newton Method

clear;
% Tolerance
Tol=10^(-20);

%Maximum number of iteration
itmax=200;

% Interval where the analized function will be graphed
A=1;
B=3;

% Initial estimate for the root
p0=2.;

%call to the subroutine

 Newt('fn','fnprima',Tol,itmax, A, B,p0);
% NewtProbl7('fn','fnprima',Tol,itmax, A, B,p0);
 % NewtProbl26('fn','fnprima',Tol,itmax, A, B,p0);
% NewtProbl26b('fn','fnprima',Tol,itmax, A, B,p0);
% NewtProbl26c('fn','fnprima',Tol,itmax, A, B,p0);