Replace gnt:belongs_to_group -> gnt:has_strain.

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

3 files changed, 11 insertions, 11 deletions

diff --git a/examples/classification.scm b/examples/classification.scm
index a0e92e2..ddf4775 100755
--- a/examples/classification.scm
+++ b/examples/classification.scm
@@ -140,12 +140,12 @@
    (gnt:uses_mapping_method rdfs:domain gnc:set)
    (gnt:uses_mapping_method rdfs:range gnc:mapping_method)
    (gnt:uses_mapping_method rdfs:comment "The method used to map genetic or experimental data for this resource.")
-   (gnt:belongs_to_group a owl:ObjectProperty)
-   (gnt:belongs_to_group rdf:comment "Indicates the group the resources belongs to")
-   (gnt:belongs_to_group schema:domainIncludes dcat:Dataset)
-   (gnt:belongs_to_group schema:domainIncludes gnc:species)
-   (gnt:belongs_to_group rdfs:range gnc:set)
-   (gnt:belongs_to_group rdfs:label "belongs-to-group"))
+   (gnt:has_strain a owl:ObjectProperty)
+   (gnt:has_strain rdf:comment "Indicates the group the resources belongs to")
+   (gnt:has_strain schema:domainIncludes dcat:Dataset)
+   (gnt:has_strain schema:domainIncludes gnc:species)
+   (gnt:has_strain rdfs:range gnc:set)
+   (gnt:has_strain rdfs:label "belongs-to-group"))
   (triples (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_")
     (set rdf:type 'gnc:set)
     (set rdfs:label (field InbredSet FullName))
diff --git a/examples/dataset-metadata.scm b/examples/dataset-metadata.scm
index 4c64993..53ff2d7 100755
--- a/examples/dataset-metadata.scm
+++ b/examples/dataset-metadata.scm
@@ -200,7 +200,7 @@
     (set dct:identifier (format #f "GN~a" (field InfoFiles GN_AccesionId)))
     (set dct:accessRights (string-downcase
                            (field DatasetStatus DatasetStatusName)))
-    (set gnt:belongs_to_group
+    (set gnt:has_strain
          (string->identifier
           "set"
           (field ("IFNULL(InbredSet.Name, IFNULL(PublishInbredSet.Name, GenoInbredSet.Name))"
@@ -398,7 +398,7 @@
     (set dct:created (annotate-field
                       (field PublishFreeze CreateTime)
                       '^^xsd:date))
-    (set gnt:belongs_to_group
+    (set gnt:has_strain
          (string->identifier
           "set" (field InbredSet Name InbredSetName)
           #:separator "_"))))
@@ -418,7 +418,7 @@
     (set dct:created (annotate-field
                       (field GenoFreeze CreateTime)
                       '^^xsd:date))
-    (set gnt:belongs_to_group
+    (set gnt:has_strain
          (string->identifier
           "set" (field InbredSet Name InbredSetName)
           #:separator "_"
@@ -456,7 +456,7 @@
                       '^^xsd:datetime))
     (set gnt:uses_data_scale (field ProbeSetFreeze DataScale))
     (set gnt:has_tissue (string->identifier "tissue" (field Tissue Short_Name) #:separator "_"))
-    (set gnt:belongs_to_group (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))))
+    (set gnt:has_strain (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))))
 
 
 
diff --git a/examples/phenotype.scm b/examples/phenotype.scm
index ae24d66..03eec45 100755
--- a/examples/phenotype.scm
+++ b/examples/phenotype.scm
@@ -58,7 +58,7 @@
                     Phenotype))
             #:separator "_")
     (set rdf:type 'gnc:phenotype)
-    (set gnt:belongs_to_group
+    (set gnt:has_strain
          (string->identifier
           "set" (field InbredSet Name InbredSetName)
           #:separator "_"))