Symbol Description Uses
ndiagmx current space allocated in storage array 20


File Line number Procedure Code
./pkg/diagnostics/diagstats_setdiag.F 11 DIAGSTATS_SETDIAG 
     U                      ndiagmx,
./pkg/diagnostics/diagstats_setdiag.F 131 DIAGSTATS_SETDIAG 
          IF (ndiagmx+kdiag(mate).GT.diagSt_size) THEN
./pkg/diagnostics/diagstats_setdiag.F 141 DIAGSTATS_SETDIAG 
          mSdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagstats_setdiag.F 142 DIAGSTATS_SETDIAG 
          ndiagmx = ndiagmx + kdiag(mate)
./pkg/diagnostics/diagstats_setdiag.F 41 DIAGSTATS_SETDIAG 
      INTEGER ndiagmx
./pkg/diagnostics/diagstats_setdiag.F 86 DIAGSTATS_SETDIAG 
        IF (ndiagmx+kdiag(ndId).GT.diagSt_size) THEN
./pkg/diagnostics/diagstats_setdiag.F 95 DIAGSTATS_SETDIAG 
        iSdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagstats_setdiag.F 96 DIAGSTATS_SETDIAG 
        ndiagmx = ndiagmx + kdiag(ndId)
./pkg/diagnostics/diagnostics_setdiag.F 11 DIAGNOSTICS_SETDIAG 
     U                      ndiagmx,
./pkg/diagnostics/diagnostics_setdiag.F 131 DIAGNOSTICS_SETDIAG 
          IF (ndiagmx+kdiag(mate).GT.numdiags) THEN
./pkg/diagnostics/diagnostics_setdiag.F 141 DIAGNOSTICS_SETDIAG 
          mdiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 142 DIAGNOSTICS_SETDIAG 
          ndiagmx = ndiagmx + kdiag(mate)
./pkg/diagnostics/diagnostics_setdiag.F 41 DIAGNOSTICS_SETDIAG 
      INTEGER ndiagmx
./pkg/diagnostics/diagnostics_setdiag.F 86 DIAGNOSTICS_SETDIAG 
        IF (ndiagmx+kdiag(ndId).GT.numdiags) THEN
./pkg/diagnostics/diagnostics_setdiag.F 95 DIAGNOSTICS_SETDIAG 
        idiag(mId,listId) = ndiagmx + 1
./pkg/diagnostics/diagnostics_setdiag.F 96 DIAGNOSTICS_SETDIAG 
        ndiagmx = ndiagmx + kdiag(ndId)