aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/classification.scm6
-rwxr-xr-xexamples/dataset-metadata.scm8
-rwxr-xr-xexamples/phenotype.scm2
3 files changed, 8 insertions, 8 deletions
diff --git a/examples/classification.scm b/examples/classification.scm
index 3843c49..828befa 100755
--- a/examples/classification.scm
+++ b/examples/classification.scm
@@ -59,7 +59,7 @@
(triples "gnc:Set"
(set skos:member
(string->identifier
- "set" (field InbredSet Name)))))
+ "set" (field InbredSet Name InbredSetName)))))
(define-transformer species
(tables (Species))
@@ -97,10 +97,10 @@
(gnt:mappingMethod a owl:ObjectProperty)
(gnt:mappingMethod rdfs:domain gnc:set))
(triples (string->identifier
- "set" (field InbredSet Name))
+ "set" (field InbredSet Name InbredSetName))
(set skos:inScheme 'gnc:ResourceClassificationScheme)
(set rdfs:label (field InbredSet FullName))
- (set skos:prefLabel (field InbredSet Name))
+ (set skos:prefLabel (field InbredSet Name InbredSetName))
(set gnt:geneticType (field InbredSet GeneticType))
(set gnt:family (field InbredSet Family))
(set gnt:mappingMethod (field MappingMethod Name))
diff --git a/examples/dataset-metadata.scm b/examples/dataset-metadata.scm
index e6ef350..be8337d 100755
--- a/examples/dataset-metadata.scm
+++ b/examples/dataset-metadata.scm
@@ -186,7 +186,7 @@
(field DatasetStatus DatasetStatusName)))
(set xkos:classifiedUnder
(string->identifier
- "set" (field InbredSet Name)))
+ "set" (field InbredSet Name InbredSetName)))
(set gnt:hasTissue (string->identifier "tissue"
(field Tissue Short_Name)))
(set gnt:usesNormalization
@@ -257,7 +257,7 @@
'^^xsd:date))
(set xkos:classifiedUnder
(string->identifier
- "set" (field InbredSet Name)))))
+ "set" (field InbredSet Name InbredSetName)))))
(define-transformer genofreeze
(tables (GenoFreeze
@@ -283,7 +283,7 @@
'^^xsd:date))
(set xkos:classifiedUnder
(string->identifier
- "set" (field InbredSet Name)))))
+ "set" (field InbredSet Name InbredSetName)))))
;; Molecular Traits are also referred to as ProbeSets
(define-transformer probesetfreeze
@@ -326,7 +326,7 @@
(field Tissue Short_Name)))
(set xkos:classifiedUnder
(string->identifier
- "set" (field InbredSet Name)))))
+ "set" (field InbredSet Name InbredSetName)))))
diff --git a/examples/phenotype.scm b/examples/phenotype.scm
index ad3c959..2a6b192 100755
--- a/examples/phenotype.scm
+++ b/examples/phenotype.scm
@@ -55,7 +55,7 @@
(set rdf:type 'gnc:Phenotype)
(set xkos:classifiedUnder
(string->identifier
- "set" (field InbredSet Name)
+ "set" (field InbredSet Name InbredSetName)
#:separator ""
#:proc string-capitalize-first))
;; This is the trait's name