CommonLisp Scheme Part12
■ このスレッドは過去ログ倉庫に格納されています
0163デフォルトの名無しさん
NGNGプログラムを書いたところ、エラーがでて、その原因をお伺いしたかったのですが、このスレでよかったでしょうか?
SICP 問題1.37 連分数展開の問題
”コード”
(define (cont-frac n d k)
(define denom (d k));分母
(define numer (n k));分子
(define (cont-fraction p)
(if(> p 1)
((set! denom (+ (d (- p 1)) (/ numer denom)))
(set! numer (n (- p 1)))
(cont-fraction (- p 1)))
))
(cont-fraction k)
(/ numer denom)
)
”入力”
(cont-frac (lambda(i) 1.0)
(lambda(i) 1.0)
10)
”エラー”
procedure application: expected procedure, given: #<void>; arguments were: #<void> #<void>
”環境”
Dr.scheme
■ このスレッドは過去ログ倉庫に格納されています