我已经写了一个程序,可以获取列表并将其转换为树。
build_tree([X,Y],'Tree'(X,Y)) :- !.
build_tree([X|Y],'Tree'(X,Z)) :- build_tree(Y, Z).如果我想颠倒这个过程,把树改回列表,我该怎么做呢?
发布于 2012-03-27 18:40:34
请注意,树->列表转换不是一个函数,因为树可能对应于多个列表:
?- build_tree([1, 2, 3], T).
T = 'Tree'(1, 'Tree'(2, 3)).
?- build_tree([1, 'Tree'(2, 3)], T).
T = 'Tree'(1, 'Tree'(2, 3)).如果您想要一个可以从树生成所有列表的谓词,请从build_tree中删除cut,并使用变量first参数应用它。如果需要确定性转换,请编写一个新的谓词tree_to_list。
https://stackoverflow.com/questions/9887704
复制相似问题