module Model.Position exposing
  ( positionEncoder
  )

import Json.Encode exposing (..)

positionEncoder : (Int, Int) -> Value
positionEncoder (x, y) =
  object
    [ ("x", int x)
    , ("y", int y)
    ]