aboutsummaryrefslogtreecommitdiff
path: root/comparison/Haskell/bsort-40000.hs
diff options
context:
space:
mode:
authorShinya Sato <shinnya.sato@gmail.com>2022-04-27 16:58:17 +0900
committerShinya Sato <shinnya.sato@gmail.com>2022-04-27 16:58:17 +0900
commit2de302bcb3fa7e12c83a58909232a527c4d5372e (patch)
treec71e5f12b2733bb0e3ef65734e6ff5a685a1c989 /comparison/Haskell/bsort-40000.hs
parent7eb8215df157a5ff32ccc0376ac2efc6276fc2bc (diff)
downloadinpla-2de302bcb3fa7e12c83a58909232a527c4d5372e.tar.gz
inpla-2de302bcb3fa7e12c83a58909232a527c4d5372e.zip
Remove redundant letters
Diffstat (limited to 'comparison/Haskell/bsort-40000.hs')
-rw-r--r--comparison/Haskell/bsort-40000.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/comparison/Haskell/bsort-40000.hs b/comparison/Haskell/bsort-40000.hs
index 1940917..401ceaf 100644
--- a/comparison/Haskell/bsort-40000.hs
+++ b/comparison/Haskell/bsort-40000.hs
@@ -22,7 +22,6 @@ main = print $ bsort [3,2,8,5]
-}
-
randomList :: Int -> IO([Int])
randomList 0 = return []
randomList n = do
@@ -31,7 +30,6 @@ randomList n = do
return (r:rs)
-
main = do
list <- randomList 40000
let sorted = bsort list