From 952a8311e22c2062f7b090ea65577b3ec2933403 Mon Sep 17 00:00:00 2001 From: Pjotr Prins Date: Tue, 14 May 2024 10:10:33 +0200 Subject: Add missing strain. Remove unused call --- gn/data/strains.scm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gn/data/strains.scm') diff --git a/gn/data/strains.scm b/gn/data/strains.scm index 06255e3..e5f839b 100644 --- a/gn/data/strains.scm +++ b/gn/data/strains.scm @@ -41,6 +41,8 @@ used-for-mapping? will say whether the strains/individuals are used for mapping. (define* (bxd-strain-id-names #:key (used-for-mapping? #f)) "Return assoc list of tuples of strain id + names. Same as strain-id-names, but just for the BXD. +Note that the parents are included - even if we don't use those for mapping. + used-for-mapping? will say whether the strains/individuals are used for mapping. Always True, FIXME" (filter (lambda (l) l) (map (lambda (l) -- cgit v1.2.3