摘要: (define (average-damp f) (lambda (x) (/ (+ (f x) x) 2)))(define (fixed-point f guess) (define (closed-enough? v1 v2) (< (abs (- v1 v2)) 0.000000000001)) (let ((next (f guess))) (cond ((closed-enoug... 阅读全文
posted @ 2007-01-06 23:30 浅蓝の天 阅读(181) 评论(0) 推荐(0) 编辑