(macroexpand '(and a b))

(and a b)

(defrecord MyClass [a b c])

#'user/MyClass

(def a [1 2 3])

#'user/a

(defn my-target [a b c])

#'user/my-target

(defmacro a [] (get &env 'b))

#'user/a

(second '(a (b c)))

(b c)

(keyword "this is a string")

:this

(let [a 1] `(~a))

(1)

(def a (atom {:test true}))

#'user/a

(if-let [a nil]
  1
  2)

2

('a '#{a b c})

a

(when-let [[a b] (seq [])] 42)

nil

('a '{a :foo} :bar)

:foo

(when-let [{a :a} nil] true)

nil

((fn [a & b]) 10)

nil

(defn a [& b] b)

#'user/a

(defn -_- ^String [a] @a)

#'user/-_-

(do (def a 1) #'a)

#'user/a

(meta (def a "doc" 1))

{:doc "doc",
 :file nil,
 :name a,
 :ns #object [sci.impl.vars.SciNamespace 0x37a47b18 "user"]}

(defn == [a b] true)

#'user/==

(print "I have a REPL")

nil

"I have a REPL"

(let [a "bar"] (str "foo????bar???"))

"foo????bar???"

(associative? '(a b c))

false

(quote ^:bar [a b c])

[a b c]

(defn testing [a] (println "hi"))

#'user/testing

(sort (comparator (fn [a b]
                    (if (> (count a) (count b)) nil (not (.compareTo a b)))))
      ["a" "booc" "aood" "b"])

("a" "booc" "aood" "b")

(let [a {:a 1, :b 0, :c 1}]
  (mapv first (filter #(= (apply max (vals a)) (second %)) a)))

[:a :c]

(def a (vec (range 10000000)))

#'user/a

(defrecord Rec [a b c])

#'user/Rec

(defrecord a [x y z])

#'user/a

('#{a b c} 'a)

a

(defrecord nice [a b c])

#'user/nice

(let [a "a"] `(~a))

("a")

(if-some [a false]
  :yes
  :no)

:yes

(re-find #"(a)?123|x" "xyz")

["x" nil]

(let [a (+ 1 1)])

nil

(clojure.set/select identity '(a b))

(a b)

(seq? '(a b c))

true

(let [a 3] (meta ^a {}))

{:tag 3}

(comment
  "i am a comment!")

nil

(get `{a 2} 'clojure.core/a)

nil

(defmacro a [b] ~b ~b)

#'user/a

(case 'b (a b) 1)

1

(macroexpand-1 '(or a b))

(or a b)

(defn foo [a & b])

#'user/foo

(let [[a & b] []] 0)

0

(quote ^{:a :b} a)

a

(seq? '[a b c])

false

(def a (iterate inc 0))

#'user/a

(vec "I am a string")

[\I \space \a \m \space \a \space \s \t \r \i \n \g]