■No33641に返信(プログラミング太郎さんの記事) > リストのリストを受け取ったとき、これらを連結して一つのリストにして返す関数concatを記述してください。例えば、次のような結果が返ってくれば良いです。 > >>(concat (list (list 1 2 3) (list 4 5 6) (list 7 8 9))) > (1 2 3 4 5 6 7 8 9) > > リストのリストを受け取る前提ならこれでいけると思います。 (defun concat (a) (if (car a) (append (car a) (concat (cdr a))) nil ) )