计划中的连接

Question

我有以下代码:

(define rest '(((di (a) (b c)) (sh (b) (e d))) ((al (a) (b)))))
(define first '((di (a) (5)) (sh (b) (3))))

我想得到以下列表:

(((di (a) (5)) (sh (b) (3))) ((di (a) (b c)) (sh (b) (e d))) ((al (a) (b)))))

意思是,添加列表first,成为休息的第一个元素.

当我这样做时append,它给了我:

((di (a) (5)) (sh (b) (3)) ((di (a) (b c)) (sh (b) (e d))) ((al (a) (b))))

而我尝试做的任何其他库函数或函数都没有帮助.

谢谢.

Answer 1

Append取两个列表并将它们放在一起.鉴于你有a first和a rest,你可能想要cons.Cons获取一个元素并将其添加到列表中.在这种情况下,元素是first,列表是rest.所以你想要类似的东西

(cons first rest)