| From: Jens Axel Søgaard (jensaxel at soegaard.net) Date: Wed May 19 14:57:46 EDT 2004 |
|
Robby Findler wrote:
> Here's another expression to try out:
>
> (map (lambda (x) (zero? (modulo seconds x))) '(2 3 5 7 11 13 17))
This is fun:
(require (rename mzscheme quotient quotient))
(map (lambda (x) (modulo (lift #t quotient seconds (expt 2 x)) 2))
'(0 1 2 3 4 5 6 7 ))
--
Jens Axel Søgaard
| Posted on the users mailing list. |
|