diff options
| author | Munyoki Kilyungi | 2026-01-26 21:58:01 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-01-26 21:58:01 +0300 |
| commit | 23468656068f87d2638318bf4c3153da28c90f76 (patch) | |
| tree | 3abf9e81cbe7e800ea54d329fceaaf804206c384 | |
| parent | 27894fd4e5bf7e4221fea3224a44b654cdc3a0e1 (diff) | |
| download | gn-transform-databases-23468656068f87d2638318bf4c3153da28c90f76.tar.gz | |
Add link for family in inbredset.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
| -rwxr-xr-x | examples/classification.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/examples/classification.scm b/examples/classification.scm index 4753f1c..27c8d98 100755 --- a/examples/classification.scm +++ b/examples/classification.scm @@ -193,6 +193,12 @@ (set gnt:has_species (string->identifier "" (remap-species-identifiers (field Species Fullname)))))) +(define-transformer inbredset-families* + (tables (InbredSet) + "WHERE Family IS NOT NULL") + (triples (string->identifier "set" (field InbredSet Name InbredSetName) #:separator "_") + (set gnt:has_family (string->identifier "family" (field InbredSet Family) #:separator "_")))) + (define-transformer inbredset-families-list (tables (InbredSet) "WHERE Family IS NOT NULL GROUP BY Family") @@ -270,6 +276,7 @@ species species-fan-out inbred-set + inbredset-families* species-families-list species-families-fanout inbredset-families-list |