이충민
가입: 2008년 9월 20일 올린 글: 76
|
올려짐: 2008년9월25일 10:28 주제: filter (괄호 수정) |
|
|
코드: | (define (filter f l)
(cond ((null? l) '())
((not (list? l)) (error "filter: 2nd arg: must be list type"))
((f (car l)) (cons (car l) (filter f (cdr l))))
(else (filter f (cdr l))))) |
|
|