::  +gall-nonces: print %gall agent subscription nonces, highest-last
::
:-  %say
|=  [[now=@da eny=@uvJ bec=beak] ~ ~]
:-  %noun
^-  (list [dude:gall @ud])
%+  sort
  %~  tap  by
  ~&  bec
  .^((map dude:gall @ud) %gf /(scot %p p.bec)//(scot %da now))
|=([[* a=@ud] [* b=@ud]] (lth a b))