aboutsummaryrefslogtreecommitdiff
path: root/comparison/Haskell/bsort-40000.hs
diff options
context:
space:
mode:
authorShinya Sato <shinnya.sato@gmail.com>2022-04-27 16:59:00 +0900
committerShinya Sato <shinnya.sato@gmail.com>2022-04-27 16:59:00 +0900
commitd5b1f9b78b7fe4590cf91d72772d3c773d7daed1 (patch)
treec71e5f12b2733bb0e3ef65734e6ff5a685a1c989 /comparison/Haskell/bsort-40000.hs
parent4508b877a0312ff0feeba6287e1224ed3d0e0a4a (diff)
parent2de302bcb3fa7e12c83a58909232a527c4d5372e (diff)
downloadinpla-d5b1f9b78b7fe4590cf91d72772d3c773d7daed1.tar.gz
inpla-d5b1f9b78b7fe4590cf91d72772d3c773d7daed1.zip
Merge branch 'develop'
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