How to compute the symmetric difference of two lists using list comprehension?

user_17421575 0
Viewed 222

To get the symmetric difference of two lists I think it would be a good idea to use list comprehension. But I don't know what I could do to remove the common elements of the lists and get the elements that are different.

For example

symDiff [1,2,3,4] [1,3,5]  -- should return [2,4,5].

So far I have

symDiff :: [a] -> [a] -> [a]
symDiff xs ys =
haskell
1 Answers

I hope this helps, however i was unable to do it without using Eq a

symDiff :: Eq a => [a] -> [a] -> [a]
symDiff setA setB = [c | c <- setA, not $ (elem c [x | x <- setB])]
                        ++ [c | c <- setB, not $ (elem c [x | x <- setA])]

for

symDiff [1,2,3,4] [1,3,5]

will return: [2,4,5]

user_175266440
Related