Skip to content

G
gargantext-graph
Commit e7c1851c authored by Grégoire Locqueville's avatar Grégoire Locqueville Committed by Grégoire Locqueville
Browse files
Options

Apply suggestion to gargantext-graph-core/src/Graph/IGraph.hs

parent 8bb4ade8
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
gargantext-graph-core/src/Graph/IGraph.hs
View file @ e7c1851c
...@@ -55,8 +55,8 @@ type Seed = Int ...@@ -55,8 +55,8 @@ type Seed = Int
-- | Tools to analyze graphs -- | Tools to analyze graphs
clusteringWith_spinGlass :: (Serialize v, Serialize e) clusteringWith_spinGlass :: (Serialize v, Serialize e)
=> Seed -> IG.Graph 'U v e -> IO [[Int]] => Seed -> IG.Graph 'U v e -> IO [[Int]]
clusteringWith_spinGlass seed graph = IG.withSeed seed $ \gen -> do clusteringWith_spinGlass seed graph = IG.withSeed seed $
IG.findCommunity graph Nothing Nothing IG.spinglass gen IG.findCommunity graph Nothing Nothing IG.spinglass
maximalCliques :: IG.Graph d v e -> [[Int]] maximalCliques :: IG.Graph d v e -> [[Int]]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment