diff options
Diffstat (limited to 'examples/dump-species-metadata.scm')
| -rwxr-xr-x | examples/dump-species-metadata.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/dump-species-metadata.scm b/examples/dump-species-metadata.scm index 2f229e9..3bbda51 100755 --- a/examples/dump-species-metadata.scm +++ b/examples/dump-species-metadata.scm @@ -102,10 +102,10 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used. (left-join Species "ON Strain.SpeciesId = Species.SpeciesId"))) (schema-triples (gnc:strain skos:broader gnc:species) - (gnt:species rdfs:domain gnc:strain) - (gnt:species skos:definition "This resource belongs to this species") - (gnt:species a owl:ObjectProperty) - (gnt:species skos:definition "This resource belongs to this species") + (gnt:belongsToSpecies rdfs:domain gnc:strain) + (gnt:belongsToSpecies skos:definition "This resource belongs to this species") + (gnt:belongsToSpecies a owl:ObjectProperty) + (gnt:belongsToSpecies skos:definition "This resource belongs to this species") (gnt:alias rdfs:domain gnc:strain) (gnt:alias a owl:ObjectProperty) (gnt:symbol rdfs:domain gnc:strain) @@ -119,7 +119,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used. #:separator "" #:proc string-capitalize-first) (set rdf:type 'gnc:strain) - (set gnt:species + (set gnt:belongsToSpecies (string->identifier "" (remap-species-identifiers (field Species Fullname)) #:separator "" #:proc string-capitalize-first)) @@ -170,7 +170,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used. (set gnt:family (field InbredSet Family)) (set gnt:mappingMethod (field MappingMethod Name)) (set gnt:code (field InbredSet InbredSetCode)) - (set gnt:species + (set gnt:belongsToSpecies (string->identifier "" (remap-species-identifiers (field Species Fullname)) #:separator "" #:proc string-capitalize-first)) |