(let [i 0] [(inc i) (inc i) (inc i) (inc i)])
[1 1 1 1]
((juxt inc dec inc) 1)
[2 0 2]
((apply comp [inc inc]) 5)
7
(-> 1 ((apply comp [inc inc inc])) vector)
[4]
(do (inc 1) (inc 2))
3
(macroexpand (-> 1 inc inc))
3
(def foo (comp inc inc))
#'user/foo
(-> 5 inc inc dec)
6
(let [[x y z] (map inc [1 2 3])] [(-> x inc inc) (-> y inc inc) (-> z inc inc)])
[4 5 6]
((let [inc 5] (fn [] inc)))
5
(clojure.core/-> (clojure.core/-> 1 inc) inc)
3
(reduce #(%2 %1) 1 [inc inc inc])
4
(= (map inc [1 2 3 4]) [(inc 1) (inc 2) (inc 3) (inc 4)])
true
(macroexpand-1 '(pl inc $ inc $ inc 0))
(pl inc $ inc $ inc 0)
(reductions #(%2 %1) 10 [inc inc inc dec])
(10 11 12 13 12)
(macroexpand `(pl inc $ inc $ inc $ 0))
(user/pl clojure.core/inc user/$ clojure.core/inc user/$ clojure.core/inc user/$ 0)
(macroexpand-1 '(-> 1 inc inc))
(inc (inc 1))
(-> 12 inc inc dec (cond-> false (* 23)) inc)
14
(-> 1 (inc) (inc) (* 2))
6
((apply comp [inc inc dec]) 5)
6
(-> 1 inc (doto println) inc)
3
"2\n"
(let [inc (fnil inc 0)])
nil
(try (inc 1) (inc 2))
3
(let [inc dec] (inc 10))
9
(def dinc (comp inc inc))
#'user/dinc
(defn foo [a] (-> inc inc))
#'user/foo
(def inc (fn [x] (inc x)))
#'user/inc
(-> 1 inc (doto prn) inc)
3
"2\n"
(#(-> % inc inc) 2)
4
(inc 4)
5
(inc 38)
39
(inc 2)
3
(inc 12345678901234567890123)
12345678901234567890124N
(inc +0)
1
(macroexpand '(pl inc $ inc $ inc $ 0))
(pl inc $ inc $ inc $ 0)
(inc 54)
55
(println inc)
nil
"#object[clojure.core$inc 0x4e7bae5c clojure.core$inc@4e7bae5c]\n"
(inc 5)
6
(inc 1)
2
(inc 3)
4
(inc 0)
1
(inc 10)
11
(inc -0)
1
(fn? inc)
true
(cond-> 2 number? inc even? inc)
4
(map (comp inc inc) (range 3))
(2 3 4)
(inc Integer/MAX_VALUE)
2147483648
(inc 41)
42
(inc -1)
0
(inc 31336)
31337