y56y7w
Last Updated: February 25, 2016
·
819
· runexec

Clojure - An even shorter alphabet gen

user> (let [_ #(->> (iterate inc %1)
            (map char)
            (take 26))]
     (->> (merge (_ 65) (_ 97))
          flatten
          (partition 13)
          clojure.pprint/pprint))
((\a \b \c \d \e \f \g \h \i \j \k \l \m)
 (\n \o \p \q \r \s \t \u \v \w \x \y \z)
 (\A \B \C \D \E \F \G \H \I \J \K \L \M)
 (\N \O \P \Q \R \S \T \U \V \W \X \Y \Z))
nil