module Common.Model.CreateIncome ( CreateIncome(..) ) where import Data.Aeson (FromJSON) import Data.Time.Calendar (Day) import GHC.Generics (Generic) data CreateIncome = CreateIncome { _createIncome_date :: Day , _createIncome_amount :: Int } deriving (Show, Generic) instance FromJSON CreateIncome