(layer-array (cadr layers))

car 取出表中第一个元素，cdr取出除了第一个元素的其他元素形成新的表；它们嵌套的话从内向外理解，就对了；这里的神奇之处在于可以合写，就像上面所说
(cadr '(1 2 3))等价于(car (cdr '(1 2 3)))
(caar '((1 2) (3 4)))等价于(car (car '((1 2) (3 4))))
依此类推，还有cdar cddr cdddr 等等。
希望可以帮到楼主！

在lisp里，我想实现对CAD窗口里特定的图形（比如矩形）选择，但是如果不小心选择了比如圆， 要实现 出现提示，说选择错误，应该怎么做，不同类型的图形应该是有区别的吧？【大神请帮忙，急急急，谢了】

简写，相当于(car(cdr(…)))