2

私はコンビネータについて学ぼうとしていますが、( Y overriding self-application ) で与えられた例を理解するのに苦労しています。概念を理解し始めていると思いますが、まだ理解には程遠いです。

次のコードを Python に翻訳したいと思います。

     (define (U f) (f f))

     (define (fib-nr f)
       (lambda (n)
         (if (< n 2) 1 (+ ((f f) (- n 1)) ((f f) (- n 2))))))

     # Usage:   
     ((U fib-nr) 35) ;==> 14930352

私は次のように書いて「文字通りの」翻訳を試みました：

U = lambda u: u(u)

def fibnr(f):
    return lambda n:  1 if (n<2) else (f (f (n-1))) + (f (f (n-2)))

しかし、これは機能しません (関数がラムダ内で評価される順序に関係していると思います)。

だから私は関数合成を次のように使用しようとしました:

# http://code.activestate.com/recipes/52902-function-composition/
class compose:
    '''compose functions. compose(f,g,x...)(y...) = f(g(y...),x...))'''
    def __init__(self, f, g, *args, **kwargs):
        self.f = f
        self.g = g
        self.pending = args[:]
        self.kwargs = kwargs.copy()

    def __call__(self, *args, **kwargs):
        return self.f(self.g(*args, **kwargs), *self.pending, **self.kwargs)


U = lambda u: compose(u, u)

def fibnr(f):
    ff = compose(f, f)
    return lambda n:  1 if (n<2) else (ff (n-1)) + (ff (n-2))

コードの最後のスニペットを呼び出すと、ラムダが返されます。

>>> U(fibnr)(35)
<function <lambda> at 0x01A1B6B0>

それで、Pythonで与えられた例の「リテラル」翻訳を書くことは可能ですか? どうすればできますか？

4

1 に答える 1

4

正しい結果が得られると思われる簡単な翻訳を書きました。

def U(f): return f(f)

def fibnr(f):
    def lam(n):
        if (n < 2): return 1
        return f(f)(n-1) + f(f)(n-2)
    return lam

または、ラムダが本当に好きなら：

def fibnr(f): return lambda n: 1 if (n < 2) else f(f)(n-1) + f(f)(n-2)

あなたの最初の問題は、Lisp((f f) x)を Pythonf(f(x))ではなくPython に変換することだったと思いますf(f)(x)。

コンビネータを理解して頑張ってください:)

于 2010-06-22T21:29:28.360 に答える