IF ( numIters .GT. numItersMax ) THEN
& 'CG2D_NSA: numIters > numItersMax =', numItersMax
icg2dkey = (ikey-1)*numItersMax + it2d
INTEGER numItersMax
PARAMETER ( numItersMax = 100 )
PARAMETER ( numItersMax = 200 )