码迷,mamicode.com
首页 > 其他好文 > 详细

list删除和挑选

时间:2014-09-07 23:49:56      阅读:241      评论:0      收藏:0      [点我收藏+]

标签:blog   文件   2014   代码   log   c   ef   file   r   

clean函数用于删除符合条件的list元素,filter函数用于挑选符合条件的list元素

(clean symbol? ‘(1 2 d 4 f g 5 h))   → (1 2 4 5)

(filter symbol? ‘(1 2 d 4 f g 5 h))  → (d f g h)

(define (big? x) (> x 5))        → (lambda (x) (> x 5))

(clean big? ‘(1 10 3 6 4 5 11))  → (1 3 4 5)

(clean <= ‘(3 4 -6 0 2 -3 0))  → (3 4 2)

(clean (curry match ‘(a *)) ‘((a 10) (b 5) (a 3) (c 8) (a 9)))
→  ((b 5) (c 8))

比如下面的代码可以用来将目录下.和..的文件删除掉:

(clean (fn (p) (member p ‘("." ".."))) (directory dir-path))


list删除和挑选

标签:blog   文件   2014   代码   log   c   ef   file   r   

原文地址:http://blog.csdn.net/csfreebird/article/details/39124239

(0)
(0)
   
举报
评论 一句话评论(0
0条  
登录后才能评论!
© 2014 mamicode.com 版权所有 京ICP备13008772号-2
迷上了代码!