day 24 part 1

This commit is contained in:
Adam Jeniski 2024-12-26 12:00:26 -05:00
parent 95245a474a
commit adfa38f737

View File

@ -142,6 +142,12 @@
;; conversions ;; conversions
(defn binary->long [binary-str]
(Long/parseLong binary-str 2))
(defn long->binary [value]
(Long/toString value 2))
(def arrow-char->dir {\> :right (def arrow-char->dir {\> :right
\v :down \v :down
\< :left \< :left