Re: [Haskell-cafe] testing for same characters in lists of strings

On Tue, 8 Apr 2008, Jackm139 wrote:

Thanks for all the replies! I have it working somewhat. It works as long as there is only one string in each list, but if the lists contain more than one string it fails. here is what I have:

import List

same :: [[Char]] -> [[Char]] -> Bool same [xs] [ys] = map (normalize) [[xs]] == map (normalize) [[ys]]

normalize :: [String] -> [String] normalize [xs] = [(sort (nub xs))]

'normalize' (if correctly implemented) is essentially the same as 'Data.Set.fromList'