Function 定义一个XLISP函数rev rest，该函数反转列表中除第一个元素以外的所有元素

定义一个xlisp函数rev rest，它反转列表中除第一个元素以外的所有元素。也就是说，（revrest'（abcde））应该返回（aedcb）

我之所以能够编写这段代码，是因为我根本不知道该用什么来让最后四个倒转

(defun rev-rest '(a b c d e))
(write (rev-rest ))

---

在Common Lisp中，该函数如下所示：

(defun rev-rest (lst)
  (if (null lst) lst
    (cons (car lst)
          (reverse (cdr lst)))))

具有一个参数（名为lst）的函数。如果lst是空列表，则返回它。Else函数从lst（）的第一个元素和lst（）的其余元素创建新列表（），这些元素被反转（希望您可以使用内置的）。
那么你这样称呼它：

(rev-rest '(a b c d e))

XLISP包含所有这些函数，因此它应该是相同的