【SICP练习】142 练习3.77
来源:互联网 发布:excel 重复数据统计 编辑:程序博客网 时间:2024/06/05 15:34
练习3-77
原文
Exercise 3.77. The integral procedure used above was analogous to the “implicit” definition of the infinite stream of integers in section 3.5.2. Alternatively, we can give a definition of integral that is more like integers-starting-from (also in section 3.5.2):
(define (integral integrand initial-value dt) (cons-stream initial-value (if (stream-null? integrand) the-empty-stream (integral (stream-cdr integrand) (+ (* dt (stream-car integrand)) initial-value) dt))))
When used in systems with loops, this procedure has the same problem as does our original version of integral. Modify the procedure so that it expects the integrand as a delayed argument and hence can be used in the solve procedure shown above.
代码
(define (integral delayed-integrand initial-value dt) (cons-stream initial-value (let ((integrand (force delayed-integrand))) (if (stream-null? integrand) the-empty-stream (integral (delay (stream-cdr integrand)) (+ (* dt (stream-car integrand)) initial-value) dt)))))
感谢您的访问,希望对您有所帮助。 欢迎大家关注或收藏、评论或点赞。
为使本文得到斧正和提问,转载请注明出处:
http://blog.csdn.net/nomasp
5 0
- 【SICP练习】142 练习3.77
- 【SICP练习】2 练习1.6
- 【SICP练习】3 练习1.7
- 【SICP练习】4 练习1.8
- 【SICP练习】5 练习1.9
- 【SICP练习】6 练习1.10
- 【SICP练习】7 练习1.11
- 【SICP练习】8 练习1.12
- 【SICP练习】9 练习1.15
- 【SICP练习】10 练习1.16
- 【SICP练习】11 练习1.17
- 【SICP练习】12 练习1.18
- 【SICP练习】13 练习1.19
- 【SICP练习】14 练习1.20
- 【SICP练习】15 练习1.21
- 【SICP练习】16 练习1.22
- 【SICP练习】17 练习1.23
- 【SICP练习】18 练习1.24
- 第四周 阅读程序 4
- HaahTable 再Hash
- Web_JavaScript_JS函数模块库;
- hdu4400 STL应用 查找思维题
- 个人作业
- 【SICP练习】142 练习3.77
- 更改IntelliJ的快捷键为Eclipse风格,并且恢复Alt+/代码自动补全快捷键code completion
- Android Studio 运行时出现 finished with non-zero exit value 2 错误分析
- 二阶段提交和三阶段提交算法的理解
- 滑动关闭实现
- CardView和SeekBar使用
- 【j2ee spring】8、整合SSH框架(1)
- zoj 3197 Google Book 【区间覆盖】
- POJ 1226 Substrings