[Haskell-cafe] Near Semi Ring problem