Real World Haskell のP80で詰まった。
concatを定義を使ってある関数を作ろうとしたんだけどエラー出てワケワカメ。たすけて
concatenate :: [[a]] -> [a]
concatenate list = case (list) of
[] -> []
(x:xs) -> x ++ concatenate xs

concatenate' :: [[[a]]] -> [a]
concatenate' list = case (list) of
[] -> []
(x:xs) -> concatenate x ++ concatenate' (concatenate xs)