bio/Iqtree: added keep_ident option

pveber · Jan 21, 2021 · 90d2271 · 90d2271
1 parent 9491a4d
commit 90d2271
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/lib/bio/iqtree.ml b/lib/bio/iqtree.ml
@@ -253,7 +253,7 @@ type model_spec =
 
 let model_spec ?freq_type ?rate_type m = m, freq_type, rate_type
 
-let iqtree ?t ?te ?o ?(nt = 1) ?seed ?n ?m ?z ?st ?spp ali =
+let iqtree ?t ?te ?o ?(nt = 1) ?seed ?n ?m ?z ?st ?spp ?keep_ident ali =
   let ali_dep = match ali with
     | `phylip f -> dep f
     | `fasta f -> dep f
@@ -274,6 +274,7 @@ let iqtree ?t ?te ?o ?(nt = 1) ?seed ?n ?m ?z ?st ?spp ali =
             option (opt "-z" dep) z ;
             option (opt "-st" sequence_type_token) st ;
             option (opt "-spp" dep) spp ;
+            option (flag string "-keep-ident") keep_ident ;
           ] ;
       ]
     ]

diff --git a/lib/bio/iqtree.mli b/lib/bio/iqtree.mli
@@ -132,6 +132,7 @@ val iqtree :
   ?z:newick file ->
   ?st:sequence_type ->
   ?spp:nexus file ->
+  ?keep_ident:bool ->
   [`phylip of phylip file | `fasta of fasta file] ->
   [`iqtree] directory