| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'client/elm/battlemap/src/Battlemap/Direction.elm')
| -rw-r--r-- | client/elm/battlemap/src/Battlemap/Direction.elm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/client/elm/battlemap/src/Battlemap/Direction.elm b/client/elm/battlemap/src/Battlemap/Direction.elm index b943c2d..e301177 100644 --- a/client/elm/battlemap/src/Battlemap/Direction.elm +++ b/client/elm/battlemap/src/Battlemap/Direction.elm @@ -1,4 +1,4 @@ -module Battlemap.Direction exposing (..) +module Battlemap.Direction exposing (Direction(..), opposite_of) type Direction = None @@ -6,3 +6,12 @@ type Direction = | Right | Up | Down + +opposite_of : Direction -> Direction +opposite_of d = + case d of + Left -> Right + Right -> Left + Up -> Down + Down -> Up + None -> None |