shrub/pkg/arvo/imp/ph/second-cousin-hi.hoon
2019-11-09 23:27:07 -08:00

17 lines
456 B
Plaintext

/- spider
/+ *ph-io
=, thread=thread:spider
^- imp:spider
|= [=bowl:spider vase]
=/ m (thread ,vase)
;< ~ bind:m start-simple
;< ~ bind:m (raw-ship ~bud ~)
;< ~ bind:m (raw-ship ~marbud ~)
;< ~ bind:m (raw-ship ~linnup-torsyx ~)
;< ~ bind:m (raw-ship ~dev ~)
;< ~ bind:m (raw-ship ~mardev ~)
;< ~ bind:m (raw-ship ~mitnep-todsut ~)
;< ~ bind:m (send-hi ~linnup-torsyx ~mitnep-todsut)
;< ~ bind:m end-simple
(pure:m *vase)