Add missing join.

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

1 files changed, 7 insertions, 2 deletions

diff --git a/examples/phenotype.scm b/examples/phenotype.scm
index b243ccd..690b6a9 100755
--- a/examples/phenotype.scm
+++ b/examples/phenotype.scm
@@ -96,6 +96,7 @@
 (define-transformer gn:trait->gn:phenotype
   (tables (PublishXRef
            (left-join InbredSet "ON InbredSet.InbredSetId = PublishXRef.InbredSetId")
+           (inner-join PublishFreeze "ON PublishFreeze.InbredSetId = InbredSet.Id")
            (left-join Publication "ON Publication.Id = PublishXRef.PublicationId")
            (left-join Phenotype "ON Phenotype.Id = PublishXRef.PhenotypeId"))
           "WHERE InbredSet.public > 0")
@@ -112,7 +113,7 @@
     (set gnt:has_strain (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_"))
     (set owl:equivalentClass
          (field ("CONCAT(IFNULL(InbredSet.InbredSetCode, PublishXRef.InbredSetId), '_', PublishXRef.Id)"
-                  Phenotype)))
+                 Phenotype)))
     (set dct:references
          (let ((pmid (field
                       ("IF(Publication.PubMed_ID IS NULL, '', CONVERT(Publication.PubMed_Id, INT))"
@@ -183,7 +184,11 @@
       ("xkos:" "<http://rdf-vocabulary.ddialliance.org/xkos#>")
       ("pubmed:" "<http://rdf.ncbi.nlm.nih.gov/pubmed/>")))
    (inputs
-    (list gn:set->gn:dataset gn:dataset->gn:trait gnc:phenotype->gn:phenotype gn:phenotype->metadata gn:trait->gn:phenotype))
+    (list gn:set->gn:dataset
+          gn:dataset->gn:trait
+          gnc:phenotype->gn:phenotype
+          gn:phenotype->metadata
+          gn:trait->gn:phenotype))
    (outputs
     `(#:documentation ,documentation
       #:rdf ,output))))