diff options
| -rw-r--r-- | 2022/puzzle-8.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/2022/puzzle-8.lisp b/2022/puzzle-8.lisp new file mode 100644 index 0000000..426ae13 --- /dev/null +++ b/2022/puzzle-8.lisp @@ -0,0 +1,7 @@ +(load "lib") +(defparameter input (uiop:read-file-string "8-input")) +(defparameter lines (get-lines input)) +;; Just converts every line into a sequence of integral digits +(defparameter trees + (mapcar (lambda (line) (mapcar (lambda (char) (parse-integer (string char))) (string-to-clist line))) + lines)) |