Simple, silly code

Tuesday, September 22nd, 2009

Schools of fish or students!

(define whats-in-school?
(lambda (a n)
(when (eq? a ‘fish)
(for ((i (in-range n)))
(printf ” <o))))))<“)))
(when (eq? a ‘students)
(for ((i (in-range n)))
(printf ” O_o”)))
))

(whats-in-school? ‘fish 35)

Arielle