::  LiSt directory subnodes
::
::::  /hoon/ls/gen
  ::
//  /%/subdir
!:
::::
  ::
:-  %say
|=  [^ [arg=path ~] ~]
=+  lon=((hard arch) .^(%cy arg))
tang/[?~(dir.lon leaf/"~" (subdir arg dir.lon))]~