[Haskell] Dtd2Haskell question