|
From: | David Nalesnik |
Subject: | Re: Scheme question: convert a range |
Date: | Mon, 16 Nov 2015 18:57:38 -0600 |
On 16.11.2015 22:20, Thomas Morley wrote:
(define (foo pair)
(if (and (integer? (car pair)) (integer? (cdr pair)))
(iota (1+ (interval-length pair)) (car pair) 1))
#f)
(foo '(3 . 7))
--> (3 4 5 6 7)
An equally good solution.
Thank you, Simon
[Prev in Thread] | Current Thread | [Next in Thread] |