@verb #2111:"allkids" this none this rxdo #7446
@program #2111:"allkids" this none this
LIST = {}
xx = toobj(args[1])
if (valid(xx))
  LIST = setadd(LIST, xx)
  if (length(children(xx)))
    for yy in (children(xx))
      LIST = $set_utils:union(LIST, this:allkids(yy))
    endfor
  endif
endif
return LIST
"Last modified by NH (#2369) on Sat Dec 19 11:26:21 1998 MST."
.