Commit d88a02aa authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Haddock for our lib only + fix Tests

parent 9dfd60b4
...@@ -2,4 +2,4 @@ ...@@ -2,4 +2,4 @@
#stack install --nix --profile --test --fast --no-install-ghc --skip-ghc-check #stack install --nix --profile --test --fast --no-install-ghc --skip-ghc-check
env LANG=C.UTF-8 stack install --haddock --nix --test --no-install-ghc --skip-ghc-check env LANG=C.UTF-8 stack install --haddock --nix --test --no-install-ghc --skip-ghc-check --no-haddock-deps
...@@ -14,7 +14,7 @@ Portability : POSIX ...@@ -14,7 +14,7 @@ Portability : POSIX
module Graph.Clustering where module Graph.Clustering where
import Gargantext.API.Ngrams.Types (NgramsTerm(..)) import Gargantext.API.Ngrams.Types (NgramsTerm(..))
import Gargantext.Core.Viz.Graph (Graph(..)) import Gargantext.Core.Viz.Graph (Graph(..), Strength(..))
import Gargantext.Core.Viz.Graph.Tools (doDistanceMap) import Gargantext.Core.Viz.Graph.Tools (doDistanceMap)
import Gargantext.Core.Viz.Graph.Tools.IGraph (spinglass) import Gargantext.Core.Viz.Graph.Tools.IGraph (spinglass)
import Gargantext.Prelude import Gargantext.Prelude
...@@ -35,7 +35,7 @@ test :: IO () ...@@ -35,7 +35,7 @@ test :: IO ()
test = hspec $ do test = hspec $ do
describe "Cross" $ do describe "Cross" $ do
let let
(distanceMap,_,_) = doDistanceMap Conditional 0 myCooc (distanceMap,_,_) = doDistanceMap Conditional 0 Weak myCooc
it "Partition test" $ do it "Partition test" $ do
partitions <- spinglass 1 distanceMap partitions <- spinglass 1 distanceMap
let let
......
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