問題1.15

久しぶりに問題を解く。
で、今日の問題は

sinx = 3sin(x/3)-4(sin(x/3))^3


xが十分小さいときsinxがxとなることを利用して、

(define (cube x) (* x x x))
(define (p x) (- (* 3 x) (* 4 (cube x))))
(define (sine angle)
  (if (not (> (abs angle) 0.1))
      angle
      (p (sine (/ angle 3.0)))))

が書けるわけだけど。
問題としては

a

(sine 12.15)

を実行するとpが何回作用されるか。

b

プロセスの使うスペース数とステップ数の増加の程度を求める。

a

(sine 12.5)
(p (sine 4.1666))
(p (p (sine 1.38888)))
(p (p (p (sine 0.462966296))))
(p (p (p (p (sine 0.154322098)))))
(p (p (p (p (p (sine 0.051440699))))))

になると思われるから
5か

b
両方ともnかな?