Finished round 2 of puzzle-8
This commit is contained in:
@@ -27,6 +27,8 @@
|
||||
while line
|
||||
collect line)))
|
||||
|
||||
(defun id (x) x)
|
||||
|
||||
(defun all (pred lst)
|
||||
(if (not (cdr lst))
|
||||
(funcall pred (car lst))
|
||||
|
||||
Reference in New Issue
Block a user