/// Which player's controls to read.
pub type Player {
  Player1
  Player2
}

pub fn to_int(player: Player) -> Int {
  case player {
    Player1 -> 1
    Player2 -> 2
  }
}