* (find `wang `((wang 22)(li 26)) ) NIL * (find `li `(li ss )) LI *
find为查找,可以在后面加上:key后跟函数,这函数将对要查找的对象进一步操作后查找
* (find `wang `((wang 22)(li 26)) :key #'car)
(WANG 22)
* (find `wang `((wang 22)(li 26)) ) NIL * (find `li `(li ss )) LI *
find为查找,可以在后面加上:key后跟函数,这函数将对要查找的对象进一步操作后查找
* (find `wang `((wang 22)(li 26)) :key #'car)
(WANG 22)