(setq x 0)
(defun f (x)
   (let ((x (+ x 10))) x)
)

(f 1)
x