Organizing source code with subdirectories

1 files changed, 20 insertions, 0 deletions

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