[Haskell-cafe] adjunction of product and exponentiation