function boundary_rotate_test ( )

%*****************************************************************************80
%
%% boundary_rotate_test() tests boundary_rotate().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    11 November 2020
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'boundary_rotate_test():\n' );
  fprintf ( 1, '  MATLAB/Octave version %s\n', version ( ) );
  fprintf ( 1, '  boundary_rotate() rotates a polyiamond\n' );
  fprintf ( 1, '  described by its boundary word.\n' );

  for r = 0 : 6
    [ w, p ] = boundary_hexiamond ( 10 );
    [ w2, p2 ] = boundary_rotate ( w, p, r );
    name = sprintf ( 'boundary_rotate_snake_%d', r * 60 );
    clf ( );
    color = 'cyan';
    number = false;
    boundary_plot ( w2, p2, color, number );
    name2 = s_escape_tex ( name );
    title ( name2 );
    filename = [ name, '.png' ];
    print ( '-dpng', filename );
    fprintf ( 1, '  Graphics saved as "%s"\n', filename );
  end
%
%  Terminate.
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'boundary_rotate_test():\n' );
  fprintf ( 1, '  Normal end of execution.\n' );

  return
end

