(let [{:strs [a/b]} {"a/b" 12}] b)
12
(let [[a] [Double/NaN]] (= a a))
true
(macroexpand '(let [a :a] a))
(let [a :a] a)
(let [{[a] :k} {:k [5]}] a)
5
(let [x Double/NaN] (= x x))
true
(let [range (range 10)] (print range))
nil
"(0 1 2 3 4 5 6 7 8 9)"
(let [{x :foo} #{:foo}] x)
:foo
(let [foo "bar"] (= '~foo foo))
false
(let [& 3] (+ & 1))
4
(let [headers {"Content-type" "text/html"}] (headers "Content-Type"))
nil
(let [x (range 11)] (doall x))
(0 1 2 3 4 5 6 7 8 9 10)
(let [{:keys [a]} {:a 1}] a)
1
(let [{:keys [x]} {:x 1}] x)
1
(let [[[[a]]] [[[42 43 44]]]] a)
42
(let [a 1 a 2] a)
2
(let [{:as orig} (range 20)] orig)
{0 1, 2 3, 4 5, 6 7, 8 9, 10 11, 12 13, 14 15, 16 17, 18 19}
(let [{:strs [a]} {"a" 1}] a)
1
(let [a 1] ((fn [] (inc a))))
2
(let [{:syms [a/b]} {'a/b 12}] b)
12
(let [a 1] `(a ~a))
(user/a 1)
(let [x [1]] (identical? x x))
true
(let [/ *] (/ 2 3))
6
(let [ 10] (+ 2))
12
(let [s 'x] `(do '~s))
(do (quote x))
(let [do 1] (println do) do)
1
"1\n"
(let [f (fn [])] (= f f))
true
(let [a #()] (= a a))
true
(let [{val :k} {:k "tee"}] [val])
["tee"]
(let [ns *ns*] (defn f [] ns))
#'user/f
(let [a 1] `(inc ~a))
(clojure.core/inc 1)
(let [x 7 y 3] y)
3
(let [n (+ 1 2)] n)
3
(let [foo (fn [] (resolve 'bar))] (foo))
nil
(macroexpand-1 (quote (let [x 1] x)))
(let [x 1] x)
(let [a #"."] (= a a))
true
(class #(let [a 1] a))
sci.impl.fns$fun$arity_0__26683
(let [x :k1] (= :k1 x))
true
(let [f (resolve 'print)] (f "hello"))
nil
"hello"
(let [+ -] (+ 2 2))
0
(let [a 1] '(inc a))
(inc a)
(let [{:keys [foo]} '(foo [] {})] foo)
nil
(let [id 1] '(a id))
(a id)
(let [a "123"] (pr (.isEmpty a)))
nil
"false"
(let [∞ Double/POSITIVE_INFINITY] (+ ∞ ∞))
##Inf
(def *foo* (let [foo :foo] foo))
#'user/*foo*
(macroexpand-1 `(let [x 5] x))
(clojure.core/let [user/x 5] user/x)
(let [{the-value :foo/bar} {:foo/bar 123}] the-value)
123
(let [foo (fn [] ())] (macroexpand-1 '('foo)))
((quote foo))
(let [things [:c :d]] `(~@things))
(:c :d)
(let [+ -] (+ 1 1))
0