aboutsummaryrefslogtreecommitdiff
path: root/gn/data/strains.scm
diff options
context:
space:
mode:
authorPjotr Prins2023-11-18 11:33:24 +0100
committerPjotr Prins2023-11-18 11:33:24 +0100
commit06f941636a99904671c89916e17f28de4b2cd07e (patch)
treef9e8e84312bf17a8369af9843cb62b4b285e6285 /gn/data/strains.scm
parent71c8e03b77dc094567c3b522909d7aa6995585f4 (diff)
downloadgn-guile-06f941636a99904671c89916e17f28de4b2cd07e.tar.gz
Reorganize DB handler and fetch first dataset
Diffstat (limited to 'gn/data/strains.scm')
-rw-r--r--gn/data/strains.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/gn/data/strains.scm b/gn/data/strains.scm
index b3e6744..241ecda 100644
--- a/gn/data/strains.scm
+++ b/gn/data/strains.scm
@@ -17,9 +17,10 @@
))
(define* (strain-id-names inbred-set #:key (map? #f))
- "Return assoc list of tuples of strain id+names, e.g.
-
+ "Return assoc list of tuples of strain id+names:
((4 . BXD1) (5 . BXD2) (6 . BXD5) (7 . BXD6)...
+
+map? will say whether the strains/individuals are used for mapping.
"
(call-with-db
(lambda (db)