[Haskell-cafe] How to hold common data