diff options
| -rwxr-xr-x | examples/classification.scm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/examples/classification.scm b/examples/classification.scm index 92c4bf0..a0e92e2 100755 --- a/examples/classification.scm +++ b/examples/classification.scm @@ -107,14 +107,14 @@ (tables (InbredSet (left-join Species "ON InbredSet.SpeciesId=Species.Id"))) (schema-triples - (gnt:is_species_of a owl:ObjectProperty) - (gnt:is_species_of rdfs:range gnc:set) - (gnt:is_species_of rdfs:domain gnc:species) - (gnt:is_species_of owl:inverseOf gnt:belongs_to_species) - (gnt:is_species_of rdfs:label "this is the species of this resource.") - (gnt:is_species_of skos:definition "Lists all groups that belong to this species")) + (gnt:has_strain a owl:ObjectProperty) + (gnt:has_strain rdfs:range gnc:set) + (gnt:has_strain rdfs:domain gnc:species) + (gnt:has_strain owl:inverseOf gnt:belongs_to_species) + (gnt:has_strain rdfs:label "this resource belongs to this strain.") + (gnt:has_strain skos:definition "Lists all strains that belong to this resource.")) (triples (string->identifier "" (remap-species-identifiers (field Species Fullname))) - (set gnt:is_species_of + (set gnt:has_strain (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_")))) (define-transformer inbred-set |