(let [m {:test 1}] (:test m))
1
(let [mymap {1 2}] (mymap 1))
2
(let [a 1] (defn f [] a))
#'user/f
(let [nan Double/NaN] (= nan nan))
true
(let [{:strs [foo]} {"foo" 123}] foo)
123
(let [a (gensym)] `(foo ~a))
(user/foo G__1231217)
(let [{:keys [foo/bar]} {:foo/bar 1}] bar)
1
(let [a 1 b a] b)
1
(let [x 1234] (identical? x x))
true
(let [x ^long (inc 5)] x)
6
(let [k '(prn "hello")] `~k)
(prn "hello")
(let [+ 5] (clojure.core/+ 10 +))
15
(let [x′ 1] #{x′ 1})
#{1}
(let [Popo (fn [] (println "a"))] (Popo))
nil
"a\n"
(let [f #()] (= f f))
true
(let [x 1] [x 'y `z])
[1 y user/z]
(macroexpand '(let [#{x} 5]))
(let [#{x} 5])
(let [foo 3 bar 4] foo)
3
(let [[a b] '()] [a b])
[nil nil]
(let [{a :foo} [[:foo :bar]]] a)
nil
(let [{:strs [country]} {"country" "US"}] country)
"US"
(let [a 10] ['f a 'a])
[f 10 a]
(let [{:keys [:foo]} {:foo 12}] foo)
12
(let [x 1] [(list x :seq)])
[(1 :seq)]
(let [+ 3] (::+ + 4))
4
(let [a Double/NaN] (= a a))
true
(let [[a & b] [nil]] a)
nil
(let [foo# 5] `(test ~'foo#))
(clojure.core/test foo#)
(let [[tween [:tween]] [15 [:tween]]] tween)
:tween
(let [nana Double/NaN] (= nana nana))
true
(let [v 2.0] (println (class v)))
nil
"java.lang.Double\n"
(let [supplied 'bar] `(foo `~supplied))
(user/foo user/supplied)
(let [fn <] (fn 1 2))
true
(eval `(let [x# 123] x#))
123
(let [l (range 10)] (type l))
clojure.lang.LongRange
(let [s "hello"] (with-out-str (println s)))
"hello\n"
(let [a 5] #{a 5})
#{5}
(let [a (atom "hello")] [a @a])
[#object [clojure.lang.Atom 0x76ccafd3 {:status :ready, :val "hello"}] "hello"]
(defn abc [s] (let [regex #"s"]))
#'user/abc
(let [^clojure.lang.Counted c [1]] (meta c))
nil
(let [x 10] `(inc ~x))
(clojure.core/inc 10)
(let [{a :foo} {:foo :bar}] a)
:bar
(let [x [:test]] (contains? x :test))
false
(let [foo =] (meta (var foo)))
nil
(let [x ^int (inc 5)] x)
6
(let [x 5] (> x 1))
true
(let [x 1] `(1 ~x))
(1 1)
(let [{a :a} [[:a :A]]] a)
nil
(let [x 1] (defn foo [] x))
#'user/foo
(let [the-ns *ns*] (defn n [] the-ns))
#'user/n