Skip to content

Instantly share code, notes, and snippets.

@thomas-shares

thomas-shares/gist:048fdb2eabac62844074

Last active August 29, 2015 14:24
Show Gist options
  • Save thomas-shares/048fdb2eabac62844074 to your computer and use it in GitHub Desktop.
Save thomas-shares/048fdb2eabac62844074 to your computer and use it in GitHub Desktop.
Download ZIP
How many ways are there to say "morning" in Clojure?
Raw
gistfile1.clj
(->> ((->> [0 2 5 1 -4 1 -6] (map #(partial + %)) (apply juxt)) 109) byte-array (String.))`
morning
(loop [txt ""] (if (= 1803412773 (hash txt)) txt (recur (apply str (repeatedly 7 (fn [] (char (rand-nth [114 105 110 111 109 103]))))))))
(->> "bW9ybmluZw=="
.getBytes
(.decode (java.util.Base64/getDecoder))
(new String))
(apply str (map (fn* [p1__779#] (char (Integer/parseInt (apply str p1__779#) 2))) (partition 8 "01101101011011110111001001101110011010010110111001100111")))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment