just playing around with haskell, implementing a simple clustering algorithm.