haskell - リストのリスト内の特定の要素の出現を削除します

Question

リストのリスト内の特定の要素の出現を削除するこの関数があります。

remove          :: Eq a => a -> [[a]] -> [[a]]
remove    y []  = error "Can't remove an element from an empty list"
remove    y xs  = map (filter(/=y)) xs

リスト内包表記を使用して同じことを行うにはどうすればよいでしょうか

ありがとうございました

Answer 1

のそれぞれについて、結果のリストに追加しlますxs。filter (/= xs) l

remove y xs = [filter (/= y) l | l <- xs]

または、内包表記をネストしてフィルターを削除します。for each xsinxssおよび for each xin は、と異なる場合にのみxs保持します。xy

remove y xss = [ [x| x <- xs, x /= y] | xs <- xss]

練習するだけなら問題ありませんが、 を使用したバージョンのmap方がはるかに優れています :)

Answer 2

私は次の行に沿って何かを推測します：

 remove y ls = [f|l <- ls, let f = filter (/= y) l]

大丈夫なはずです。

l基本的に、リストで作成できるすべてのバインディングについてls、フィルタリングされたリストfを結果のリストに追加することを示しています。