diff options
| author | Munyoki Kilyungi | 2025-12-23 12:47:18 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-01-13 12:02:49 +0300 |
| commit | 44b8ce653a152a7ad87f44929dcd1d0ebd108f0a (patch) | |
| tree | 7000525abe8ae4cbcd9407c3aaec54416ac98039 /examples | |
| parent | 5f3ea3c988d8051d3ae3d969ac960037687903d0 (diff) | |
| download | gn-transform-databases-44b8ce653a152a7ad87f44929dcd1d0ebd108f0a.tar.gz | |
Delete duplicated function.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
| -rwxr-xr-x | examples/dataset-metadata.scm | 9 | ||||
| -rwxr-xr-x | examples/strains.scm | 9 |
2 files changed, 0 insertions, 18 deletions
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. diff --git a/examples/strains.scm b/examples/strains.scm index ae45a93..976d358 100755 --- a/examples/strains.scm +++ b/examples/strains.scm @@ -11,15 +11,6 @@ (transform triples) (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])) #! |