Skip to content

H
haskell-gargantext
Commit 8bb9ff6c authored by david Chavalarias's avatar david Chavalarias
Browse files
Options

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

parent 6b0eace3
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
bin/gargantext-adaptative-phylo/Main.hs
View file @ 8bb9ff6c
...@@ -170,8 +170,8 @@ main = do ...@@ -170,8 +170,8 @@ main = do
let sensibility = case (phyloProximity config) of let sensibility = case (phyloProximity config) of
Hamming -> undefined Hamming -> undefined
WeightedLogJaccard s -> ("WeightedLogJaccard_s=" <> show s) WeightedLogJaccard s -> ("WeightedLogJaccard_" <> show s)
WeightedLogSim s -> ( "WeightedLogSim-sens_s=" <> show s ) WeightedLogSim s -> ( "WeightedLogSim-sens_" <> show s )
let sync = case (phyloSynchrony config) of let sync = case (phyloSynchrony config) of
ByProximityThreshold scl sync_sens scope _ -> ("scale_" <> (show scope) <> "_" <> (show sync_sens) <> "_" <> (show scl) ) ByProximityThreshold scl sync_sens scope _ -> ("scale_" <> (show scope) <> "_" <> (show sync_sens) <> "_" <> (show scl) )
......
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