client/elm/battlemap/src/Character.elm


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

module Character exposing (Character, CharacterRef, to_comparable)

import Battlemap.Location exposing (Location)

type alias Character =
   {
      id : String,
      name : String,
      icon : String,
      portrait : String,
      location : Location,
      movement_points : Int
   }

type alias CharacterRef = String
to_comparable : Character -> CharacterRef
to_comparable c =
   c.id