Lisp Scheme Part17
■ このスレッドは過去ログ倉庫に格納されています
0198デフォルトの名無しさん
2007/05/13(日) 14:55:27の質問をした者です。
(define (f0 a b)
(let ((d1 (* a b))
(d2 (- a b))
(d3 (/ a b)))
(* (f1 d1 d2) (f2 d2 d3))))
(define (f1 x y)
(* x y))
(define (f2 x y)
(/ x y))
つづく、、、
■ このスレッドは過去ログ倉庫に格納されています