From 973a039b54327df74396605410ea9abe19c8a4e7 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 4 Sep 2016 21:21:11 +0200
Subject: Upgrade to elm 0.17.1

---
 src/Model/Model.elm | 34 ----------------------------------
 1 file changed, 34 deletions(-)
 delete mode 100644 src/Model/Model.elm

(limited to 'src/Model/Model.elm')

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
-- 
cgit v1.2.3