zenon/sicp
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add Exercise 2.23

Browse Source
This commit is contained in:
Tobias Eidelpes 2022-11-08 17:19:24 +01:00
parent d7215f85ca
commit 2e5b4cee2d
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
chapter2.lisp
View File

@ -141,3 +141,7 @@ and upper bound."
(defun square-list-mapcar (items) (defun square-list-mapcar (items)
(mapcar #'(lambda (x) (* x x)) items)) (mapcar #'(lambda (x) (* x x)) items))
;; Exercise 2.23
(defun for-each (func thing)
(mapcar func thing))