7hoenix / elm-chess / Chess.Data.Board


type alias Board =
List (List Square)


type Square
    = Empty
    | Occupied Chess.Data.Player.Player Chess.Data.Piece.Piece

boardDecoder : Json.Decode.Decoder Board

toFen : Board -> Chess.Data.Player.Player -> String