/+    sh-utils
!:
|_  [hide ~]
++  peer  ,_`.
++  poke--args
  %+  add-subs  [[our /twit] our /post/(scot %uv eny)]
  %^  gate-mess  .  
    |=([a=span b=cord ~] [/twit %twit-do !>([a %post eny b])])
  ,_`.
++  posh-twit-stat
  (args-into-gate . |=([@ @ a=@da @] tang/~[leaf/"Tweet recieved {<a>}"]))
++  pour  |*([ost=@ * sih=[@ ^]] :_(+>.$ [ost %give +.sih]~))
--