不動点の探索

SICP 
function abs(x) { return (x >= 0) ? x : -x; }

function fixed(f, guess) {
  var next = f(guess);
  return abs(guess - next) < 0.001 ? next : fixed(f, next);
}

print(fixed(Math.cos, 1));

テキストのほうは、もちょっと長かったような。
テキスト欄外のコメントに、ちょっと笑った。

講義がつまらない時にやってみるとよい: 電卓をラジアンモードにし、不動点が得られるまでcosのボタンを押し続ける