line-mode
read-nums
sort #(list)
    negate
    33
    %
b3
sort #(list,block)
unwords