From fab7b1003ee8fd37c5e139ee661bf6b3f25005e3 Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Wed, 13 Dec 2023 18:02:13 +0300
Subject: Remove "remap-species-identifiers" from generif transform.

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 examples/generif.scm | 10 ----------
 1 file changed, 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))
 
-- 
cgit v1.2.3