Use rdf:type explicitly and fix SKOS avg/mapping method triples.

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>

1 files changed, 5 insertions, 6 deletions

diff --git a/examples/strains.scm b/examples/strains.scm
index 3e86361..2d0f144 100755
--- a/examples/strains.scm
+++ b/examples/strains.scm
@@ -82,7 +82,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
    (gnc:mapping_method skos:definition "Controlled vocabulary describing statistical/computational methods used for mapping in GeneNetwork."))
   (triples
       (string->identifier "mapping_method" (field MappingMethod Name) #:separator "_")
-    (set a 'skos:Concept)
+    (set rdf:type 'skos:Concept)
     (set skos:inScheme 'gnc:mapping_method)
     (set skos:prefLabel (field MappingMethod Name))))
 
@@ -92,12 +92,12 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
   (tables (AvgMethod))
   (schema-triples
    (gnc:avg_method a skos:ConceptScheme)
-   (gnc:avg_method skos:prefLabel "Normalization and Averaging Method Vocabulary" ;)
+   (gnc:avg_method skos:prefLabel "Normalization and Averaging Method Vocabulary")
    (gnc:avg_method skos:definition "Controlled vocabulary describing normalization, transformation, and summarization methods applied in GeneNetwork."))
   (triples (string->identifier "avg_method" (field AvgMethod Name AvgMethodName) #:separator "_")
-    (set a skos:Concept)
-    (set skos:inScheme gnc:avg_method)
-    (set prefLabel (field AvgMethod Normalization))))
+    (set rdf:type 'skos:Concept)
+    (set skos:inScheme 'gnc:avg_method)
+    (set skos:prefLabel (field AvgMethod Normalization))))
 
 
 
@@ -132,4 +132,3 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
    (outputs
     `(#:documentation ,documentation
       #:rdf ,output))))
-