scope.lisp

def f1(x):
   x = x
   def f2(y):
      x += y
      return x
   return f2

(defn f1 [x]
  (let [x (atom x)]
    (fn [y]
      (swap! x + y)
      @x)))

> ((f1 1) 2)
3

(defun f1 (x)
  (let ((x x))
    (lambda (y)
      (setq x (+ x y))
      x)))

> (funcall (f1 1) 2)
3

>>> def f1(x):
...    x = x
...    return lambda y: x+y
>>> f1(1)(2)
3