diff options
| author | Shinya Sato <shinnya.sato@gmail.com> | 2022-04-27 16:58:17 +0900 |
|---|---|---|
| committer | Shinya Sato <shinnya.sato@gmail.com> | 2022-04-27 16:58:17 +0900 |
| commit | 2de302bcb3fa7e12c83a58909232a527c4d5372e (patch) | |
| tree | c71e5f12b2733bb0e3ef65734e6ff5a685a1c989 /comparison/Haskell/isort-40000.hs | |
| parent | 7eb8215df157a5ff32ccc0376ac2efc6276fc2bc (diff) | |
| download | inpla-2de302bcb3fa7e12c83a58909232a527c4d5372e.tar.gz inpla-2de302bcb3fa7e12c83a58909232a527c4d5372e.zip | |
Remove redundant letters
Diffstat (limited to 'comparison/Haskell/isort-40000.hs')
| -rw-r--r-- | comparison/Haskell/isort-40000.hs | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/comparison/Haskell/isort-40000.hs b/comparison/Haskell/isort-40000.hs index f834d00..1abc148 100644 --- a/comparison/Haskell/isort-40000.hs +++ b/comparison/Haskell/isort-40000.hs @@ -1,5 +1,5 @@ {- -(* http://www.codecodex.com/wiki/Insertion_sort#Standard_ML *) +http://www.codecodex.com/wiki/Insertion_sort#Standard_ML -} import System.Random @@ -25,12 +25,7 @@ randomList n = do return (r:rs) - main = do list <- randomList 40000 let sorted = isort list print (take 10 sorted) - - - - |