src/Model/Board.elm


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

module Model.Board
  ( initBoardSize
  , boardDiagonal
  ) where

import Model.Vec2 exposing (Vec2)

initBoardSize : Vec2
initBoardSize =
  { x = 500
  , y = 500
  }

boardDiagonal : Vec2 -> Float
boardDiagonal boardSize =
  boardSize.x ^ 2 + boardSize.y ^ 2
    |> sqrt