読者です 読者をやめる 読者になる 読者になる

tak0kadaの何でもノート

発声練習、生存確認用。

医学関連は 医学ノート

「Learn You a Haskell for Great Good!」第4章を読んだ

第4章は再帰について。書くことが特に無い。クイックソートだけ実装しておく。

quicksort :: (Ord a) => [a] -> [a]
quicksort [] = []
quicksort (x:xs) = quicksort smallerOrEqual ++ [x] ++ quicksort larger
  where smallerlist = [a | a <- xs, a <= x]
        largerlist = [a | a <- xs, a > x]