%
% stack: value-name
%
% create the global tree url for the accepted node/value
%
*trglobas
dup tuck
^
quoter &; ^_builder !builder
%
% mark for value content analysis
%
"Selected" _\ Tree.!Mark
+:counter
_@
_\
@@
rot
"glob " log)(
root\
"\" Str.RevLeft
"tpref" *findvalu
{
 "Selected" _\ Tree.!Mark
} if

!\
!@