[CODE]
(define (square x) (* x x))
(define (tan-cf x k)
  (define (d-tan i) (- (* 2 i) 1))
  (define (n-tan i)
    (if (= i 1)
        x
        (square x)))
  (cont-frac n-tan d-tan k))
[/CODE]

크리에이티브 커먼즈 라이센스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-동일조건변경허락 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.