Convert all *.f files to *.f90.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3296 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
2026-07-23 10:34:21 -04:00 · 2013-05-22 15:39:28 +00:00
parent 1709ebdab3
commit 09ceb60a4e
40 changed files with 1064 additions and 1088 deletions
@@ -0,0 +1,4 @@
+subroutine sort(n,arr)
+  call ssort(arr,tmp,n,1)
+  return
+end subroutine sort