9 May 2025   9:00:58.861 PM
 
SORT_TEST():
  FORTRAN90 version.
  Demonstrate the use of R4VEC_SORT_BUBBLE
  to sort a real array using bubble sort.
 
  Unsorted array:
 
     1   21.9784    
     2   15.3965    
     3   22.4325    
     4   19.5484    
     5   10.6715    
     6   18.9051    
     7   12.0874    
     8   19.7573    
     9   19.4379    
    10   21.7989    
 
  Sorted array:
 
     1   10.6715    
     2   12.0874    
     3   15.3965    
     4   18.9051    
     5   19.4379    
     6   19.5484    
     7   19.7573    
     8   21.7989    
     9   21.9784    
    10   22.4325    
 
  Unsorted array:
 
     1   22.2128    
     2   17.1742    
     3   16.0440    
     4   23.1242    
     5   16.7668    
     6   22.5028    
     7   11.4426    
     8   16.4845    
     9   18.8735    
    10   13.6589    
 
  Sorted array:
 
     1   11.4426    
     2   13.6589    
     3   16.0440    
     4   16.4845    
     5   16.7668    
     6   17.1742    
     7   18.8735    
     8   22.2128    
     9   22.5028    
    10   23.1242    
 
SORT_TEST:
  Normal end of execution.
 
 9 May 2025   9:00:58.861 PM