aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/dump-dataset-metadata.scm12
-rwxr-xr-xexamples/dump-phenotype.scm2
-rwxr-xr-xexamples/dump-species-metadata.scm2
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)