add new way to name dot file

bin/gargantext-adaptative-phylo/Main.hs

@@ -169,8 +169,20 @@ main = do
 
             let dot = toPhyloExport phylo 
 
+            let clq = case (clique config) of
+                        Fis s s' -> "fis_" <> (show s) <> "_" <> (show s')
+                        MaxClique s ->  "clique_" <> (show s)
+
+            let sensibility = case (phyloProximity config) of
+                        Hamming -> undefined
+                        WeightedLogJaccard s -> (show s)                        
+
             let output = (outputPath config) 
                       <> (unpack $ phyloName config)
-                      <> "_V2.dot"
+                      <> "-scale_" <> (show (_qua_granularity $ phyloQuality config))
+                      <> "-level_" <> (show (phyloLevel config))
+                      <> "-" <> clq
+                      <> "-sens_" <> sensibility
+                      <> ".dot"
 
             dotToFile output dot
\ No newline at end of file