Commit 9bef9b03 authored by Carine Rey's avatar Carine Rey
Browse files

put msd in slow mode

parent 82fd212c
...@@ -96,19 +96,18 @@ let derive_from_tree ~tree_dir ~tree ~profile ~preview ~use_concat ~ns ~no_Ne ~n ...@@ -96,19 +96,18 @@ let derive_from_tree ~tree_dir ~tree ~profile ~preview ~use_concat ~ns ~no_Ne ~n
[ [
H0 ; H0 ;
HaPCOC ; HaPCOC ;
HaPC
]; ];
( if no_HaPC then
[]
else
[HaPC ;
]
);
if preview then if preview then
[] []
else else
[( [(if no_Ne then
if no_HaPC then
[]
else
[HaPC ;
]
)
;
(if no_Ne then
[] []
else else
[H0_NeSmall ; [H0_NeSmall ;
...@@ -229,12 +228,13 @@ let derive_from_det_meth ~det_meth ~(dataset : Dataset.t) ~preview = ...@@ -229,12 +228,13 @@ let derive_from_det_meth ~det_meth ~(dataset : Dataset.t) ~preview =
let derive_from_dataset ~dataset ~preview ~fast_mode= let derive_from_dataset ~dataset ~preview ~fast_mode=
let det_meths = [ let det_meths = [
[`Pcoc; [
`Tdg09; `Identical_LG;
`Identical_LG; `Topological_LG;
`Topological_LG; `Multinomial;
`Multinomial; `Pcoc;
`Msd] ; `Tdg09;
] ;
if preview then if preview then
[] []
else else
...@@ -246,7 +246,7 @@ let derive_from_dataset ~dataset ~preview ~fast_mode= ...@@ -246,7 +246,7 @@ let derive_from_dataset ~dataset ~preview ~fast_mode=
if fast_mode then if fast_mode then
[] []
else else
[`Diffsel; `Pcoc_C60;] ; [`Diffsel; `Pcoc_C60;`Msd;] ;
] ]
|> List.concat in |> List.concat in
let res_by_tools = List.map det_meths ~f:(fun det_meth -> let res_by_tools = List.map det_meths ~f:(fun det_meth ->
......
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