[Haskell-cafe] overloading show function