Error in EndOfTurnProcedure procedure