diff options
Diffstat (limited to 'src/client/LoggedIn/Model.elm')
-rw-r--r-- | src/client/LoggedIn/Model.elm | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/src/client/LoggedIn/Model.elm b/src/client/LoggedIn/Model.elm new file mode 100644 index 0000000..6bcb0b2 --- /dev/null +++ b/src/client/LoggedIn/Model.elm @@ -0,0 +1,42 @@ +module LoggedIn.Model exposing + ( Model + , init + ) + +import Time exposing (Time) + +import Model.Init exposing (..) +import Model.Payment exposing (Payments) +import Model.User exposing (Users, UserId) +import Model.Income exposing (Incomes) +import Model.Category exposing (Categories) +import Model.PaymentCategory exposing (PaymentCategories) + +import LoggedIn.Home.Model as Home +import LoggedIn.Income.Model as Income +import LoggedIn.Category.Model as Categories + +type alias Model = + { home : Home.Model + , income : Income.Model + , category : Categories.Model + , users : Users + , me : UserId + , payments : Payments + , incomes : Incomes + , categories : Categories + , paymentCategories : PaymentCategories + } + +init : Init -> Model +init initData = + { home = Home.init + , income = Income.init + , category = Categories.init + , users = initData.users + , me = initData.me + , payments = initData.payments + , incomes = initData.incomes + , categories = initData.categories + , paymentCategories = initData.paymentCategories + } |