]> git.rkrishnan.org Git - sicp.git/blob - src/sicp/ch2_3.clj
projects / sicp.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
text examples until 2.3.2
[sicp.git] / src / sicp / ch2_3.clj
1 (ns sicp.ch2_3)
2
3 (defn memq [item x]
4   (cond
5     (empty? x) false
6     (= (first x) item) x
7     :else (memq item (rest x))))
Unnamed repository; edit this file 'description' to name the repository.