Lisp---数列反转
2016-01-01 10:59
183 查看
原理待补充:
> (define a (list 1 2 3 4)) > a (1 2 3 4) > (define (reverse items) (define (cons-rev items ans) (if (equal? items '( )) ans (cons-rev (cdr items) (append (list (car items)) ans)))) (cons-rev items '( ))) > (reverse a) (4 3 2 1) >
相关文章推荐
- Hadoop 历史服务器与日志详解
- 微信公众平台预研小结
- 写给自己的博客
- activti表结构
- Happy new year, 2016
- Hadoop-2.5.0-cdh5.3.2 启动过程详解
- 某后台服务器时序图
- Hadoop 2.0 NameNode HA 和 Federation 实践
- 读书笔记--python数据可视化--001_matplotlib学习
- 导致MyEclipse内存不足的原因分析及解决办法
- socket之回射c/s模型(二)
- 谈加班和生活
- 常用正则表达式大全
- 沁园春 年会
- poj1459 Power Network --- 最大流 EK/dinic
- [译]忘记Angular和Ember吧,React早已在前端大战中胜出
- CentOS6.x 用Putty使用密钥验证方式远程登录
- 简单的string占位符替换
- 关于配置cordova的一些细节
- *#*#4636#*#*