working on quality function

516a51cd · qlobbe · 6466fa7f · 516a51cd
Commit 516a51cd authored Nov 04, 2020 by qlobbe
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

TemporalMatching.hs src/Gargantext/Core/Viz/Phylo/TemporalMatching.hs +2 -1

No files found.
--- a/src/Gargantext/Core/Viz/Phylo/TemporalMatching.hs
+++ b/src/Gargantext/Core/Viz/Phylo/TemporalMatching.hs
@@ -333,8 +333,9 @@ toPhyloQuality beta freq branches =
       $ keys freq
  where 
      pys :: Double 
-      pys = sum (elems freq) 
+      pys = sum (elems freq)

+-- 1 / nb de foundation

 ------------------------------------
 -- | Constant Temporal Matching | --