function florida_shape_read_test ( )

%*****************************************************************************80
%
%% florida_shape_read_test() tests florida_shape_read().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    05 December 2016
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'FLORIDA_SHAPE_READ_TEST():\n' );
  fprintf ( 1, '  FLORIDA_SHAPE_READ returns information defining\n' );
  fprintf ( 1, '  a low-resolution polygonal model of Florida.\n' );

  [ lon, lat ] = florida_shape_read ( );
%
%  Print some of the information.
%
  r8vec2_print_some ( 570, lon, lat, 10, ...
    '  Longitude/Latitude, Florida Polygon Vertices:' ); 
%
%  Write data to a file.
%
  r8vec2_write ( 'florida_shape.txt', 570, lon, lat );
%
%  Show generators, centroids, and Voronoi region together.
% 
  filename = 'florida_shape_read_test.png';
  plot_title = 'Low resolution polygonal outline of Florida';
  florida_shape_display ( lon, lat, filename, plot_title );

  return
end

