[Haskell-cafe] Coin changing algorithm