(let [!$&* 5] (inc !$&*))
6
(vec (map inc (range 5)))
[1 2 3 4 5]
(realized? (rest (iterate inc 0)))
false
(vec (map inc [1 2]))
[2 3]
(take 1 (iterate inc 2))
(2)
(nth (iterate inc 0) 9)
9
(update-in {} [:a] (fnil inc 0))
{:a 1}
(update-in {0 1} [0] inc)
{0 2}
(nth (iterate inc 0) 4)
4
((fn [ß] (inc ß)) 1)
2
(map inc #{1 2})
(2 3)
(-> 25 (+ 1) inc)
27
(def integers (iterate inc 0))
#'user/integers
(take 20 (iterate inc 1))
(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20)
(def check-carma (comp inc dec))
#'user/check-carma
(print "&(inc lazybot)")
nil
"&(inc lazybot)"
(println "(inc chouser)")
nil
"(inc chouser)\n"
(update-in {} [:foo] (fnil inc 0))
{:foo 1}
(def my-seq (iterate inc 0))
#'user/my-seq
(take 5 (iterate inc 10))
(10 11 12 13 14)
(take 1000 (iterate inc 0))
(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 1...
((fn [_] (inc _)) 10)
11
(as-> 1 x (inc x))
2
(update-in {} [:value] (fnil inc 0))
{:value 1}
((comp (partial bit-and 3) inc) 7)
0
((apply comp (repeat 10 inc)) 2)
12
(update-in nil [:key] (fnil inc 0))
{:key 1}
(meta ^{:x 1} (map inc []))
nil
(defn incs [i] (iterate inc i))
#'user/incs
(chunked-seq? (map inc (vec (range 100))))
false
(map (comp char inc int) "hi123")
(\i \j \2 \3 \4)
(set (map inc (into [] (range 100))))
#{1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100}
(-> 10 range (->> (map inc)))
(1 2 3 4 5 6 7 8 9 10)
((apply comp (repeat 5 inc)) 1)
6
(map (juxt inc dec) [1 2])
([2 0] [3 1])
(map deliver [inc dec] [0 1])
(1 0)
(update-in [1 2 3] [1] inc)
[1 3 3]
(map (juxt identity inc) (range 5))
([0 1] [1 2] [2 3] [3 4] [4 5])
(defn ^:static foo [x] (inc x))
#'user/foo
(map inc (sorted-set 1 2 3))
(2 3 4)
(map #(% 0) [inc dec])
(1 -1)
(let [foo# 10] `(inc ~foo#))
(clojure.core/inc 10)
(map (juxt inc dec) (range 10))
([1 -1] [2 0] [3 1] [4 2] [5 3] [6 4] [7 5] [8 6] [9 7] [10 8])
(defn f2 [x] (iterate inc x))
#'user/f2
(list? (map inc [1 2 3]))
false
(update-in [0 0 0] [1] inc)
[0 1 0]
((comp (partial bit-and 3) inc) -3)
2
(take 5 (lazy-seq (iterate inc 1)))
(1 2 3 4 5)
(println (str "##" '(inc AtKaaZ)))
nil
"##(inc AtKaaZ)\n"
(let [x ^long (inc 5)] x)
6