User ident Text balance Int timestamp Int email Text Maybe notify Bool default=False UniqueUser ident deriving Typeable Show Beverage ident Text price Int amount Int alertAmount Int UniqueBeverage ident deriving Typeable Show Transaction description Text amount Int time UTCTime deriving Typeable Show Cashier balance Int created UTCTime default=now() deriving Typeable Show -- By default this file is used in Model.hs (which is imported by Foundation.hs)