clustering with Haskell