(clojure.walk/macroexpand-all '(->> 0 (->> 1 (->> @2 (->> 3)))))

(0 (1 (clojure.core/deref 2 3)))

(-> [1]
    conj
    (->> (->> 10)))

[1 10]

(macroexpand-1 '(->> . :__ (->> @two (->> args))))

(->> (clojure.core/deref two)
     (->> args)
     (:__ .))

(macroexpand '(->> a b (->> (c d) (->> e))))

(b a
   (->> e
        (c d)))

(->> 1)

1

(clojure.walk/macroexpand-all '(->> . :__ (->> @two (->> args))))

(:__ . (clojure.core/deref two args))

(macroexpand-1 '(->> a b (->> (c d) (->> e))))

(->> (c d)
     (->> e)
     (b a))

(->> 42)

42

(clojure.walk/macroexpand-all '(->> a (->> b c)))

(a (c b))

(macroexpand-1 '(->> amalloy trptcolin (->> amalloy trptcolin)))

(->> amalloy
     trptcolin
     (trptcolin amalloy))

(macroexpand '(->> a b (->> c d)))

(b a (d c))

(->> 1
     inc)

2

((->> :ten
      #()))

:ten

(->> 4
     (conj []))

[4]

(->> 5
     #'+)

#'clojure.core/+

(macroexpand `(->> a
                   b
                   (->> c
                        d)))

(user/b user/a (user/d user/c))

(-> '(->> :a :b (->> :c :d))
    macroexpand-1)

(->> :c
     :d
     (:b :a))

(->> 5
     (#'+))

5

(->> 10
     (- 5))

-5

(->> "17592186045423"
     (apply vector))

[\1 \7 \5 \9 \2 \1 \8 \6 \0 \4 \5 \4 \2 \3]

(->> 1
     (+ 1))

2

(->> 'foo
     (str 'bar))

"barfoo"

(->> 5
     (- 2))

-3

(->> 1
     (- 2))

1

(->> 1
     (/ 1))

1

(->> 1
     (- 3))

2

(->> 1
     (/ 3))

3

(macroexpand-1 '(->> 1))

1

(->> 1
     (/ 2))

2

(-> 2
    (->> println))

nil

"2\n"

(->> 5
     (/ 2))

2/5

(->> 3
     (- 7))

4

(->> 7
     (- 3))

-4

(->> "x"
     (str "a"))

"ax"

(->> 3
     (+ 2))

5

(->> 1
     inc
     dec)

1

(->> 5
     (/ 10))

2

(#'->> nil nil 'a 'b '(->> (c d) (->> e)))

(->> (c d)
     (->> e)
     (b a))

(clojure.walk/macroexpand-all '(->> (->> a #() (-> [b])) #() (-> [a])))

(fn* [a] [] () (fn* [b] [] () a))

(->> (range)
     (some odd?))

true

(->> 5
     (+ 2))

7

(macroexpand (->> :a
                  identity))

:a

(->> 1
     (conj [1]))

[1 1]

(->> 4
     (* 10))

40

(->> 10
     (/ 2))

1/5

(->> 1
     (and 1))

1

(->> (range 6 14)
     (map #(->> %
                (format "%02d")
                (str "2015-04-"))))

("2015-04-06"
 "2015-04-07"
 "2015-04-08"
 "2015-04-09"
 "2015-04-10"
 "2015-04-11"
 "2015-04-12"
 "2015-04-13")

(map macroexpand '[(->> coll map second) (->> coll (map second))])

((second (map coll)) (map second coll))

(->> {}
     (filter second)
     (map first))

()

(macroexpand '(->> map (@keyword)))

((clojure.core/deref keyword) map)