% testBisectionRoot.m
% Calls bisectionRoot to find the first positive zero of
% j1(x)=(sin(x)-x*cos(x))/x^2
% J.M.Soler. Nov.2011

% Set bisection interval and tolerance for root
clear all
x1 = pi;
x2 = 2*pi;
dxMax = 1.e-6;

% Find root
x0 = bisectionRoot( @j1, x1, x2, dxMax)
