!:
|_  [hid=hide ~]
++  poke-into-args
  |=  [ost=bone you=ship pax=path dat=@ ~]
  :_  +>.$
  :*  [ost %pass /cp %c %info our.hid (foal pax dat)]
      [ost %give %nice ~]
      %+  turn  (~(tap by sup.hid))
      |=  [ost=bone *]
      :^  ost  %give  %rush
      :-  %tang  :_  ~
      leaf/"written"
  ==
++  peer
  |=
    *
  `+>
--