SICP問題1.8

最近実験している時間が無いのだが、
会社の休憩時間を利用して考える。

実験は後でまとめてやる。
で、今回の問題は立方根の実装だが

http://d.hatena.ne.jp/xiombatsg/20060626#p1

の

(define (sqrt-iter y x)
        (if (good-enough y x)
             y
            (sqrt-iter (improve y x) x)))

の

(improve y x)

の中を

(define (improve y x)
      (/ (+ (/ x (square y)) (* 2 y)) 3)

に置き換えるだけな気がする。