From 04c28dfe05dc3e2cadad75890a630b227be60900 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Wed, 26 Jul 2023 13:36:03 +0300 Subject: Use "string->binomial-name" to id species Signed-off-by: Munyoki Kilyungi --- examples/dump-species-metadata.scm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'examples') diff --git a/examples/dump-species-metadata.scm b/examples/dump-species-metadata.scm index 6d8c2bd..a6be89a 100755 --- a/examples/dump-species-metadata.scm +++ b/examples/dump-species-metadata.scm @@ -106,10 +106,8 @@ (set gn-term:inbredSetOfMappingMethod (field MappingMethod Name)) (set gn-term:inbredSetCode (field InbredSet InbredSetCode)) (set gn-term:inbredSetOfSpecies - (string->identifier "" (field Species FullName BinomialName) - #:ontology "gn:" - #:separator "" - #:proc string-capitalize-first)) + (string->binomial-name + (field Species FullName BinomialName))) (set gn-term:genotype (field ("IF ((SELECT PublishFreeze.Name FROM PublishFreeze WHERE PublishFreeze.InbredSetId = InbredSet.Id LIMIT 1) IS NOT NULL, 'Traits and Cofactors', '')" genotypeP))) (set gn-term:phenotype -- cgit v1.2.3