initial haskell anagram