PARENT
for (node = PARENT(ntrks - 1); node --> 0;)
for (ancest = PARENT(ntrks); ancest > 0; ancest = PARENT(ancest))