リストを他のリストで構成する方法は？

Question

私はリストをいくつかの小さなリストが含ま作るしようとしている、と各sub-lists.Hereの二重の最初の要素が私のコードです：

double_the_first::(Num a)=>[[a]]->[a] 
double_the_first list = case list of 
[]     ->[] 
[[x]]    ->[x*2] 
[x:xs]    ->map(*2)(map(head)[x:xs]) 

どのように私は[[2,3のようなリストを表すことができます]、[4,5]]？私のコードが間違っているのを知っていますが、haskellはエラーを表示しません、どうですか？このようなリストを入力するとうまくいかないでしょう：

double_the_first [[2,3],[2,4],[4,3]] 
*** Exception: test.hs:(3,25)-(6,51): Non-exhaustive patterns in case 

誰でも助けてくれますか？

Answer 1

リストの各要素に必要な機能を最初に書き出します。あなたの場合、各要素はそれ自身がリストです。

doubleFirst :: Num a => [a] -> [a] 
doubleFirst [] = [] 
doubleFirst (x:xs) = (2*x:xs) 

その後の要素のリストにその機能を適用するためにmapを使用します。リストが空であるときには、いくつかのケースが欠落している

map doubleFirst [[2,3],[2,4],[4,3]] 

Answer 2

。コードを次のように変更することができます。リストが空である可能性を追加しました。私は、異なるタイプの結果を使いたいと思っています。

double_the_first::(Num a)=>[[a]]->[[a]] 
double_the_first list = case list of 
    []     -> [] 
    (([]):xs)   -> [[]] ++ double_the_first xs 
    ((y:ys):xs)   -> [(2*y:ys)] ++ double_the_first xs