From de4c5bbd5351bff29a2197233d2f0e2f3b1681e1 Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Wed, 30 Oct 2024 15:16:54 +0000 Subject: Fixup some stuff --- 2022/puzzle-8.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '2022') diff --git a/2022/puzzle-8.lisp b/2022/puzzle-8.lisp index 54aca27..3ba8831 100644 --- a/2022/puzzle-8.lisp +++ b/2022/puzzle-8.lisp @@ -33,7 +33,7 @@ (col (get-column x)) (col-top (subseq col 0 y)) (col-bottom (subseq col (+ y 1)))) - (some #'id + (some #'identity (mapcar (lambda (x) (every lt-tree? x)) (list row-left row-right col-top col-bottom)))))) -- cgit v1.2.3-13-gbd6f