Decimal & Ratio (Was: Block-I/O in Haskell)