diff options
Diffstat (limited to '2022/puzzle-3.lisp')
| -rw-r--r-- | 2022/puzzle-3.lisp | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/2022/puzzle-3.lisp b/2022/puzzle-3.lisp index e2e17cc..56a31b6 100644 --- a/2022/puzzle-3.lisp +++ b/2022/puzzle-3.lisp @@ -1,3 +1,4 @@ +(load "lib.lisp") (defvar input (uiop:read-file-string "3-input")) (defun split-string-in-two (s) @@ -10,9 +11,6 @@ until (null line) collect (split-string-in-two line)))) -(defun string-to-clist (str) - (loop for char across str collect char)) - (defun common-types (s1 s2) (car (intersection (string-to-clist s1) |