Mit kellene hozzáadnom a haskell kódomhoz, hogy működjön az összes tesztesetre ?

Listakülönbség függvény: Azokat az elemeket tartalmazza a különbséglista, amely az első listának az eleme, de a másodiknak nem!

remove :: Eq a => a -> [a] -> [a]

remove _ [] = []

remove e (x:xs)

| (e == x) = xs

| otherwise = x : remove e xs

listDiff :: Eq a => [a] -> [a] -> [a]

listDiff a []= a

listDiff a (x:xs)

| x `elem` a = listDiff (remove x a) xs

| otherwise = listDiff a xs

-listDiff "Haskell" "the best" == "Hakll" -- Ezzel működik.

A többivel pedig nem.

-listDiff "Cannot predict" "the future" == "Cannopdic"

-listDiff "Be the type of person" "you want to meet" == "Bhpfprs"

-listDiff "Eotvos Lorand" "Tudomanyegyetem" == "Evs Lr"