Posted on 2006-08-16 09:03
chenger 阅读(176)
评论(0) 编辑 收藏 引用 所属分类:
Programming Stuff
被GRE作文弄得快要心理变态，严重的不自信。特此用Haskell写一个小程序，主题还是永恒的求素数
module Prime where
prime' [] = []
prime' (x:xs) =
x:(prime' (filter (\y -> (mod y x)/=0) xs))
prime n =
prime' [2.. n]
呵呵，相当的简洁明了，有点
functional的味道了。说起来这个程序是颇能体现“筛法”的，毕竟
filter就是一个筛子。搞了半天，好像都在自夸，不知道有没有更好的写法。