function board_ij_init_test ( )

%*****************************************************************************80
%
%% BOARD_IJ_INIT_TEST tests BOARD_IJ_INIT.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    07 November 2017
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'BOARD_IJ_INIT_TEST\n' );
  fprintf ( 1, '  BOARD_IJ_INIT draws an MxN board of cells.\n' );
  fprintf ( 1, '  Each cell is given a unit square, but is drawn\n' );
  fprintf ( 1, '  with a radius R <= 0.5.\n' );
  fprintf ( 1, '  Cells are initialized to have a common foreground color\n' );
  fprintf ( 1, '  They appear on a board of a given background color.\n' );

  clf ( )
  m = 4;
  n = 6;
  r = 0.45;
  white = 'w';
  gray = [ 0.9, 0.9, 0.9 ];

  board_ij_init ( m, n, r, white, gray );

  filename = 'board_ij_init_test.png';
  print ( '-dpng', filename );
  fprintf ( 1, '  Graphics saved as "%s"\n', filename );

  return
end
