module Model.CreatePayment ( CreatePayment(..) ) where import Data.Text (Text) import Data.Time.Calendar (Day) import Common.Model (CategoryId, Frequency) data CreatePayment = CreatePayment { _createPayment_name :: Text , _createPayment_cost :: Int , _createPayment_date :: Day , _createPayment_category :: CategoryId , _createPayment_frequency :: Frequency } deriving (Show)