Удаляет вхождения данного элемента в список списков

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] 

или удаление фильтра гнездящихся постижений. Для каждого xs в xss и для каждого x в xs, держать x только если он отличается от y:

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 в результирующий список.