[phylo] working on file naming function. Now OK2 but branch length is still missing

8bb9ff6c · david Chavalarias · 6b0eace3 · 8bb9ff6c
Commit 8bb9ff6c authored Jan 24, 2021 by david Chavalarias
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

Main.hs bin/gargantext-adaptative-phylo/Main.hs +2 -2

No files found.
--- a/bin/gargantext-adaptative-phylo/Main.hs
+++ b/bin/gargantext-adaptative-phylo/Main.hs
@@ -170,8 +170,8 @@ main = do

            let sensibility = case (phyloProximity config) of
                        Hamming -> undefined
-                        WeightedLogJaccard s -> ("WeightedLogJaccard_s="  <> show s)     
-                        WeightedLogSim s -> ( "WeightedLogSim-sens_s="  <> show s  ) 
+                        WeightedLogJaccard s -> ("WeightedLogJaccard_"  <> show s)     
+                        WeightedLogSim s -> ( "WeightedLogSim-sens_"  <> show s  ) 

            let sync = case (phyloSynchrony config) of
                        ByProximityThreshold scl sync_sens scope _ -> ("scale_" <> (show scope) <> "_" <> (show sync_sens)  <> "_"  <> (show scl)  )