function max_degree_test ( )

%*****************************************************************************80
%
%% MAX_DEGREE_TEST plots max degree index sets.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    09 September 2017
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'MAX_DEGREE_TEST:\n' );
  fprintf ( 1, '  Plot max degree index sets.\n' );
  fprintf ( 1, '\n' );

  m = 12;
  title_string = 'Maximum Degree <= 1';
  cube_display ( m, @(x,y,z)max([x,y,z])<=0, @(x,y,z)max([x,y,z])<=1, title_string );
  print ( '-dpng', 'md1.png' );
  fprintf ( 1, '  Created "md1.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 2';
  cube_display ( m, @(x,y,z)max([x,y,z])<=1, @(x,y,z)max([x,y,z])<=2, title_string );
  print ( '-dpng', 'md2.png' );
  fprintf ( 1, '  Created "md2.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 3';
  cube_display ( m, @(x,y,z)max([x,y,z])<=2, @(x,y,z)max([x,y,z])<=3, title_string );
  print ( '-dpng', 'md3.png' );
  fprintf ( 1, '  Created "md3.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 4';
  cube_display ( m, @(x,y,z)max([x,y,z])<=3, @(x,y,z)max([x,y,z])<=4, title_string );
  print ( '-dpng', 'md4.png' );
  fprintf ( 1, '  Created "md4.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 5';
  cube_display ( m, @(x,y,z)max([x,y,z])<=4, @(x,y,z)max([x,y,z])<=5, title_string );
  print ( '-dpng', 'md5.png' );
  fprintf ( 1, '  Created "md5.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 6';
  cube_display ( m, @(x,y,z)max([x,y,z])<=5, @(x,y,z)max([x,y,z])<=6, title_string );
  print ( '-dpng', 'md6.png' );
  fprintf ( 1, '  Created "md6.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 7';
  cube_display ( m, @(x,y,z)max([x,y,z])<=6, @(x,y,z)max([x,y,z])<=7, title_string );
  print ( '-dpng', 'md7.png' );
  fprintf ( 1, '  Created "md7.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 8';
  cube_display ( m, @(x,y,z)max([x,y,z])<=7, @(x,y,z)max([x,y,z])<=8, title_string );
  print ( '-dpng', 'md8.png' );
  fprintf ( 1, '  Created "md8.png".\n' );

  m = 12;
  title_string = 'Maximum Degree <= 9';
  cube_display ( m, @(x,y,z)max([x,y,z])<=8, @(x,y,z)max([x,y,z])<=9, title_string );
  print ( '-dpng', 'md9.png' );
  fprintf ( 1, '  Created "md9.png".\n' );

  return
end
