[Haskell-cafe] money type ?