function test02 ( )

%*****************************************************************************80
%
%% test02() runs the tests on a nonpolynomial function.
%
%  Licensing:
%
%    This code is distributed under the MIT license. 
%
%  Modified:
%
%    15 May 2024
%
%  Author:
%
%    John Burkardt
%
  a = 0.9;
  b = 0.4;
  c = 0.5;
%
%  Set the error tolerance.
%
  abserr = 0.00001;
%
%  Tell the program how many derivatives are available.
%
  nder = 3;
%
%  IPOLY is the order of the polynomial function
%  or -1 if the function is not a polynomial.
%
  ipoly = - 1;
%
%  KMAX is the maximum number of iterations.
%
  kmax = 60;
%
%  MULT is the multiplicity of the root.
%  If not known, just set MULT to 1.
%
  mult = 1;
%
%  For modified Newton methods, set the number of substeps.
%
  nsub = 3;

  fprintf ( 1, '\n' );
  fprintf ( 1, 'test02():\n' );
  fprintf ( 1, '  Nonpolynomial function F(X)\n' );
  fprintf ( 1, '  Find a root of F(X) = COS(X) - X\n' );

  zoomin_all_test ( a, b, c, abserr, kmax, @func02, ipoly, mult, nder, nsub );

  return
end
