07/05/13 14:55:27
ｽﾚﾘﾝｸ(tech板:841番)
の質問をした者です。
(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))
つづく、、、
07/05/13 14:55:27
ｽﾚﾘﾝｸ(tech板:841番)
の質問をした者です。
(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))
つづく、、、