Re: [Haskell-cafe] adjoint of coproduct & diagonal