diff options
| -rwxr-xr-x | examples/classification.scm | 12 | ||||
| -rwxr-xr-x | examples/dataset-metadata.scm | 8 | ||||
| -rwxr-xr-x | examples/phenotype.scm | 2 |
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 "_")) |