Link genotype files.

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

2 files changed, 4 insertions, 0 deletions

diff --git a/examples/datasets.scm b/examples/datasets.scm
index 55d8c35..e4f35da 100755
--- a/examples/datasets.scm
+++ b/examples/datasets.scm
@@ -25,6 +25,7 @@
     (set rdf:type 'dcat:Dataset)
     (set dct:title (normalize-string-field (field InfoFiles InfoPageName)))
     (set dct:identifier (format #f "GN~a" (field InfoFiles GN_AccesionId)))
+    (set gnt:has_genotype_files (string->symbol (format #f "gn-files:GN~a" (field InfoFiles GN_AccesionId))))
     (set gnt:has_strain
          (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))
     (set gnt:has_experiment_type
@@ -105,6 +106,7 @@
       ("gn:" "<http://rdf.genenetwork.org/v1/id/>")
       ("gnc:" "<http://rdf.genenetwork.org/v1/category/>")
       ("gnt:" "<http://rdf.genenetwork.org/v1/term/>")
+      ("gn-files:" "<http://files.genenetwork.org/current/>")
       ("rdf:" "<http://www.w3.org/1999/02/22-rdf-syntax-ns#>")
       ("rdfs:" "<http://www.w3.org/2000/01/rdf-schema#>")
       ("owl:" "<http://www.w3.org/2002/07/owl#>")
diff --git a/examples/ontology.scm b/examples/ontology.scm
index 4be8bd1..724a75a 100755
--- a/examples/ontology.scm
+++ b/examples/ontology.scm
@@ -240,6 +240,8 @@
       (triple 'gnc:dna_marker 'a 'owl:Class)
       (triple 'gnc:dna_marker 'a 'skos:Concept)
       (triple 'gnc:dna_marker 'rdfs:label "A DNA Marker or SNP")
+      (triple 'gnt:has_genotype_files 'rdfs:label "This resource has these genotype files")
+      (triple 'gnt:has_genotype_files 'rdfs:domain 'dcat:Dataset)
       (triple 'gnt:has_genotype_data 'rdf:type 'owl:ObjectProperty)
       (triple 'gnt:has_genotype_data 'rdfs:label "this resources has genotype data.")
       (triple 'gnt:has_genotype_data 'rdfs:comment "Associates a resource with its genotype data.")