aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-11-24 14:42:32 +0300
committerMunyoki Kilyungi2023-11-24 14:42:32 +0300
commit54ba0cc5e8ed477a0d98f6a35cad74115814e257 (patch)
tree8691e8052b055492d93dc8996d71d1bf97e1cbb3 /examples
parentdbc5bbac28deb8ffe2ae2ec0e037885bba9e5be0 (diff)
downloadgn-transform-databases-54ba0cc5e8ed477a0d98f6a35cad74115814e257.tar.gz
Move remap-species-identifier to strings.scm.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/genotype.scm10
1 files changed, 0 insertions, 10 deletions
diff --git a/examples/genotype.scm b/examples/genotype.scm
index da8e3b1..a5e30f9 100755
--- a/examples/genotype.scm
+++ b/examples/genotype.scm
@@ -15,16 +15,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-transformer genotypes
(tables (Geno
(left-join Species "USING (SpeciesId)")))