diff options
Diffstat (limited to 'examples/dump-probesetfreeze.scm')
-rwxr-xr-x | examples/dump-probesetfreeze.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/examples/dump-probesetfreeze.scm b/examples/dump-probesetfreeze.scm index 3e0c930..0be81ac 100755 --- a/examples/dump-probesetfreeze.scm +++ b/examples/dump-probesetfreeze.scm @@ -26,7 +26,10 @@ (gn:name rdfs:range rdfs:Literal)) (triples (string->identifier "platform" (field GeneChip Name)) (set rdf:type 'gn:platform) - (set gn:name (field GeneChip GeneChipName)))) + (set gn:name (field GeneChip GeneChipName)) + (set gn:geoPlatform + (ontology 'geoSeries: + (string-trim-both (field GeneChip GeoPlatform)))))) ;; Molecular Traits are also referred to as ProbeSets (define-dump dump-probesetfreeze |