Fortran Wiki
qsort_inline