Skip to content

H
haskell-gargantext
Commit 2dbb8cab authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[FIX] warning

parent 16693beb
Show whitespace changes
Inline Side-by-side
Showing with 2 additions and 3 deletions
src/Gargantext/Core/Viz/Graph/Tools/IGraph.hs
View file @ 2dbb8cab
...@@ -12,7 +12,6 @@ Reference: ...@@ -12,7 +12,6 @@ Reference:
-} -}
module Gargantext.Core.Viz.Graph.Tools.IGraph module Gargantext.Core.Viz.Graph.Tools.IGraph
where where
...@@ -78,7 +77,7 @@ mkGraphUfromEdges es = mkGraph (List.replicate n ()) $ zip es $ repeat () ...@@ -78,7 +77,7 @@ mkGraphUfromEdges es = mkGraph (List.replicate n ()) $ zip es $ repeat ()
(a,b) = List.unzip es (a,b) = List.unzip es
n = List.length (List.nub $ a <> b) n = List.length (List.nub $ a <> b)
{-
mkGraphDfromEdges :: [(Int, Int)] -> Graph_Directed mkGraphDfromEdges :: [(Int, Int)] -> Graph_Directed
mkGraphDfromEdges = undefined mkGraphDfromEdges = undefined
-}
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