Skip to content

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

Doc/Comments

parent 5229f873
Pipeline #3184 passed with stage
    in 92 minutes and 18 seconds
    Expand all Hide whitespace changes
    Inline Side-by-side
    Showing with 62 additions and 62 deletions
    src/Gargantext/Core/Viz/Phylo/API/Tools.hs
    View file @ 01ad91a8
    ......@@ -87,9 +87,9 @@ phylo2dot2json phylo = do
    flowPhyloAPI :: PhyloConfig -> CorpusId -> GargNoServer Phylo
    flowPhyloAPI config cId = do
    (mapList, corpus) <- corpusIdtoDocuments (timeUnit config) cId
    phyloWithCliques <- pure $ toPhyloStep corpus mapList config
    temporalSeries <- pure $ toPhyloStep corpus mapList config
    -- writePhylo phyloWithCliquesFile phyloWithCliques
    pure $ toPhylo (setConfig config phyloWithCliques)
    pure $ toPhylo (setConfig config temporalSeries)
    --------------------------------------------------------------------
    corpusIdtoDocuments :: TimeUnit -> CorpusId -> GargNoServer (TermList, [Document])
    ......
    src/Gargantext/Core/Viz/Phylo/PhyloMaker.hs
    View file @ 01ad91a8
    This diff is collapsed.
    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