2015-10-08 SICP 問題1.39 scheme SICP (define (tan-cf x k) (cont-frac (lambda (i) (if (= i 1) x (- (square x)))) (lambda (i) (- (* 2.0 i) 1.0)) k))