::  LiSt directory subnodes
::
::::
  ::
/+    sh-utils
//  /%%/subdir
!:
::::
  ::
|_  [hid=hide ~]
++  peer  ,_`.
++  poke-ls-args
  %+  args-into-gate  .
  |=  [arg=path ~]
  =+  lon=((hard arch) .^(%cy arg))
  tang/[?~(r.lon leaf/"~" (subdir arg r.lon))]~
--