| summaryrefslogtreecommitdiff | 
diff options
Diffstat (limited to 'client/elm/battlemap/src/Model.elm')
| -rw-r--r-- | client/elm/battlemap/src/Model.elm | 16 | 
1 files changed, 14 insertions, 2 deletions
| diff --git a/client/elm/battlemap/src/Model.elm b/client/elm/battlemap/src/Model.elm index 024fc4d..3d69c7d 100644 --- a/client/elm/battlemap/src/Model.elm +++ b/client/elm/battlemap/src/Model.elm @@ -1,7 +1,19 @@  module Model exposing (Model, model) +import Battlemap as Bp exposing (Battlemap, random) +import Battlemap.Location exposing (..) +import Battlemap.Navigator as Nr exposing (Navigator, new_navigator) +  -- MODEL -type alias Model = Int +type alias Model = +   { +      battlemap: Bp.Battlemap, +      navigator: (Maybe Nr.Navigator) +   }  model : Model -model = 0 +model = +   { +      battlemap = (Bp.random), +      navigator = (Just (Nr.new_navigator {x=2, y=4})) +   } | 


