Prologで二分木を走査してみた

たまたま OKWave を開いたら、Javaで二分木を走査する課題の丸投げを見かけたので、ちょっとPrologでやってみました。

実行結果：

% library(win_menu) compiled into win_menu 0.00 sec, 29 clauses

1: 前順走査
2: 間順走査
3: 後順走査
other or Ctrl+D: 終了
=> 1
preorder_traversal: a
preorder_traversal: b
preorder_traversal: c
preorder_traversal: d
preorder_traversal: e
preorder_traversal: f
preorder_traversal: g

1: 前順走査
2: 間順走査
3: 後順走査
other or Ctrl+D: 終了
=> |: 2
inorder_traversal: c
inorder_traversal: b
inorder_traversal: d
inorder_traversal: e
inorder_traversal: a
inorder_traversal: g
inorder_traversal: f

1: 前順走査
2: 間順走査
3: 後順走査
other or Ctrl+D: 終了
=> |: 3
postorder_traversal: c
postorder_traversal: e
postorder_traversal: d
postorder_traversal: b
postorder_traversal: g
postorder_traversal: f
postorder_traversal: a

1: 前順走査
2: 間順走査
3: 後順走査
other or Ctrl+D: 終了
=> |: 

上のPrologのプログラムのライセンスは次の通り。

To the extent possible under law, あさくら・ふにょしhas waived all copyright and related or neighboring rights to bintree.pro. This work is published from: 日本.

簡単なコード片で著作権を持ったままにしてたら、キリがない感じがするので。