[Haskell-cafe] Predicates in data types