Symbol Description Uses
pdiag index of current averaging interval within the averaging-cycle 12



File Line number Procedure Code
./pkg/diagnostics/DIAGNOSTICS.h 79 NO PROCEDURE
      INTEGER  pdiag(numLists,nSx,nSy)
./pkg/diagnostics/DIAGNOSTICS.h 82 NO PROCEDURE
      COMMON / DIAG_STORE_I / ndiag, pdiag
./pkg/diagnostics/diagnostics_fill.F 100 DIAGNOSTICS_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_fill_rs.F 100 DIAGNOSTICS_FILL_RS
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_fract_fill.F 113 DIAGNOSTICS_FRACT_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_init_varia.F 54 DIAGNOSTICS_INIT_VARIA
            pdiag(k,bi,bj) = 0
./pkg/diagnostics/diagnostics_scale_fill.F 102 DIAGNOSTICS_SCALE_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_scale_fill_rs.F 102 DIAGNOSTICS_SCALE_FILL_RS
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_switch_onoff.F 142 DIAGNOSTICS_SWITCH_ONOFF
        IF (dBugFlag.AND.pdiag(n,1,1).NE.nInterval)
./pkg/diagnostics/diagnostics_switch_onoff.F 145 DIAGNOSTICS_SWITCH_ONOFF
     &     ' switch', pdiag(n,1,1),' ->', nInterval, xInterval
./pkg/diagnostics/diagnostics_switch_onoff.F 158 DIAGNOSTICS_SWITCH_ONOFF
           pdiag(n,bi,bj) = nInterval
./pkg/diagnostics/diagnostics_utils.F 75 DIAGNOSTICS_COUNT
          ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)