| class TEST_UGRAPH |
|---|
| TEST |
| compare_to_standard(msg: STR, g: $UGRAPH{STR}) |
|---|
| **** | Test a graph assuming that it is of the form below
______0___1_____7 _______\/\_\ _______2__3_4 _______|/_/ _______5 _______| _______6 |
| main |
|---|
| node_test(s: STR): BOOL |
|---|
| print_graph(msg: STR,g: $UGRAPH{STR}) |
|---|
| verify_tsort_result(l: FLIST{STR}) |
|---|
| **** | Check whether the result of the tsort are ok The actual order will vary depending on the order in which children are stored. |