function variomino_transform_test ( )

%*****************************************************************************80
%
%% variomino_transform_test() tests variomino_transform().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    17 April 2023
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'variomino_transform_test():\n' );
  fprintf ( 1, '  variomino_transform() transforms a variomino.\n' );
  fprintf ( 1, '  Generate all 8 combinations of rotation and reflection\n' );
  fprintf ( 1, '  applied to a variomino.\n' );

  m = 3;
  n = 3;
  p = [  0,  3,  1; 
         1,  2,  0; 
         0,  1,  0 ];

  variomino_print ( p, '  The given variomino P:' );

  for reflect = 0 : 1
    for rotate = 0 : 3

      q = variomino_transform ( p, rotate, reflect );

      label = sprintf ( '  P after %d reflections and %d rotations:', ...
        reflect, rotate );
      variomino_print ( q, label );

    end
  end

  return
end
