I'm looking for something that would turn this:

(defn myfunc [x,y]
   a=3
   a+x+y)

Into this:

(defn myfunc [x,y]
   (let [a 3]
     a+x+y))