软件工程

本类阅读TOP10

·PHP4 + MYSQL + APACHE 在 WIN 系统下的安装、配置
·Linux 入门常用命令(1)
·Linux 入门常用命令(2)
·使用 DCPROMO/FORCEREMOVAL 命令强制将 Active Directory 域控制器降级
·DirectShow学习(八): CBaseRender类及相应Pin类的源代码分析
·基于ICE方式SIP信令穿透Symmetric NAT技术研究
·Windows 2003网络负载均衡的实现
·一网打尽Win十四种系统故障解决方法
·数百种 Windows 软件的免费替代品列表
·收藏---行百里半九十

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
JavaScript和SICP

作者:未知 来源:月光软件站 加入时间:2005-5-13 月光软件站

这两天公司的项目告一段落,学校的作业不算太难。因此我颇有点闲暇,于是重看SICP,同时学学JavaScript(看了google suggestgoogle maps, 还有CanyonBridgecbconnect, 对JavaScript的兴趣一下浓厚起来)。  Douglas Crockford 说得不错,JavaScript的确和Scheme有很多相似之处。JavaScript的作者一定谙熟函数编程,不然JavaScript的函数是lambda算子也太过巧合了。比如SICP1.1里计算平方根的Newton-Raphson算法:

(define (sqrt x)
  (define (good-enough? guess)
    (< (abs (- (square guess) x)) 0.001))
  (define (improve guess)
    (average guess (/ x guess)))
  (define (sqrt-iter guess)
    (if (good-enough? guess)
        guess
        (sqrt-iter (improve guess))))
  (sqrt-iter 1.0))

换成JavaScript版本近乎机械:

//Newton's method to find \sqrt{x}
function sqrt(x){
 function sqrt_iter(guess){
  if(good_enough(guess)){
   return guess;
  }
 
  return sqrt_iter(improve(guess)); 
 }

 function improve(guess){
  return average(guess, x/guess);
 }

 function average(x, y){
  return (x + y)/2;
 }

 function good_enough(guess){
  return Math.abs(guess * guess - x) < 0.001;
 }

 return sqrt_iter(1.0);
}

呵呵,看来把SICP里的程序用JavaScript重写也是件有趣的事。

呵呵,看来把SICP里的程序用JavaScript重写也是件有趣的事。




相关文章

相关软件