SICP 問題 3.61

べき級数Sの逆数を求める手続きinvert-unit-seriesを定義する．
問題文の通りですね．

(define (invert-unit-series stream)
  (cons-stream 1
               (mul-series (scale-stream (stream-cdr s1) -1)
                           (invert-unit-series stream))))