%
% see if name is on tier1 of tree
%
% stack: tier1-name
%
@@
root\
seek!\?
%
% node is set to first occurrence on tier1 if true
%
% stack: has-tier1
%