function p00_start_test ( )

%*****************************************************************************80
%
%% p00_start_test() evaluates the objective function at each starting point.
%
%  Licensing:
%
%    This code is distributed under the MIT license. 
%
%  Modified:
%
%    03 December 2016
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'p00_start_test():\n' );
  fprintf ( 1, '  p00_start() provides a starting point for minimization.\n' );
%
%  Get the number of problems.
%
  problem_num = p00_problem_num ( );

  for problem = 1 : problem_num

    title = p00_title ( problem );

    fprintf ( 1, '\n' );
    fprintf ( 1, '  %d: "%s"\n', problem, title );
%
%  Get or choose the problem size.
%
    n = p00_n ( problem );

    n_min = n;

    if ( n < 0 )
      n_min = abs ( n_min );
      n = max ( n_min, 4 );
    end

    x = p00_start ( problem, n );

    for i = 1 : n
      if ( i == 1 )
        fprintf ( 1, '  Starting X = ( ' );
      end
      fprintf ( 1, '  %g', x(i) );
      if ( i < n )
        fprintf ( 1, ',' );
        if ( mod ( i, 5 ) == 0 )
          fprintf ( 1, '\n' );
        end
      else
        fprintf ( 1, ' )' );
      end
    end
    fprintf ( 1, '\n' );

  end

  return
end
