[Haskell-cafe] How to implement Read instance for user defined type