kata6 find Anagrams  haskell version