From 88f89358559abd7383781e9f16d0fc125f3dc188 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Mon, 31 Jul 2023 16:03:32 +0300 Subject: Update how species are modelled Signed-off-by: Munyoki Kilyungi --- examples/dump-species-metadata.scm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'examples/dump-species-metadata.scm') diff --git a/examples/dump-species-metadata.scm b/examples/dump-species-metadata.scm index c8ceb18..292c0cf 100755 --- a/examples/dump-species-metadata.scm +++ b/examples/dump-species-metadata.scm @@ -31,17 +31,18 @@ (define-dump dump-species (tables (Species)) (schema-triples - (gnt:name rdfs:range rdfs:Literal) - (gnt:displayName rdfs:range rdfs:Literal) - (gnt:binomialName rdfs:range rdfs:Literal) - (gnt:family rdfs:range rdfs:Literal)) + (gnc:species rdf:type owl:Class) + (gnt:name rdfs:range gnc:species) + (gnt:binomialName rdfs:range gnc:species) + (gnt:family rdfs:range gnc:species) + (gnt:organism rdfs:range gnc:species)) (triples (string->identifier "" (remap-species-identifiers (field Species Fullname)) #:separator "" #:proc string-capitalize-first) (set rdf:type 'gnc:species) (set gnt:name (field Species SpeciesName)) - (set gnt:displayName (field Species MenuName)) + (set rdfs:label (field Species MenuName)) (set gnt:binomialName (field Species FullName)) (set gnt:family (field Species Family)) (set gnt:organism (ontology 'taxon: (field Species TaxonomyId))))) -- cgit v1.2.3