diff options
-rwxr-xr-x | examples/dump-dataset-metadata.scm | 12 | ||||
-rwxr-xr-x | examples/dump-phenotype.scm | 2 | ||||
-rwxr-xr-x | examples/dump-species-metadata.scm | 2 |
3 files changed, 8 insertions, 8 deletions
diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm index 8f381b7..a127e57 100755 --- a/examples/dump-dataset-metadata.scm +++ b/examples/dump-dataset-metadata.scm @@ -191,9 +191,9 @@ (field DatasetStatus DatasetStatusName))) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) - #:separator "" - #:proc string-capitalize-first)) + "set" (field InbredSet Name) + #:separator "" + #:proc string-capitalize-first)) (set gnt:hasTissue (string->identifier "tissue" (field Tissue Short_Name))) (set gnt:usesNormalization @@ -273,7 +273,7 @@ '^^xsd:date)) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) @@ -303,7 +303,7 @@ '^^xsd:date)) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) @@ -350,7 +350,7 @@ (field Tissue Short_Name))) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm index 6c52ebb..abcf140 100755 --- a/examples/dump-phenotype.scm +++ b/examples/dump-phenotype.scm @@ -56,7 +56,7 @@ (set rdf:type 'gnc:phenotype) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)) (set gnt:traitName diff --git a/examples/dump-species-metadata.scm b/examples/dump-species-metadata.scm index a1c942e..20b0b05 100755 --- a/examples/dump-species-metadata.scm +++ b/examples/dump-species-metadata.scm @@ -161,7 +161,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used. (gnt:mappingMethod a owl:ObjectProperty) (gnt:mappingMethod rdfs:domain gnc:set)) (triples (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first) (set rdf:type 'gnc:set) |