function xy_read_test ( input_filename )

%*****************************************************************************80
%
%% XY_READ_TEST tests the XY_READ library.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    01 January 2009
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    string INPUT_FILENAME, the name of the file.
%

%
%  Read the header.
%
  point_num = xy_header_read ( input_filename );
%
%  Read the data.
%
  xy = xy_data_read ( input_filename, point_num );

  return
end
