about summary refs log tree commit diff
diff options
context:
space:
mode:
authorMunyoki Kilyungi2026-02-12 05:42:47 +0300
committerMunyoki Kilyungi2026-02-12 05:42:47 +0300
commit4b116cc4def3ecc92accf8370b05a0b2810dd348 (patch)
treecf33eb2853d49a42f42e302ac9a7bccb21ae0eb6
parentbc89990b70556edfaade79de7016ee53a5075961 (diff)
downloadgn-transform-databases-4b116cc4def3ecc92accf8370b05a0b2810dd348.tar.gz
Remove duplicates in phenotype datasets.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
-rwxr-xr-xexamples/phenotype-datasets.scm23
1 files changed, 0 insertions, 23 deletions
diff --git a/examples/phenotype-datasets.scm b/examples/phenotype-datasets.scm
index 4819627..c8657fc 100755
--- a/examples/phenotype-datasets.scm
+++ b/examples/phenotype-datasets.scm
@@ -27,27 +27,6 @@
                             dataset_name))
                     #\,)))))
 
-(define-transformer gn:dataset->gn:set
-  (tables (Datasets
-           (inner-join InfoFiles "ON InfoFiles.DatasetId = Datasets.DatasetId")
-           (inner-join InbredSet "ON InbredSet.Id = InfoFiles.InbredSetId")
-           (inner-join PublishFreeze "ON PublishFreeze.InbredSetId = InbredSet.Id"))
-          "WHERE PublishFreeze.public > 0 GROUP BY Datasets.DatasetId")
-  (triples (string->identifier "dataset" (field PublishFreeze Name) #:separator "_")
-    (set gnt:has_strain (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))))
-
-(define-transformer gn:dataset->metadata
-  (tables (PublishXRef
-           (inner-join InbredSet "ON InbredSet.InbredSetId = PublishXRef.InbredSetId")
-           (inner-join Species "ON InbredSet.SpeciesId = Species.Id")
-           (inner-join PublishFreeze "ON PublishFreeze.InbredSetId = InbredSet.Id")
-           (inner-join Publication "ON Publication.Id = PublishXRef.PublicationId")
-           (inner-join Phenotype "ON Phenotype.Id = PublishXRef.PhenotypeId"))
-          "WHERE InbredSet.public > 0 GROUP BY Species.Name, PublishFreeze.Name")
-  (triples (string->identifier "dataset" (field PublishFreeze Name) #:separator "_")
-    (set dct:created (annotate-field (field PublishFreeze CreateTime) '^^xsd:datetime))
-    (set gnt:has_strain (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))))
-
 (define-transformer gn:dataset->gn:trait
   (tables (PublishXRef
            (inner-join InbredSet "ON InbredSet.InbredSetId = PublishXRef.InbredSetId")
@@ -101,8 +80,6 @@
    (inputs
     (list
      gn:set->gn:dataset
-     gn:dataset->gn:set
-     gn:dataset->metadata
      gn:dataset->gn:trait))
    (outputs
     `(#:documentation ,documentation