giving up for rest of AoC 2022

This commit is contained in:
efim 2022-12-31 15:33:45 +00:00
parent f2c18830c2
commit 61abf66381
2 changed files with 24 additions and 1 deletions

View File

@ -204,3 +204,26 @@
(apply #'calc-password (walk-path "day22-path.txt" "day22-map.txt")) (apply #'calc-password (walk-path "day22-path.txt" "day22-map.txt"))
;; 11464 ;; 11464
;; and one gold star. ;; and one gold star.
;;; and PART 2.
;; then neighbors is different
;; especially the wrap thing.
;; how'd i calc that? for the map? ugh
;; so, it's 6 parts. huh. ugh
;; oh, they're oblong, but they are all 4 by 4
;; XX
;; X
;; XX
;; X
;; outline of my input
;; how do i get freaking folding?
;; ugh.
;; maybe go for the next? um.
;; yeah. i'm giving up for now. let's go to rest for the new years. 19:33 of Dec 31st
;; fare well Common Lisp, I'll return to use in Q2 or Q3

View File

@ -28,7 +28,7 @@
do (let ((line (make-array (array-dimension arr 1) do (let ((line (make-array (array-dimension arr 1)
:displaced-to arr :displaced-to arr
:displaced-index-offset (* row (array-dimension arr 1))))) :displaced-index-offset (* row (array-dimension arr 1)))))
;; (format t "~a~%" (coerce line 'string)) (format t "~a~%" (coerce line 'string))
))) )))
(defconstant *movements* (defconstant *movements*