Вопрос по Lisp

[HGK]

Надо сделать функцию, которая определяет факт, является ли структура данных списком. Вот мой код:

(defun proverka (L)
  (if (and
(atom (car L))
(atom (cdr L))
      )
   T
   nil
  )
)

Он работает только для списка с одним элементов. А надо что бы работал для любого кол-ва. В чем ошибка?

[Utkin]

Какая-то мутная задача. Насколько я помню (хотя могу и ошибаться) в Лиспе все является списком. Иное дело, что есть списки правильные и не правильные...

[Stilet]

А разве сама atom уже не дает понять что перед ней не список?

Предикат АТОМ проверяет, является ли
аргумент атомом
При работе с выражениями необходимо иметь возмож-
ность проверить, является ли выражение атомом или
списком. Это может потребоваться, например, перед
применением функций CAR и CDR, так как эти функции
определены лишь для аргументов, являющихся списка-
ми. Базовый предикат АТОМ используется для иденти-
фицирования лисповских объектов, являю-
щихся атомами: