Upgrade to elm 0.17.1

1 files changed, 0 insertions, 28 deletions

diff --git a/src/Input.elm b/src/Input.elm
deleted file mode 100644
index e18d8be..0000000
--- a/src/Input.elm
+++ /dev/null
@@ -1,28 +0,0 @@
-module Input where
-
-import Char exposing (toCode, KeyCode)
-import Keyboard exposing (keysDown, arrows, isDown)
-import Random
-import Time exposing (Time, fps)
-import Signal exposing (..)
-import Set exposing (Set)
-
-import Model.Vec2 exposing (Vec2)
-
-type alias Input =
-  { dir : Vec2
-  , inputKeysDown : Set KeyCode
-  , delta : Time
-  }
-
-getInput : Signal Input
-getInput =
-  let delta = fps 24
-      input = map3 Input (map recordIntToVec2 arrows) keysDown delta
-  in  sampleOn delta input
-
-recordIntToVec2 : {x : Int, y : Int} -> Vec2
-recordIntToVec2 {x, y} =
-  { x = toFloat x
-  , y = toFloat y
-  }