function L = digraph_arc_moler ( )

%*****************************************************************************80
%
%% digraph_arc_moler() returns the arc list for a network of Moler.
%
%  Discussion:
%
%    This matrix appears on page 5 of the reference.
%
%    We added a self-link for node 5, which otherwise has no outlinks.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    25 April 2026
%
%  Author:
%
%    John Burkardt
%
%  Reference:
%
%    Cleve Moler,
%    Experiments with Matlab,
%    Chapter 7: Google PageRank,
%    https://www.mathworks.com/moler/exm/chapters/pagerank.pdf
%
%  Output:
%
%    integer L(10,2), the arc list.
%
  arc_num = 10;

  L = [ ...
    1, 2; ...
    1, 6; ...
    2, 3; ...
    2, 4; ...
    3, 4; ...
    3, 5; ...
    3, 6; ...
    4, 1; ...
    5, 5; ...
    6, 1 ];

  return
end
