diff options
| -rwxr-xr-x | examples/probeset.scm | 42 |
1 files changed, 2 insertions, 40 deletions
diff --git a/examples/probeset.scm b/examples/probeset.scm index 646c3df..abb3ecb 100755 --- a/examples/probeset.scm +++ b/examples/probeset.scm @@ -40,17 +40,7 @@ (gnt:hasBlatSeq a owl:ObjectProperty) (gnt:hasBlatSeq rdfs:domain gnc:Probeset) (gnt:hasTargetSeq a owl:ObjectProperty) - (gnt:hasTargetSeq rdfs:domain gnc:Probeset) - (gnt:hasHomologeneId a owl:ObjectProperty) - (gnt:hasHomologeneId rdfs:domain gnc:Probeset) - (gnt:hasPubChemId a owl:ObjectProperty) - (gnt:hasPubChemId rdfs:domain gnc:Probeset) - (gnt:hasKeggId a owl:ObjectProperty) - (gnt:hasKeggId rdfs:domain gnc:Probeset) - (gnt:hasOmimId a owl:ObjectProperty) - (gnt:hasOmimId rdfs:domain gnc:Probeset) - (gnt:hasChebiId a owl:ObjectProperty) - (gnt:hasChebiId rdfs:domain gnc:Probeset)) + (gnt:hasTargetSeq rdfs:domain gnc:Probeset)) (triples (let ((id (field ("IF(NULLIF(TRIM(ProbeSet.Name), '') IS NULL, '', TRIM(ProbeSet.Name))" ProbeSetIdName))) @@ -129,35 +119,7 @@ Probe_set_Blat_Mb_end)) '^^xsd:double)) (set gnt:hasBlatSeq (sanitize-rdf-string (field ProbeSet BlatSeq))) - (set gnt:hasTargetSeq (sanitize-rdf-string (field ProbeSet TargetSeq))) - (set gnt:hasHomologeneId (ontology 'homologene: - (field ("IFNULL(ProbeSet.HomoloGeneID, '')" - HomoloGeneID)))) - (set gnt:hasUniprotId (ontology 'uniprot: - (field ("IFNULL(ProbeSet.UniProtID, '')" - UniProtID)))) - (set gnt:hasPubChemId (ontology - 'pubchem: - (field ("IFNULL(ProbeSet.PubChem_ID, '')" - PubChem_ID)))) - (set gnt:hasKeggId (ontology - 'kegg: - (field ("IFNULL(ProbeSet.KEGG_ID, '')" - KEGG_ID)))) - (set gnt:hasOmimId (ontology - 'omim: - (let ((omim (field ("IFNULL(ProbeSet.OMIM, '')" - OMIM)))) - (if (number? omim) - omim - (regexp-substitute/global - #f "[^0-9]" - omim - 'pre "" 'post))))) - (set gnt:hasChebiId (ontology - 'chebi: - (field ("IFNULL(ProbeSet.ChEBI_ID, '')" - ChEBI_ID)))))) + (set gnt:hasTargetSeq (sanitize-rdf-string (field ProbeSet TargetSeq))))) |