(define (compose f g)
(lambda (x) (f (g x))))
(define square
(lambda (x) (* x x)))
(define inc
(lambda (x) (+ x 1)))
((compose square inc) 6)
SICP 习题1. 42 compose
最新推荐文章于 2019-04-25 18:13:00 发布

(define (compose f g)
(lambda (x) (f (g x))))
(define square
(lambda (x) (* x x)))
(define inc
(lambda (x) (+ x 1)))
((compose square inc) 6)