haskellやってみた

haskellという関数型言語の勉強を始めました。
まだよく分かっていませんが、おもしろい言語だとおもいます。
標準入力から数列を読み取りクイックソートするプログラムを書いてみました。

import Char

main = do cs <- getContents
          putStrLn $ unwords $ map show $ qsort $ map read $ words cs

qsort :: [Int] -> [Int]
qsort [] = []
qsort (p:xs) = qsort lt ++ [p] ++ qsort gteq
	where
		lt   = [x | x <- xs, x < p]
		gteq = [x | x <- xs, x >= p]