tsp_dantzig42_order <- function ( )

#*****************************************************************************80
#
## tsp_dantzig42_order() returns the location data for the Dantzig 42 city TSP challenge.
#
#  Licensing:
#
#    This code is distributed under the MIT license.
#
#  Modified:
#
#    17 July 2026
#
#  Author:
#
#    John Burkardt
#
#  Output:
#
#    integer dantzig42_order[42]: the 1-based optimal tour order.
#
{
  dantzig42_order = c (
    42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 
    32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 
    22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 
    12, 11, 10,  9,  8,  7,  6,  5,  4,  3, 
     2,  1 )

  return ( dantzig42_order )
}