Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
VEBER Philippe
codepi
Commits
18a960ee
Commit
18a960ee
authored
Jun 15, 2018
by
LANORE Vincent
Browse files
Refactored a few things + added types.
parent
7c6504f0
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
20 additions
and
1 deletion
+20
-1
lib/bppsuite.ml
lib/bppsuite.ml
+1
-1
lib/bppsuite.mli
lib/bppsuite.mli
+8
-0
lib/file_formats.ml
lib/file_formats.ml
+11
-0
No files found.
lib/bppsuite.ml
View file @
18a960ee
...
...
@@ -25,7 +25,7 @@ let conf_file ~tree ~nb_sites =
|
}
]
let
bppseqgen
~
tree
~
nb_sites
=
workflow
~
descr
:
"bppsuite.bppseqgen"
[
let
bppseqgen
~
nb_sites
~
tree
=
workflow
~
descr
:
"bppsuite.bppseqgen"
[
cmd
"bppseqgen"
~
env
[
assign
"param"
(
file_dump
(
conf_file
~
tree
~
nb_sites
))
;
]
...
...
lib/bppsuite.mli
0 → 100644
View file @
18a960ee
open
Bistro
.
Std
open
Bistro_bioinfo
.
Std
open
File_formats
val
bppseqgen
:
nb_sites
:
int
->
tree
:
nhx
workflow
->
(* nucleotide_ *)
fasta
workflow
lib/file_formats.ml
0 → 100644
View file @
18a960ee
open
Bistro
.
Std
open
Bistro_bioinfo
.
Std
class
type
nhx
=
object
inherit
text_file
method
format
:
[
`nhx
]
end
(* type nucleotide_fasta = < fasta ; alphabet : [`Nucleotide] > *)
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment