/-  eval=ted-eval
|_  put=inpt:eval
++  grab  |%
          ++  noun  inpt:eval
          --
++  grow  |%
          ++  noun  put
          --
++  grad  %noun
--