--import Data.List (sort)
---- import Data.Example
--import Data.Louvain
--
--
--testKarate2com = do
--    p <- bestpartition True <$> karate
--    k <- karate
--    let result = (sort $ Prelude.map (sort) (stepscom' k 2 p))
--    print result
--    print karate2com
--    print $  result == karate2com
--

main :: IO ()
main = print "undefined" -- testKarate2com