Skip to main content
1 de 2

Hallar lista de nodos de un árbol binario en Prolog

Buenas,

Quiero hallar la manera de poder devolver una lista con todos los nodos de un árbol en prolog.

Se define un árbol binario en Prolog de la siguiente manera:

A4 = [[[[[],1,[]],5,[]],
    7,
    [[],3,[[],4,[]]]],
    6,
    [[[],10,[]],
    8,
    [[[],9,[]],11,[[],2,[]]]]]

Cuyo aspecto es el siguiente

[![introducir la descripción de la imagen aquí][1]][1]

Mi duda es, haciendo uso únicamente de los siguientes constructores y selectores

vacio([]).
raiz([_,N,_], N).
hi([HI,_,_],HI).
hd([_,_,HD],HD).
hazarbol(R,HI,HD,[HI,R,HD])

Cómo puedo definir un predicado listadenodos(Abn,L) de manera que por ejemplo:

?- listadenodos(A4,L).
L=[2,9,11,10,8,4,3,1,5,7,6]

No busco una respuesta inmediata si no una explicación de cómo proceder para resolver al ejercicio ya que no sé como podría empezarlo, aunque tengo las nociones básicas de Prolog. [1]: https://i.sstatic.net/Rz6EQ.png