aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-12-13 18:02:13 +0300
committerMunyoki Kilyungi2023-12-14 00:55:53 +0300
commitfab7b1003ee8fd37c5e139ee661bf6b3f25005e3 (patch)
tree22c797b8977347d5d3e164e24283cd712c9cf2fc /examples
parentcfcfa78e0149c2cc98fb0031707431d2138cbe91 (diff)
downloadgn-transform-databases-fab7b1003ee8fd37c5e139ee661bf6b3f25005e3.tar.gz
Remove "remap-species-identifiers" from generif transform.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/generif.scm10
1 files changed, 0 insertions, 10 deletions
diff --git a/examples/generif.scm b/examples/generif.scm
index 76751a9..691dc34 100755
--- a/examples/generif.scm
+++ b/examples/generif.scm
@@ -16,16 +16,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]))
-
(define (fix-email-id email)
(string-delete #\space email))