function graph_adj_is_tree_test ( )

%*****************************************************************************80
%
%% graph_adj_is_tree_test() tests graph_adj_is_tree().
%
%  Licensing:
%
%    This code is distributed under the MIT license. 
%
%  Modified:
%
%    15 March 2023
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'graph_adj_is_tree_test():\n' );
  fprintf ( 1, '  graph_adj_is_tree() reports if a graph is a tree.\n' );

  node_num = 6;
  edge_num = node_num - 1;
  A = graph_adj_random_edges ( node_num, edge_num );

  fprintf ( 1, '\n' );
  fprintf ( 1, '  Number of nodes is %d\n', node_num );
  fprintf ( 1, '  Number of edges is %d\n', edge_num );

  graph_adj_print ( A, '  The graph:' );

  value = graph_adj_is_tree ( A );

  if ( value )
    fprintf ( 1, '  The graph is a tree.\n' );
  else
    fprintf ( 1, '  The graph is NOT a tree.\n' );
  end

  return
end 
