diff options
Diffstat (limited to 'examples/dataset-metadata.scm')
| -rwxr-xr-x | examples/dataset-metadata.scm | 8 |
1 files changed, 4 insertions, 4 deletions
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 "_")))) |