Skip to content

haskell-gargantext
haskell-gargantext
Commit b98ddbfc authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[FIX] commenting to fix graph issue

parent 8c5c38a6
Pipeline #3161 passed with stage
    in 91 minutes and 55 seconds
    Hide whitespace changes
    Inline Side-by-side
    Showing with 2 additions and 2 deletions
    src/Gargantext/Core/Viz/Graph/Tools.hs
    View file @ b98ddbfc
    ......@@ -134,8 +134,8 @@ cooc2graphWith' doPartitions distance threshold strength myCooc = do
    bridgeness' = bridgeness (fromIntegral nodesApprox) partitions distanceMap
    -- indices of bridgeness seem to start at 1, while computeConfluences
    -- expects 0-based indexing.
    ks = map (\(a, b) -> (a-1, b-1)) (Map.keys bridgeness')
    confluence' = Map.mapKeys (\(a, b) -> (a+1, b+1)) $ BAC.computeConfluences 3 ks True
    -- ks = map (\(a, b) -> (a-1, b-1)) (Map.keys bridgeness')
    confluence' = Map.empty -- Map.mapKeys (\(a, b) -> (a+1, b+1)) $ BAC.computeConfluences 3 ks True
    -- confluence (Map.keys bridgeness') 3 True False
    seq bridgeness' $ printDebug "bridgeness OK" ()
    seq confluence' $ printDebug "confluence OK" ()
    ......
    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