【SICP练习】128 练习3.59

练习3-59

原文

代码

a)

(define (integrate-series s)
              (stream-map * (stream-map / ones integers) s))

b)

(define sine-series (cons-stream 0 (integrate-series cosine-series)))
(define cosine-series (cons-stream 1 (integrate-series (scale-stream sine-series -1))))

---

---

感谢访问，希望对您有所帮助。 欢迎关注或收藏、评论或点赞。

---

为使本文得到斧正和提问，转载请注明出处：
http://blog.csdn.net/nomasp

---

版权声明：本文为 NoMasp柯于旺 原创文章，如需转载请联系本人。