2014-02-15から1日間の記事一覧
これまた「プログラミングHaskell」の演習問題から。比較のためにクイックソートも記載した。 merge :: Ord a => [a] -> [a] -> [a] merge xs [] = xs merge [] ys = ys merge (x : xs) (y : ys) | x <= y = x : merge xs (y : ys) | otherwise = y : merge …
これまた「プログラミングHaskell」の演習問題から。比較のためにクイックソートも記載した。 merge :: Ord a => [a] -> [a] -> [a] merge xs [] = xs merge [] ys = ys merge (x : xs) (y : ys) | x <= y = x : merge xs (y : ys) | otherwise = y : merge …