Lisp Scheme Part31
■ このスレッドは過去ログ倉庫に格納されています
0077デフォルトの名無しさん
2010/09/20(月) 12:38:17((lambda (x)
((lambda (f)
((lambda (g)
((lambda (f) ((lambda (x) (f 35)) 7))
(lambda (a) (- a x))))
(lambda (a) (f a))))
(lambda (a) (+ a x))))
5)
>>70をletrec*として直したやつ
((lambda (x f g)
(set! x 5)
(set! f (lambda (a) (+ a x)))
(set! g (lambda (a) (f a)))
(set! f (lambda (a) (- a x)))
(set! x 7)
(f 35))
'()
'()
'())
>>77
■ このスレッドは過去ログ倉庫に格納されています