Chinaunix首页 | 论坛 | 博客
  • 博客访问: 31195
  • 博文数量: 8
  • 博客积分: 165
  • 博客等级: 入伍新兵
  • 技术积分: 100
  • 用 户 组: 普通用户
  • 注册时间: 2010-11-17 05:05
文章分类

全部博文(8)

文章存档

2013年(2)

2012年(6)

我的朋友

分类: LINUX

2012-10-07 00:02:58

一个生成连续自然数列表的函数,很简单... 

点击(此处)折叠或打开

  1. (define (f x y l)
  2.   (cond
  3.     ((> x y) l)
  4.     (else (f (+ x 1) y (cons x l)))))

  5. (f 1 10 (quote ()))


阅读(686) | 评论(0) | 转发(0) |
0

上一篇:没有了

下一篇:Scheme 初学(2)

给主人留下些什么吧!~~