LISP Programming

목차

1. last-item
2. remove-lst
3. remove-2nd
4. remove-last
5. remove-all1
6. subst-1st
7. subst-all
8. append
9. reverse
10. merge

--- Deep Recursion ---

11. count-all - 리스트 내에 pair 가 아닌 항목의 개수
12. remove-all2
13. reverse-all
14. depth
15. flatten

본문내용

3. remove-2nd
(remove-2nd a (b a n a n a)) => (b a n n a)
(remove-2nd a (b (a n) a n a) => (b (a n) a n)
(remove-2nd (1 2) (1 2 (1 2) 3)) => (1 2 (1 2) 3)
4. remove-last
(defun remove-last (x y)
(cond ((null y) nil)
((equal x (first (reverse y))) (reverse (rest (reverse y))))
(t (append (remove-last x (reverse(rest (reverse y))))(list (first (reverse y)))))))

참고 자료

없음