[plt-scheme] PLT Scheme 207 available

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.