From 17a58e0c4c67f27d87635bf1b2ca50fb11795ad3 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Sat, 7 Mar 2015 15:12:02 +0100
Subject: Organizing source code with subdirectories

---
 src/Model/Player.elm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 src/Model/Player.elm

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

diff --git a/src/Model/Player.elm b/src/Model/Player.elm
new file mode 100644
index 0000000..c6aac21
--- /dev/null
+++ b/src/Model/Player.elm
@@ -0,0 +1,20 @@
+module Model.Player
+  ( Player
+  , playerSize
+  , playerSpeed
+  ) where
+
+import Model.Vec2 (..)
+import Model.Config (Config)
+
+type alias Player =
+  { pos : Vec2
+  , speed : Vec2
+  , config : Config
+  }
+
+playerSize : Float
+playerSize = 15
+
+playerSpeed : Float -> Float
+playerSpeed dt = dt / 200
-- 
cgit v1.2.3