diff options
Diffstat (limited to 'scripts/precompute/list-traits-to-compute.scm')
| -rwxr-xr-x | scripts/precompute/list-traits-to-compute.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/scripts/precompute/list-traits-to-compute.scm b/scripts/precompute/list-traits-to-compute.scm index 07e80e9..d85a51f 100755 --- a/scripts/precompute/list-traits-to-compute.scm +++ b/scripts/precompute/list-traits-to-compute.scm @@ -77,7 +77,12 @@ When that is the case we might as well write the phenotype file because we have (define (write-json id recs) (display id) (newline) - (display (scm->json (reverse recs))) + (write (scm->json recs)) + (write (scm->json (map (lambda (r) + r + ) + recs))) + (newline) ) (define (write-phenotypes first-id num batch-size) |