Commit c0d4872d authored by Carine Rey's avatar Carine Rey Committed by Philippe Veber
Browse files

add faa in output

parent 29f00885
......@@ -18,8 +18,10 @@ let repo ~prefix rd =
]
let repo_realdata ~tree_prefix ~ali_prefix rd =
let faa = Bppsuite.fna2faa ~fna:rd.fna in
Repo.[
item [ali_prefix ^ ".fna"] rd.fna ;
item [ali_prefix ^ ".faa"] faa ;
item [tree_prefix ^ "." ^ ali_prefix ^ ".nhx"] rd.input_tree ;
]
|> Repo.shift ali_prefix
......
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