function test_triangulation_test02 ( )

%*****************************************************************************80
%
%% test_triangulation_test02() tests p00_test_num() and p00_sample().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    12 April 2009
%
%  Author:
%
%    John Burkardt
%
  m = 2;

  fprintf ( 1, '\n' );
  fprintf ( 1, 'test_triangulation_test02():\n' );
  fprintf ( 1, '  p00_test_num() reports the number of problems.\n' );
  fprintf ( 1, '  p00_sample() returns sample points from the region.\n' );

  test_num = p00_test_num ( );

  for test = 1 : test_num

    title = p00_title ( test );

    n = 20;

    fprintf ( 1, '\n' );
    fprintf ( 1, '  Test number         =  %d\n', test );
    fprintf ( 1, '  Title:              = "%s"\n', title );
    fprintf ( 1, '  Spatial dimension M =  %d\n', m );
    fprintf ( 1, '  Number of samples N =  %d\n', n );
    fprintf ( 1, '\n' );

    point = p00_sample ( test, m, n );

    r8mat_transpose_print ( m, n, point, '  The sample points:' );

  end

  return
end
