|
From: | David Nalesnik |
Subject: | Re: Dashed Stem |
Date: | Sat, 12 May 2012 15:41:00 -0500 |
I don't really understand the function, but maybe something like
(let helper ((lst '()) (next 0) (on on) (off off))
(define (build-pos-list len on off)
(if (< next len)
(helper (cons next lst) (+ next on) off on)
(reverse! lst (list len)))))
will do. No idea whether this should have an even number of elements
always or not.
[Prev in Thread] | Current Thread | [Next in Thread] |