Upgrade to elm 0.17.1

1 files changed, 0 insertions, 34 deletions

diff --git a/src/Model/Model.elm b/src/Model/Model.elm
deleted file mode 100644
index a660b16..0000000
--- a/src/Model/Model.elm
+++ /dev/null
@@ -1,34 +0,0 @@
-module Model.Model
-  ( Model
-  , initialModel
-  , numberOfTimers
-  ) where
-
-import Dict exposing (Dict)
-import Dict
-import Time exposing (Time)
-import List
-
-import Model.Timer exposing (..)
-import Model.Edition.Edition exposing (..)
-import Model.Id exposing (..)
-import Model.IdGenerator exposing (..)
-
-type alias Model =
-  { currentTime : Time
-  , timers : Dict Id Timer
-  , timerIdGenerator : IdGenerator
-  , edition : Maybe Edition
-  }
-
-initialModel : Time -> Model
-initialModel initialTime =
-  let (id, idGenerator) = getId initialIdGenerator
-  in  { currentTime = initialTime
-      , timers = Dict.insert id (initialTimer initialTime) Dict.empty
-      , timerIdGenerator = idGenerator
-      , edition = Nothing
-      }
-
-numberOfTimers : Model -> Int
-numberOfTimers = List.length << Dict.toList << .timers