SICP sicp 131: 3.62 exercises 1313.62 and

SICP sicp 131: 3.62 exercises 1313.62 and
Exercise 3-62 original

Exercise 3.62. use the results of exercises 3.60 and 3.61 to define a procedure div-series that divides two power series. div-series shocould work for any two series, provided that the denominator series begins with a nonzero constant term. (If the denominator has a zero constant term, then div-series showould signal an error .) show how to use div-series together with the result of exercise 3.59 to generate the power series for tangent.

Code

(Define (div-series s1 s2) (let (c (stream-car s2) (if (= c 0) (error "constant term of s2 can't be 0! ") (Scale-stream (mul-series s1 (reciprocal-series (scale-stream s2 (/1 c) (/1 c ))))) (define tane-series (div-series sine-series cosine-series ))