[Haskell-cafe] Promoted data types