diff options
author | Munyoki Kilyungi | 2023-08-19 16:10:02 +0300 |
---|---|---|
committer | Munyoki Kilyungi | 2023-08-19 16:10:02 +0300 |
commit | dcfe92323fa82c30a199e8d9640668800a93f47b (patch) | |
tree | aa9a16d8273b2611d349a0aec353a95ad5a02b3e /examples/dump-phenotype.scm | |
parent | bc6e327b906f1c47be46ee397a3be46a222211f0 (diff) | |
download | gn-transform-databases-dcfe92323fa82c30a199e8d9640668800a93f47b.tar.gz |
Rename inbredSet identifier
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/dump-phenotype.scm')
-rwxr-xr-x | examples/dump-phenotype.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm index 8d04a80..203b2f3 100755 --- a/examples/dump-phenotype.scm +++ b/examples/dump-phenotype.scm @@ -79,6 +79,13 @@ (field ("CONCAT(IFNULL(InbredSet.Name, PublishXRef.InbredSetId), '_', PublishXRef.Id)" Phenotype))) (set rdf:type 'gnc:phenotype) + (set gnt:belongsToInbredSet + (string->identifier + "inbredSet" (field InbredSet Name) + #:separator "" + #:proc string-capitalize-first)) + (set gnt:traitName + (field PublishXRef Id)) (set rdfs:label (field ("CONCAT(IFNULL(InbredSet.Name, PublishXRef.InbredSetId), '_', PublishXRef.Id)" Phenotype))) |