main :: IO ()
main = defaultMain
    [ benchHierarchical
    , benchKMeans
    ]
main :: IO ()
main = defaultMain
    [ benchHierarchical
    , benchKMeans
    ]
main = defaultMain
    [ benchHierarchical
    , benchKMeans
    ]