errorMode(I,myThid) = theErrorMode
eMode = errorMode(fileHandle,myThid)
eMode = errorMode(I,myThid)
& accessMode, errorMode,
INTEGER errorMode (ioUnitsPerThread,MAX_NO_THREADS)