From 287104dbef104e22f0289b73b1501157c75f476e Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Mon, 4 Dec 2023 18:24:08 +0300
Subject: Replace xkos:classifiedUnder -> gnt:belongsToSpecies for species.

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 examples/genbank.scm  | 2 +-
 examples/generif.scm  | 4 ++--
 examples/genotype.scm | 2 +-
 examples/strains.scm  | 2 +-
 4 files changed, 5 insertions(+), 5 deletions(-)

(limited to 'examples')

diff --git a/examples/genbank.scm b/examples/genbank.scm
index dc40d67..391cff0 100755
--- a/examples/genbank.scm
+++ b/examples/genbank.scm
@@ -35,7 +35,7 @@
             'genbank:
             (field Genbank Id))
     (set gnt:hasSequence (field Genbank Sequence))
-    (set xkos:classifiedUnder
+    (set gnt:belongsToSpecies
          (string->identifier "" (remap-species-identifiers (field Species Fullname))
                              #:separator ""
                              #:proc string-capitalize-first))))
diff --git a/examples/generif.scm b/examples/generif.scm
index b8f81a1..76751a9 100755
--- a/examples/generif.scm
+++ b/examples/generif.scm
@@ -101,7 +101,7 @@
              (format #f "rdf:type gnc:GNWikiEntry ; ")
              (if (string? species)
                  ""
-                 (format #f "xkos:classifiedUnder ~a ; "
+                 (format #f "gnt:belongsToSpecies ~a ; "
                          species))
              (format #f "rdfs:comment ~s^^xsd:string ; "
                      generif-comment)
@@ -174,7 +174,7 @@
              (format #f "rdf:type gnc:NCBIWikiEntry ; ")
              (format #f "rdfs:comment ~s^^xsd:string ; "
                      ncbi-comment)
-             (format #f "xkos:classifiedUnder ~a ; "
+             (format #f "gnt:belongsToSpecies ~a ; "
                      species-name)
              (if (eq? #f taxonomic-id)
                  ""
diff --git a/examples/genotype.scm b/examples/genotype.scm
index a5e30f9..7e72cf8 100755
--- a/examples/genotype.scm
+++ b/examples/genotype.scm
@@ -70,7 +70,7 @@
     (set gnt:hasAltSourceName
          (field ("IF((Source2 = Source), NULL, Source2)"
                  Source2)))
-    (set xkos:classifiedUnder
+    (set gnt:belongsToSpecies
          (string->identifier
           "" (remap-species-identifiers (field Species Fullname))
           #:separator ""
diff --git a/examples/strains.scm b/examples/strains.scm
index 8552229..bace36d 100755
--- a/examples/strains.scm
+++ b/examples/strains.scm
@@ -78,7 +78,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
              (field Strain Name)
              'pre "_" 'post))
     (set rdf:type 'gnc:strain)
-    (set xkos:classifiedUnder
+    (set gnt:belongsToSpecies
          (string->identifier "" (remap-species-identifiers (field Species Fullname))
                              #:separator ""
                              #:proc string-capitalize-first))
-- 
cgit v1.2.3