function (choose-harvest (player game))