Symbol Description Uses
ndiagmx current space allocated in storage array 23



File Line number Procedure Code
./pkg/diagnostics/diagnostics_setdiag.F 11 DIAGNOSTICS_SETDIAG
     U                      ndiagmx,
./pkg/diagnostics/diagnostics_setdiag.F 121 DIAGNOSTICS_SETDIAG
          idiag(mId,listId) = -(ndiagmx+1)
./pkg/diagnostics/diagnostics_setdiag.F 126 DIAGNOSTICS_SETDIAG
            idiag(k,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 131 DIAGNOSTICS_SETDIAG
          idiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 133 DIAGNOSTICS_SETDIAG
        ndiagmx = ndiagmx + kdiag(nn)*averageCycle(listId)
./pkg/diagnostics/diagnostics_setdiag.F 134 DIAGNOSTICS_SETDIAG
        IF ( ndiagmx.GT.numDiags ) THEN
./pkg/diagnostics/diagnostics_setdiag.F 189 DIAGNOSTICS_SETDIAG
          mdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 194 DIAGNOSTICS_SETDIAG
            idiag(k,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 198 DIAGNOSTICS_SETDIAG
          ndiagmx = ndiagmx + kdiag(mate)*averageCycle(listId)
./pkg/diagnostics/diagnostics_setdiag.F 199 DIAGNOSTICS_SETDIAG
          IF ( ndiagmx.GT.numDiags ) THEN
./pkg/diagnostics/diagnostics_setdiag.F 41 DIAGNOSTICS_SETDIAG
      INTEGER ndiagmx
./pkg/diagnostics/diagstats_setdiag.F 11 DIAGSTATS_SETDIAG
     U                      ndiagmx,
./pkg/diagnostics/diagstats_setdiag.F 127 DIAGSTATS_SETDIAG
          IF (ndiagmx+kdiag(mate).GT.diagSt_size) THEN
./pkg/diagnostics/diagstats_setdiag.F 137 DIAGSTATS_SETDIAG
          mSdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagstats_setdiag.F 138 DIAGSTATS_SETDIAG
          ndiagmx = ndiagmx + kdiag(mate)
./pkg/diagnostics/diagstats_setdiag.F 41 DIAGSTATS_SETDIAG
      INTEGER ndiagmx
./pkg/diagnostics/diagstats_setdiag.F 85 DIAGSTATS_SETDIAG
        IF (ndiagmx+kdiag(ndId).GT.diagSt_size) THEN
./pkg/diagnostics/diagstats_setdiag.F 94 DIAGSTATS_SETDIAG
        iSdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagstats_setdiag.F 95 DIAGSTATS_SETDIAG
        ndiagmx = ndiagmx + kdiag(ndId)