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



File Line number Procedure Code
./pkg/diagnostics/DIAGNOSTICS.h 57 NO PROCEDURE
      INTEGER  pdiag(numlists,nSx,nSy)
./pkg/diagnostics/DIAGNOSTICS.h 60 NO PROCEDURE
      COMMON / DIAG_STORE_I / ndiag, pdiag
./pkg/diagnostics/diagnostics_fill.F 92 DIAGNOSTICS_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_fill_rs.F 92 DIAGNOSTICS_FILL_RS
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_fract_fill.F 105 DIAGNOSTICS_FRACT_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_init_varia.F 46 DIAGNOSTICS_INIT_VARIA
            pdiag(k,bi,bj) = 0
./pkg/diagnostics/diagnostics_scale_fill.F 94 DIAGNOSTICS_SCALE_FILL
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_scale_fill_rs.F 94 DIAGNOSTICS_SCALE_FILL_RS
           ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)
./pkg/diagnostics/diagnostics_switch_onoff.F 122 DIAGNOSTICS_SWITCH_ONOFF
        IF (dBugFlag.AND.pdiag(n,1,1).NE.nInterval)
./pkg/diagnostics/diagnostics_switch_onoff.F 125 DIAGNOSTICS_SWITCH_ONOFF
     &     ' switch', pdiag(n,1,1),' ->', nInterval, xInterval
./pkg/diagnostics/diagnostics_switch_onoff.F 138 DIAGNOSTICS_SWITCH_ONOFF
           pdiag(n,bi,bj) = nInterval
./pkg/diagnostics/diagnostics_utils.F 173 DIAGNOSTICS_COUNT
          ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId)