let tick (game:Game) =
        let playerOneMove = game.Player1.StrategyInfo.Strategy game.JointmoveHistory
        let playerTwoMove = game.Player2.StrategyInfo.Strategy game.JointmoveHistory
        {game with JointmoveHistory = {Player1Move=playerOneMove;Player2Move=playerTwoMove}::game.JointmoveHistory }