diff --git a/spectral-clustering.cabal b/spectral-clustering.cabal
--- a/spectral-clustering.cabal
+++ b/spectral-clustering.cabal
@@ -1,6 +1,6 @@
 cabal-version: >=1.10
 name: spectral-clustering
-version: 0.3.0.3
+version: 0.3.0.4
 license: GPL-3
 license-file: LICENSE
 copyright: 2019 Gregory W. Schwartz
diff --git a/src/Math/Clustering/Spectral/Dense.hs b/src/Math/Clustering/Spectral/Dense.hs
--- a/src/Math/Clustering/Spectral/Dense.hs
+++ b/src/Math/Clustering/Spectral/Dense.hs
@@ -128,7 +128,7 @@
   fmap (VS.drop (n - 1))
     . H.toColumns
     . (\(!x, _, _) -> x)
-    . SVD.sparseSvd' (SVD.defaultSVDParams {SVD.maxIters = Just 1000}) (e + (n - 1))
+    . SVD.sparseSvd (e + (n - 1))
     . H.mkCSR
     . filter (\((_, _), x) -> x /= 0)
     . concatMap (\(!i, xs) -> fmap (\(!j, !x) -> ((i, j), x)) xs)
diff --git a/src/Math/Clustering/Spectral/Eigen/AdjacencyMatrix.hs b/src/Math/Clustering/Spectral/Eigen/AdjacencyMatrix.hs
--- a/src/Math/Clustering/Spectral/Eigen/AdjacencyMatrix.hs
+++ b/src/Math/Clustering/Spectral/Eigen/AdjacencyMatrix.hs
@@ -184,7 +184,7 @@
                . drop (n - 1)
                . H.toRows
                . (\(!x, _, _) -> x)
-               . SVD.sparseSvd' (SVD.defaultSVDParams {SVD.maxIters = Just 1000}) (e + (n - 1))
+               . SVD.sparseSvd (e + (n - 1))
                . H.mkCSR
                . fmap (\(!i, !j, !x) -> ((i, j), x))
                . S.toList
diff --git a/src/Math/Clustering/Spectral/Eigen/FeatureMatrix.hs b/src/Math/Clustering/Spectral/Eigen/FeatureMatrix.hs
--- a/src/Math/Clustering/Spectral/Eigen/FeatureMatrix.hs
+++ b/src/Math/Clustering/Spectral/Eigen/FeatureMatrix.hs
@@ -102,7 +102,7 @@
                  . drop (n - 1)
                  . H.toRows
                  . (\(!x, _, _) -> x)
-                 . SVD.sparseSvd' (SVD.defaultSVDParams {SVD.maxIters = Just 1000}) (e + (n - 1))
+                 . SVD.sparseSvd (e + (n - 1))
                  . H.mkCSR
                  . fmap (\(!i, !j, !x) -> ((i, j), x))
                  . S.toList
diff --git a/src/Math/Clustering/Spectral/Sparse.hs b/src/Math/Clustering/Spectral/Sparse.hs
--- a/src/Math/Clustering/Spectral/Sparse.hs
+++ b/src/Math/Clustering/Spectral/Sparse.hs
@@ -117,7 +117,7 @@
   fmap (S.sparsifySV . S.fromListDenseSV e . drop (n - 1) . H.toList)
     . H.toColumns
     . (\(!x, _, _) -> x)
-    . SVD.sparseSvd' (SVD.defaultSVDParams {SVD.maxIters = Just 1000}) (e + (n - 1))
+    . SVD.sparseSvd (e + (n - 1))
     . H.mkCSR
     . fmap (\(!i, !j, !x) -> ((i, j), x))
     . S.toListSM
