diff --git a/app/Main.hs b/app/Main.hs
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -21,6 +21,7 @@
 import Data.Char (ord)
 import Data.List (intercalate)
 import Data.Monoid ((<>))
+import Math.Graph.Types
 import Options.Generic
 import Safe (atMay)
 import System.IO (stdin)
@@ -37,7 +38,6 @@
 import qualified Data.Vector as V
 import qualified Numeric.LinearAlgebra as H
 import qualified System.FilePath as File
-import Math.Graph.Types
 
 -- Local
 import Math.Clustering.Hierarchical.Spectral.Load
@@ -66,7 +66,7 @@
 
 -- | Command line arguments
 data Options = Options { clusteringType :: Maybe String
-                                       <?> "([Sparse] | Dense) Method for clustering data."
+                                       <?> "([Dense] | Sparse) Method for clustering data."
                        , delimiter      :: Maybe Char
                                        <?> "([,] | CHAR) The delimiter of the CSV file. Format is row,column,value with no header."
                        , minSize        :: Maybe Int
@@ -105,7 +105,7 @@
 
     let readOrErr err       = fromMaybe (error err) . readMaybe
         clusteringType'     =
-          maybe Sparse (readOrErr "Cannot read --clustering-type")
+          maybe Dense (readOrErr "Cannot read --clustering-type")
             . unHelpful
             . clusteringType
             $ opts
diff --git a/hierarchical-spectral-clustering.cabal b/hierarchical-spectral-clustering.cabal
--- a/hierarchical-spectral-clustering.cabal
+++ b/hierarchical-spectral-clustering.cabal
@@ -1,6 +1,6 @@
 cabal-version: >=1.10
 name: hierarchical-spectral-clustering
-version: 0.2.2.1
+version: 0.3.0.0
 license: GPL-3
 license-file: LICENSE
 copyright: 2019 Gregory W. Schwartz
@@ -48,7 +48,7 @@
         mtl >=2.2.2,
         safe >=0.3.17,
         sparse-linear-algebra >=0.3.1,
-        spectral-clustering >=0.2.2.2,
+        spectral-clustering >=0.3.0.0,
         streaming >=0.2.1.0,
         streaming-bytestring >=0.1.6,
         streaming-cassava >=0.1.0.1,
