11.01-Y_combinator

Para criar um combinador na nossa linguagem, usarímos:

(call
    (call 
        (func p
            (call
                (func m (call m m))
                (func f (call p (func a (call (call f f) a)) ) )
            )
        )
        ; Fibonacci:
        (func g (func n (ifS n 1 (mulS n (call g (bminusS n 1))))))
    )
    ; Número para chamar o Fibonacci:
    42
)