aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/strains.scm9
1 files changed, 5 insertions, 4 deletions
diff --git a/examples/strains.scm b/examples/strains.scm
index e7a0032..44a0e87 100755
--- a/examples/strains.scm
+++ b/examples/strains.scm
@@ -86,7 +86,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
#:proc string-capitalize-first))
;; Name, and maybe a second name
(set rdfs:label (sanitize-rdf-string (field Strain Name)))
- (set rdfs:label (sanitize-rdf-string (field ("IF ((Strain.Name2 != Strain.Name), Strain.Name2, '')" Name2))))
+ (set skos:altLabel (sanitize-rdf-string (field ("IF ((Strain.Name2 != Strain.Name), Strain.Name2, '')" Name2))))
(set gnt:alias (sanitize-rdf-string (field ("IF ((Strain.Alias != Strain.Name), Strain.Alias, '')" Alias))))
(set gnt:symbol (field ("IF ((Strain.Symbol != Strain.Name), Strain.Symbol, '')" Symbol)))))
@@ -94,7 +94,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
(tables (MappingMethod))
(schema-triples
(gnc:mappingMethod a skos:Concept)
- (gnc:mappingMethod skos:definition "Terms that decribe mapping/normalization methods used in GeneNetwork"))
+ (gnc:mappingMethod skos:definition "Terms that decribe mapping methods used on this resource"))
(triples
(string->identifier "mappingMethod" (field MappingMethod Name))
(set rdf:type 'gnc:mappingMethod)
@@ -105,8 +105,9 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
;; the Name field.
(tables (AvgMethod))
(schema-triples
- (gnc:avgMethod rdf:type owl:Class))
- (triples (string->identifier "avgmethod" (field AvgMethod Name))
+ (gnc:avgMethod a skos:Concept)
+ (gnc:avgMethod skos:definition "Terms that decribe normalization methods used on this resource"))
+ (triples (string->identifier "avgMethod" (field AvgMethod Name))
(set rdf:type 'gnc:avgMethod)
(set rdfs:label (field AvgMethod Normalization))))