numIters=cg2dMaxIters
U numIters,
WRITE(msgBuf,'(A34,I6)') 'cg2d_iters =',numIters
numIters=cg3dMaxIters
WRITE(msgBuf,'(A34,I6)') 'cg3d_iters =',numIters
INTEGER numIters
DO 10 it3d=1, numIters
numIters=actualIts
DO 10 it2d=1, numIters
IF ( numIters .GT. numItersMax ) THEN
DO it2d=1, numIters