Name: Anonymous 2009-11-27 6:17
Is SICP actually good or is this another one of your silly memes?
(define-syntax λ
(syntax-rules ()
((_ (x) exp ...) (lambda(x) exp ...))
((_ (x y ...) exp ...) (lambda(x) (λ (y ...) exp ...)))
((_ x exp ...) (lambda x exp ...))))
(define-syntax partial
(syntax-rules ()
((_ proc arg) (proc arg))
((_ proc arg1 arg2 ...) (partial (proc arg1) arg2 ...))))