diff options
Diffstat (limited to 'examples')
| -rwxr-xr-x | examples/classification.scm | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/examples/classification.scm b/examples/classification.scm index 8951c85..3e13a92 100755 --- a/examples/classification.scm +++ b/examples/classification.scm @@ -13,16 +13,6 @@ -(define (remap-species-identifiers str) - "This procedure remaps identifiers to standard binominal. Obviously this should - be sorted by correcting the database!" - (match str - ["Fly (Drosophila melanogaster dm6)" "Drosophila melanogaster"] - ["Oryzias latipes (Japanese medaka)" "Oryzias latipes"] - ["Macaca mulatta" "Macaca nemestrina"] - ["Bat (Glossophaga soricina)" "Glossophaga soricina"] - [str str])) - ;; Classification Scheme (define-transformer classification-scheme-species (tables (Species)) |