如何在LISP中删除嵌套括号 [英] How to remove nested parentheses in LISP

问题描述

如何在常见的LISP中递归地删除嵌套括号，例如

How can I remove nested parentheses recursively in Common LISP Such as

  (unnest '(a b c (d e) ((f) g))) => (a b c d e f g)
  (unnest '(a b))                 => (a b)
  (unnest '(() ((((a)))) ()))     => (a)

谢谢

推荐答案

这就是我要做的:

(ql:quickload "alexandria")
(alexandria:flatten list)

之所以有效，主要是因为我已经安装了 Quicklisp .

That works mainly because I have Quicklisp installed already.

这篇关于如何在LISP中删除嵌套括号的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！