Subroutine:   SORTIA

Purpose:      SORTIA sorts an Integer array in Ascending order.

Files:        sort.c

Author:       K.G. Begeman

Use:          CALL SORTIA( DATA,     In/Output     INTEGER ARRAY
                           NDAT )     Input        INTEGER

              DATA         Data array to sort.
              NDAT         Number of data points in DATA.

Updates:      Nov  4, 1989: KGB Document created.