def cache(func):
    map = {}
    def call(*args):
        if map.has_key(args):
            return map[args]
        else:
            result = func(*args)
            map[args] = result
            return result

    return call

def fib(n):
    if n < 2: 
        return 1
    else:    
        return fib(n-1)+fib(n-2);

fib = cache(fib)

print fib(300)

>>> y = 2
>>> x = y + "3"
Traceback (most recent call last):
  File "<stdin>", line 1, in ?
TypeError: unsupported operand type(s) for +: 'int' and 'str'

def fun(y):
    x = y + "3";

y = 1
fun(y)

Traceback (most recent call last):
  File "tst00.py", line 5, in ?
    fun(y)
  File "tst00.py", line 2, in fun
    x = y + "3";
TypeError: unsupported operand type(s) for +: 'int' and 'str'

>>>>> y = 2
>>>>> x = y + "3"
FR>>Traceback (most recent call last):
FR>>  File "<stdin>", line 1, in ?
FR>>TypeError: unsupported operand type(s) for +: 'int' and 'str'
FR>>

irb(main):001:0> y=2
=> 2
irb(main):002:0> x=y+"3"
TypeError: String can't be coerced into Fixnum
        from (irb):2:in `+'
        from (irb):2
irb(main):003:0> def fun(y); x = y + "3"; end
=> nil
irb(main):004:0> y=1
=> 1
irb(main):005:0> fun(y)
TypeError: String can't be coerced into Fixnum
        from (irb):3:in `+'
        from (irb):3:in `fun'
        from (irb):5
irb(main):006:0>

IT>Ok, сдаюсь

String.prototype.toNumber = function(x)
{
  alert("Тю на тебэ!");
}

funct( X, Y, Container ) -> 
   Z = X + Y,
   map( fun( X ) -> X + Z end, Container ).

G>funct( X, Y, Container ) -> 
G>   Z = X + Y,
G>   map( fun( X ) -> X + Z end, Container ).
G>

G>Просьба записать то же самое через локальные функции — на поверку.

def funct(X, Y, Container)
{
    def Z = X + Y;

    def fmap(X)
    {
        X + Z
    }

    map(fmap, Container);
}

E>Осталось только кого нибудь из Smalltalk-еров подождать

4> X = 2 + "3".

=ERROR REPORT==== 28-Aug-2006::09:45:24 ===
Error in process <0.44.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

5> Y = 2.
2
6> X = Y + "3".

=ERROR REPORT==== 28-Aug-2006::09:46:43 ===
Error in process <0.46.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

1> A = fun(Y) -> X = Y + "3" end.
#Fun<erl_eval.6.56006484>
2> Y = 1.
1
3> A(Y).

=ERROR REPORT==== 28-Aug-2006::09:49:57 ===
Error in process <0.39.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

E>Осталось только кого нибудь из Smalltalk-еров подождать

4> X = 2 + "3".

=ERROR REPORT==== 28-Aug-2006::09:45:24 ===
Error in process <0.44.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

5> Y = 2.
2
6> X = Y + "3".

=ERROR REPORT==== 28-Aug-2006::09:46:43 ===
Error in process <0.46.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

1> A = fun(Y) -> X = Y + "3" end.
#Fun<erl_eval.6.56006484>
2> Y = 1.
1
3> A(Y).

=ERROR REPORT==== 28-Aug-2006::09:49:57 ===
Error in process <0.39.0> with exit value: {badarith,[{erl_eval,eval_op,3},{erl_
eval,expr,5},{shell,exprs,6},{shell,eval_loop,3}]}

** exited: {badarith,[{erl_eval,eval_op,3},
                      {erl_eval,expr,5},
                      {shell,exprs,6},
                      {shell,eval_loop,3}]} **

CS>String.prototype.toNumber = function(x)
CS>{
CS>  alert("Тю на тебэ!");
CS>}
CS>

1 + "3"

G>У тебя тут не просто "локальные функции". Чтобы это заработало — нужны еще и лексические замыкания (lexical closures). Если они поддержаны (я не знаю, как на самом деле работает твой код), и есть "сокращенная форма определения функции", то она называется "лямбда-функцией". Термин такой. Твой анонимный делегат на поверку может оказаться лямбдой.

На поверку лямбда оказалась всего лишь короткой формой записи локальной функции.

M>А Erlang?

4>> X = 2 + "3".

M>=ERROR REPORT==== 28-Aug-2006::09:45:24 ===
M>

using System;

class Program
{
    static void Main()
    {
        int i = 1 + 1;
        Console.WriteLine("1 + 1 = " + i);
    }
}

G>funct( X, Y, Container ) -> 
G>   Z = X + Y,
G>   map( fun( X ) -> X + Z end, Container ).
G>

G>Код понятен? Просьба записать то же самое через локальные функции — на поверку.

function funct( X, Y:integer; Container:TContainer) :TContainer;
  var Z:integer;
  function local(X:integer):integer;
  begin
    local:= X + Z
  end;
begin
  Z := X + Y;
  funct:= map(local, Container)
end