elmman/src/Types.elm

32 lines
368 B
Elm
Raw Normal View History

module Types exposing (..)
import Time exposing (Time)
type Direction
= Up
| Down
| Left
| Right
type alias Model =
{ time : Time
, player : PlayerModel
}
2017-06-26 21:48:17 +00:00
type Msg
= Tick Time
| Tock Time
type alias PlayerModel =
{ direction : Direction
, location : ( Float, Float )
}
type alias Range =
( Float, Float )