function att48_xy ( )

%*****************************************************************************80
%
%% att48_xy() plots the cities in the ATT 48 city TSP file.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    11 June 2026
%
%  Author:
%
%    John Burkardt
%
  xy = readmatrix ( 'att48_xy.txt' );
  order = readmatrix ( 'att48_s.txt' );

  ncity = length ( order );

  clf ( );
  title ( 'Traveling Salesman Tour on 48 State Capitals' );
  hold ( 'on' );
    plot ( xy(:,1), xy(:,2), '.' );
    from = order ( ncity );
    for i = 1 : ncity
      to = order ( i );
      plot ( [ xy(from,1), xy(to,1) ], [ xy(from,2), xy(to,2) ], 'r-' );
      from = to;
    end
    label = string(1:ncity);
    text ( xy(:,1), xy(:,2), label );
  hold ( 'off' );
  filename = 'att48_xy.png';
  print ( '-dpng', filename );
  fprintf ( 1, '  Graphics saved as "%s"\n', filename );
  close ( )
  
  return
end

