[Haskell-cafe] generic sum for an UArr