module Timer.Model exposing
  ( Timer
  , init
  )

import List
import Time exposing (Time)

import Timer.Model.State exposing (..)

type alias Timer =
  { creationTime : Time
  , name : Maybe String
  , initialTime : Time
  , time : Time
  , state : State
  }

init : Time -> Timer
init creationTime =
  let initialTime = 5 * 60 * 1000
  in  { creationTime = creationTime
      , name = Nothing
      , initialTime = initialTime
      , time = initialTime
      , state = Idle
      }