module LoggedData
  ( LoggedData
  , build
  ) where

import Time exposing (Time)

import Action exposing (Action)

import Model exposing (Model)
import Model.Translations exposing (..)
import Model.Conf exposing (..)
import Model.Payment exposing (Payments)
import Model.User exposing (Users, UserId)
import Model.Income exposing (Incomes)

import LoggedIn.Model as LoggedInModel

type alias LoggedData =
  { currentTime : Time
  , translations : Translations
  , conf : Conf
  , users : Users
  , me : UserId
  , payments : Payments
  , monthlyPayments : Payments
  , incomes : Incomes
  }

build : Model -> LoggedInModel.Model -> LoggedData
build model loggedIn =
  { currentTime = model.currentTime
  , translations = model.translations
  , conf = model.conf
  , users = loggedIn.users
  , me = loggedIn.me
  , payments = loggedIn.payments
  , monthlyPayments = loggedIn.monthlyPayments
  , incomes = loggedIn.incomes
  }