diff options
| author | Joris | 2017-11-08 23:47:26 +0100 |
|---|---|---|
| committer | Joris | 2017-11-08 23:47:26 +0100 |
| commit | 27e11b20b06f2f2dbfb56c0998a63169b4b8abc4 (patch) | |
| tree | 845f54d7fe876c9a3078036975ba85ec21d224a1 /common/src/Common/Model/Frequency.hs | |
| parent | a3601b5e6f5a3e41fa31752a2c704ccd3632790e (diff) | |
| download | budget-27e11b20b06f2f2dbfb56c0998a63169b4b8abc4.tar.gz budget-27e11b20b06f2f2dbfb56c0998a63169b4b8abc4.tar.bz2 budget-27e11b20b06f2f2dbfb56c0998a63169b4b8abc4.zip | |
Use a better project structure
Diffstat (limited to 'common/src/Common/Model/Frequency.hs')
| -rw-r--r-- | common/src/Common/Model/Frequency.hs | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/common/src/Common/Model/Frequency.hs b/common/src/Common/Model/Frequency.hs new file mode 100644 index 0000000..7c46605 --- /dev/null +++ b/common/src/Common/Model/Frequency.hs @@ -0,0 +1,16 @@ +{-# LANGUAGE DeriveGeneric #-} + +module Common.Model.Frequency + ( Frequency(..) + ) where + +import Data.Aeson (FromJSON, ToJSON) +import GHC.Generics (Generic) + +data Frequency = + Punctual + | Monthly + deriving (Eq, Read, Show, Generic) + +instance FromJSON Frequency +instance ToJSON Frequency |