diff options
Diffstat (limited to 'cmd/Main/Input.hs')
-rw-r--r-- | cmd/Main/Input.hs | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/cmd/Main/Input.hs b/cmd/Main/Input.hs index 63e5942..9c59283 100644 --- a/cmd/Main/Input.hs +++ b/cmd/Main/Input.hs @@ -13,10 +13,11 @@ import GHC.Generics (Generic) import Data.Aeson (FromJSON) import Malodivo.Types.Bill (Bill) - -import Main.DistrictInfo (DistrictInfo) +import Malodivo.Types.District (DistrictInfo) +import Malodivo.Types.Ministry (MinistryInfo) data Input = Input - { bills :: [Bill] - , districts :: [DistrictInfo] + { bills :: [Bill] -- ^ bills requiring funding. + , districts :: [DistrictInfo] -- ^ funds districts can provide. + , ministry :: Maybe [MinistryInfo] -- ^ maximum funds ministries can get. } deriving (Generic, FromJSON) |