User
    ident Text
    isAdmin Bool default=False
    UniqueUser ident
    deriving Show Eq
TimeEntry
    user UserId
    category TimeCategoryId
    day Day
    hours Double
    timestamp UTCTime
    deriving Show Eq
TimeCategory
    name Text
    disabled Bool
    UniqueTimeCategory name
    deriving Show Eq

 -- By default this file is used in Model.hs (which is imported by Foundation.hs)