3 ms·
Learn some Prolog, one of the best langauge for studying your algorithms and data structures. https://rosettacode.org/wiki/Tree_traversal#Prolog https://rosetta
by segmondy 7y ago
Learn some Prolog, one of the best langauge for studying your algorithms and data structures.
https://rosettacode.org/wiki/Tree_traversal#Prolog https://rosettacode.org/wiki/Tree_traversal#Prolog
preorder(nil).
preorder([Node, FG, FD]) :- format('~w ', [Node]), preorder(FG), preorder(FD).
inorder(nil).
inorder([Node, FG, FD]) :-inorder(FG), format('~w ', [Node]), inorder(FD).
postorder(nil).
postorder([Node, FG, FD]) :-postorder(FG), postorder(FD),format('~w ', [Node]).