这个很奇怪的现像，两个值明明相等，但是用=或equal函数比较的时就是不相等

clh521

这个很奇怪的现像，两个值明明相等，但是用=或equal函数比较的时就是不相等，得到的是nil,看如下：
命令: (cdr(assoc '42 denlst))
1974.0
命令: (max (car lst) (cadr lst))
1974.0

然后用=或equa函数比较是否相等：得到结果是nil
命令: (= (cdr(assoc '42 denlst)) (max (car lst) (cadr lst)))
nil
命令: (equal (cdr(assoc '42 denlst)) (max (car lst) (cadr lst)))
nill


上面显示的两个表达式的值都是1974.0，为什么比较的时候就是不相等呢？不懂

clh521

只有将两个值转为字符串时再比较，才会有正确的结果
命令: (= (rtos (cdr(assoc '42 denlst))) (rtos(max (car lst) (cadr lst))))
T

命令: (equal (rtos (cdr(assoc '42 denlst))) (rtos(max (car lst) (cadr lst))))
T

wzg356

看到的与实际不一致
(setq b(car (list 1974.0000001 2.0)))===1974.0
(setq a(cadr(assoc 3.0 (list(list 3.0 1974.0000002)))))====1974.0
(= b a)==nil

Andyhon

(equal expr1 expr2 [fuzz])
(equal (cdr (assoc '42 denlst)) (max (car lst) (cadr lst)) 1e-9)   ; 1e-5 ...

Bao_lai

先type一下楼上试试，

baitang36

浮点数总是有误差的，不可能相等。变成整数或字符串再比较才行。也可以相减，差值小于某个值就认为是相等