From 44b8ce653a152a7ad87f44929dcd1d0ebd108f0a Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Tue, 23 Dec 2025 12:47:18 +0300 Subject: Delete duplicated function. Signed-off-by: Munyoki Kilyungi --- examples/dataset-metadata.scm | 9 --------- 1 file changed, 9 deletions(-) (limited to 'examples/dataset-metadata.scm') diff --git a/examples/dataset-metadata.scm b/examples/dataset-metadata.scm index cd91dc4..591b18e 100755 --- a/examples/dataset-metadata.scm +++ b/examples/dataset-metadata.scm @@ -12,15 +12,6 @@ (transform special-forms)) -(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])) ;; One email ID in the Investigators table has spaces in it. This ;; function fixes that. -- cgit 1.4.1