Есть список (3 4 1). Никаких подсписков в списке быть не может.
И вот из этого надо получить: ( (3) (4) (1) )

Как такое сделать?

Пробовал так (но что-то не совсем то):

(defun Yo (L)
(COND
((NULL L) L)
(T (cons (Car L) (list(Yo (Cdr L)))))
)
)

Подскажите, пожалуйста.

VH, спасибо.