)
2021/7/22
8
例2.用cond函数来描述下列计算式： x 0≤x＜2
F(x)=
x2 2≤x＜5 x3 5≤x＜7
ex x≥7
程序为：
(initget 7)
(setq x (getreal “Enter x=? (x >= 0)”))
(setq fx (cond ((and (>= x 0) (< x 2)) x)
可以是表。
2021/7/22
5
2.〈测试—表达式〉的值不一定必须为T才算成立，因为从逻辑角度来说任何 非 nil 的 表 达 式 都 与 T 等 效 ， 只 要 其 值 为 非 nil 即 可 ， 例 如 〈 测 试 — 表 达 式 〉 为 1.2.“text”，(List 1 2 3),(setq a 3.0) (+ 13 8),(print “a”),a（已赋值）等，其值虽非T， 但为非nil，固测试均成立。并进行〈则—表达式〉。只有〈测试—表达式〉的值 为nil，如/(),(and (< 4 1) (> 3 2))测试不成功，则进行〈否则—表达式〉。
执行该函数时对表达式依次求值，只要有一个表达式的值为非nil则返回T。
只有2全021部/7/2表2 达式的值为nil，才返回nil，例如：
3
(or 1 2 3 nil)
返回值T
(or (< 5 3) (= 2 1) (/= 2 2) (> 3 5)
返回值nil
(or a b c d)
返回值nil
；(a b c d均未赋值)
((and (>= x 2) (< x 5)) (* x x))
((and (>= x 5) (< x 7)) (expt x 3))
