全民Scheme(0):lat的定义

接下来我会写一写Scheme的学习笔记。嗯,Scheme是属于小众的语言,但合适用来教学的。

什么是lat,就是遍历list里的每个S-expression,如果发现其中某个不是atom的,则返回false,否则返回true。

(define atom? (lambda (x) (and (not (pair? x)) (not (null? x)))))(define lat? (lambda (l) (cond ((null? l) #t) ((atom? (car l)) (lat? (cdr l))) (else #f))))(lat? ‘())(lat? ‘(jack sprat could eat no chicken fat))(lat? ‘((jack) sprat))(lat? ‘(jack (sprat could) eat))

,将会错过更好的风景,保持一份平和,保持一份清醒。

全民Scheme(0):lat的定义

相关文章:

你感兴趣的文章:

标签云: