3.59

来源:互联网 发布:京东万象数据平台 编辑:程序博客网 时间:2024/05/16 18:45
;3.59;a(define (integrate-series a)  (mul-streams (stream-map (lambda (x)                             (/ 1 x))                           integers)               a));b(define cosine-series  (cons-stream 1 (stream-map -                              (integrate-series sine-series))))(define sine-series  (cons-stream 0 (integrate-series consine-series)))

 
原创粉丝点击