(def a (seque []))

#'user/a

(quote (b a))

(b a)

(quote [a 1])

[a 1]

(def a :a)

#'user/a

(def a "abc")

#'user/a

(type (quote a))

clojure.lang.Symbol

(def a "test")

#'user/a

('[a] 0)

a

(meta '^:hey a)

{:hey true}

(def a (sorted-set))

#'user/a

(defrecord X [a])

#'user/X

(seq? '[a])

false

(name (quote a))

"a"

(def a {:a []})

#'user/a

(def a [0])

#'user/a

(def a (promise))

#'user/a

(defrecord Y [a])

#'user/Y

(def a "bar")

#'user/a

(defrecord Unary [a])

#'user/Unary

(declare a b)

#'user/b

(next '(a))

nil

(def a "something")

#'user/a

(def a #'+)

#'user/a

(let* [a 1])

nil

(def A :foo)

#'user/A

(def a "x")

#'user/a

(defmulti a :b)

#'user/a

(def a "aoeu")

#'user/a

(defrecord Foo [a])

#'user/Foo

(defn foo [a])

#'user/foo

(quote [a b])

[a b]

(defrecord x [a])

#'user/x

(meta '^:a a)

{:a true}

(meta '(a))

{:column 8, :line 1}

(def a (clojure.core/fn ([])))

#'user/a

((fn [a] "Putting my post in the wrong place" {:post [(even? a)]} a) 1)

1

(let [a {:x 1}
      b (assoc a :x -10)]
  (println a)
  (println b))

nil

"{:x 1}\n{:x -10}\n"

(let [a {:a 1, :b 2} b (with-meta a {:blah true})] (= a b))

true

(let [a (atom nil)]
  (reset! a (fn [] (reset! a 10)))
  (@a)
  @a)

10

(->> (map (fn [a b] [a (identical? a b)]) (range) (range))
     (remove second)
     (ffirst))

128

((fn [{a :a, :keys [b], :or {b (inc a)}}] [a b]) {:a 5})

[5 6]

(reduce (fn [a b] (prn a b) (+ a b)) [1 2 3 4])

10

"1 2\n3 3\n6 4\n"

(let [a [1 2 3 4 5 7]] (map + a (cons 0 a)))

(1 3 5 7 9 12)

(let [a (sort-by val {:a 1, :b 9, :d 0})]
  (pr a)
  (into {} a))

{:a 1, :b 9, :d 0}

"([:d 0] [:a 1] [:b 9])"

(loop [a '(nil nil 1 2 3)] (or (first a) (recur (next a))))

1

(def a "b")

#'user/a

(def a nil)

#'user/a

(def A "someothervalue")

#'user/A

(defn a [] 1)

#'user/a

(def a 10)

#'user/a