[Haskell-cafe] Type-level numbers problem