fmt
This commit is contained in:
parent
6c8340752c
commit
242088b896
1 changed files with 1 additions and 1 deletions
2
04a.lisp
2
04a.lisp
|
|
@ -43,7 +43,7 @@
|
|||
(sum-kernel (make-kernel (read-diagram (uiop:read-file-lines "04example.txt")) 2 0))
|
||||
|
||||
(defun sum-diagram (lines)
|
||||
(let ( (dim (length lines))
|
||||
(let ((dim (length lines))
|
||||
(diagram (read-diagram lines)))
|
||||
(loop for y from 0 to dim
|
||||
sum (loop for x from 0 to dim
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue