自己写一个scheme测试工具
端午在家休息了好几天，基本上就是带孩子和睡觉了。荒废了好几天之后，今天重操旧业。
The Little Scheme看到第99页了。要写一个函数numbered?来判断一个表达式是否是数字表达式。
上代码：

'(#t #t #t #t #t #t #t #t #t #t #t)