Keywords: gildas-prog

Next: GR_CLIP Up: Immediate Routines Previous: GR8_TRI Contents Index

## GR8_SORT

`GR8_SORT(X,XSORT,INDEX,N)`

Reorder a real*8 array using the sort indexes computed by `GR8_TRI`. Note that `X` and `XSORT` must be different (i.e. sorting cannot take place within the same array).

    Arguments :
            X       R*8(*)  Unsorted/Sorted array           Input/Output
            XSORT   R*8(*)  Sorted array                    Work space
            INDEX   I(*)    Integer array of sorted indexes Input
                            (obtained by GR8_TRI)
            N       I       Length of arrays                Input