aland/aoc-2025
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fmt

Browse source
This commit is contained in:
Alan Daniels 2025-12-10 20:22:30 +11:00
parent 6c8340752c
commit 242088b896
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
04a.lisp
View file

@ -43,7 +43,7 @@
(sum-kernel (make-kernel (read-diagram (uiop:read-file-lines "04example.txt")) 2 0)) (sum-kernel (make-kernel (read-diagram (uiop:read-file-lines "04example.txt")) 2 0))
(defun sum-diagram (lines) (defun sum-diagram (lines)
(let ( (dim (length lines)) (let ((dim (length lines))
(diagram (read-diagram lines))) (diagram (read-diagram lines)))
(loop for y from 0 to dim (loop for y from 0 to dim
sum (loop for x from 0 to dim sum (loop for x from 0 to dim