K-Means all done. Trying on GHC