diff --git a/Math/KMeans.hs b/Math/KMeans.hs
--- a/Math/KMeans.hs
+++ b/Math/KMeans.hs
@@ -53,7 +53,7 @@
 kmeansAux points pgroups = let pss = kmeansStep points pgroups in
   case pss == pgroups of
   True -> pgroups
-  False -> kmeansStep points pss   
+  False -> kmeansAux points pss   
 
 -- | Performs the k-means clustering algorithm
 --   using trying to use 'k' clusters on the given list of points
diff --git a/kmeans-vector.cabal b/kmeans-vector.cabal
--- a/kmeans-vector.cabal
+++ b/kmeans-vector.cabal
@@ -1,5 +1,5 @@
 Name:                kmeans-vector
-Version:             0.1
+Version:             0.1.1
 Synopsis:            An implementation of the kmeans clustering algorithm based on the vector package
 Description:         Provides a simple (but efficient) implementation of the k-means clustering algorithm. The goal of this algorithm is to, given a list of n-dimensional points, regroup them in k groups, such that each point gets to be in the group to which it is the closest to (using the 'center' of the group). 
 		     .