cg2dTolerance_sq = cg2dTolerance*cg2dTolerance
IF ( err_sq .LT. cg2dTolerance_sq ) GOTO 11
_RL cg2dTolerance_sq
IF ( err_sq.GE.cg2dTolerance_sq ) THEN
IF ( errTile(bi,bj).GE.cg2dTolerance_sq ) THEN
IF ( errTile(bi,bj) .GE. cg2dTolerance_sq .AND.
IF ( err_sq .GE. cg2dTolerance_sq ) THEN