Gauche
6章のリストを写経した.Haskellを前回勉強したおかげで、car cdr foldが出てきても,ぎょっとしなかった.
(define (filter pred lis) (cond [(null? lis) lis] [(pred (car lis)) (cons (car lis) (filter pred (cdr lis)))] [else (filter pred (cdr lis))]))
あってるかは知らん. リンク先だと別方法.
http://karetta.jp/book-node/gauche-hacks/006967