src/Player.elm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

module Player where

import Vec2 (..)
import Config (Config)

type alias Player =
  { pos : Vec2
  , speed : Vec2
  , config : Config
  }

playerSize : Float
playerSize = 15

playerSpeed : Float -> Float
playerSpeed dt = dt / 200