/-  spider
/+  threadio
=,  thread=thread:spider
^-  imp:spider
|=  bowl:mall
=/  m  (thread ,~)
^-  form:m
~&  >  %first-starting
;<  ~  bind:m  echo:threadio
(pure:m ~)