diff options
| author | Munyoki Kilyungi | 2026-01-28 23:07:30 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-01-28 23:07:30 +0300 |
| commit | 1097dfffa12cb0d0c18f5f4b2c91ecbaf6db2ded (patch) | |
| tree | 78b94b8f28f7a683dd0c78de94a729d7e7f59897 /examples/dataset-metadata.scm | |
| parent | 3b1f3e5c087dc01db3eb76611253e523c9b4ffb1 (diff) | |
| download | gn-transform-databases-1097dfffa12cb0d0c18f5f4b2c91ecbaf6db2ded.tar.gz | |
Move genechip ontology to own file.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/dataset-metadata.scm')
| -rwxr-xr-x | examples/dataset-metadata.scm | 30 |
1 files changed, 1 insertions, 29 deletions
diff --git a/examples/dataset-metadata.scm b/examples/dataset-metadata.scm index 38dac9c..23dd48e 100755 --- a/examples/dataset-metadata.scm +++ b/examples/dataset-metadata.scm @@ -12,33 +12,6 @@ (transform special-forms)) - -(define-transformer gene-chip - (tables (GeneChip - (left-join Species "USING (SpeciesId)"))) - (schema-triples - (gnc:gene_chip a skos:Concept) - (gnc:gene_chip - skos:description - "This is a set of controlled terms that are used to describe a given gene chip/platform") - (gnt:has_geo_series_id rdfs:domain gnc:platform) - (gnt:has_geo_series_id rdfs:domain gnc:gene_chip) - (gnt:has_go_tree_value a owl:ObjectProperty) - (gnt:has_go_tree_value skos:definition "This resource the following GO tree value") - (gnt:has_go_tree_value rdfs:domain gnc:gene_chip)) - (triples (string->identifier "platform" (field GeneChip Name) #:separator "_") - (set rdf:type 'gnc:gene_chip) - (set rdfs:label (field GeneChip GeneChipName)) - (set skos:prefLabel (field GeneChip Name)) - (set skos:altLabel (field ("IF(GeneChip.GeneChipName != GeneChip.Title, Title, NULL)" - Title))) - (set gnt:has_go_tree_value (field GeneChip Go_tree_value)) - (set xkos:classifiedUnder - (string->identifier "" (remap-species-identifiers (field Species Fullname)) #:separator "")) - (set gnt:has_geo_series_id - (ontology 'geoSeries: - (string-trim-both (field GeneChip GeoPlatform)))))) - (define-transformer info-files (tables (InfoFiles (left-join PublishFreeze "ON InfoFiles.InfoPageName = PublishFreeze.Name") @@ -455,8 +428,7 @@ (list info-files publishfreeze genofreeze - probesetfreeze - gene-chip)) + probesetfreeze)) (outputs `(#:documentation ,documentation #:rdf ,output)))) |
