tree_to_horizontal_table

one of the documented procedures in this installation of the ACS
Usage:
tree_to_horizontal_table   tree   { print "id" }
What it does:
generates a table display of a given tree
Defined in: /web/philip/tcl/ad-trees.tcl

Source code:


    set result "<table border>\n<tr>\n"
    append result [tree_to_htable $tree [tree_height $tree] 0 $print ""]
    append result "</tr>\n</table>\n"
    return $result


philg@mit.edu