function house_reflection_udrl_test ( )

%*****************************************************************************80
%
%% house_reflection_udrl_test(): reflection Up/Down Right/Left to the house.
%
%  License:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    22 January 2020
%
%  Author:
%
%    John Burkardt.
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'house_reflection_udrl_test():\n' );
  fprintf ( 1, '  Apply the reflection Up/Down Right/Left map to the house.\n' );

  H0 = house ( );
  H0(:,end+1) = H0(:,1);
  [ m, n ] = size ( H0 );

  A = [ -1, 0; 0, -1];
  H1 = A * H0 ( );

  clf ( );
  hold ( 'on' );
  plot ( H0(1,:), H0(2,:), 'c.-', 'markersize', 18, 'linewidth', 6 );
  plot ( H1(1,:), H1(2,:), 'r.-', 'markersize', 18, 'linewidth', 2 );
  hold ( 'off' );
  grid ( 'on' );
  axis ( 12 * [ -1, 1, -1, 1 ] );
  axis ( 'square' );
  title ( 'House + reflection Up/Down Right/Left' )

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

  return
end
