[Haskell-cafe] Pattern matching on numbers?