WSJT-X/lib/sort.f90

5 lines
78 B
Fortran
Raw Normal View History

subroutine sort(n,arr)
call ssort(arr,tmp,n,1)
return
end subroutine sort