#lang smol/fun
(defvar x 1)
(deffun (f)
  (+ x 1))

(let ([x 2])
  (f))