Tree structure and Its navigation procedures

1998.11.18

Tree ÇüÅÂÀÇ ÀڷᱸÁ¶¸¦ Navigation Çϸ鼭 InstanceÀÇ °ª°ú °èÃþ°ªÀ» Ãâ·ÂÇÏ´Â ¾Ë°í¸®µë, Recursive ÇÏ°Ô FunctionÀ» ºÎ¸£¸ç, Leaf ¸¸ Navigation ÇÒ °æ¿ì¿¡´Â IsLeafÀ̶ó´Â ÇÔ¼ö·Î Leaf ÀÎÁö¸¦ Check ÇÑ´Ù.

ÀڷᱸÁ¶

parent : NODE
child : NODE
 tree(parent, child)

Operation :

BOOLIAN IsLeaf(node)
{
IF tree(node, X) is not exist THEN
    return true
ELS
   return faluse
}

VOID FullNavi(node, level : NUMBER)
{
  FOR tree(node, X) {
           FullNavi(X, level + 1)
          }
 }

VOID LeafNavi(node, level : NUMBER)
{
 FOR tree(node,X) {
           IsLeaf(node)
          FullNavi(X, level+1)
          }
}