Symbol Description Uses
jReg region Index to be process. 12



File Line number Procedure Code
./pkg/diagnostics/diagstats_global.F 100 DIAGSTATS_GLOBAL
              qtmp2(im,k) = MIN( qtmp2(im,k),qSdiag(im,jReg,kd,bi,bj) )
./pkg/diagnostics/diagstats_global.F 101 DIAGSTATS_GLOBAL
              qtmp2(ix,k) = MAX( qtmp2(ix,k),qSdiag(ix,jReg,kd,bi,bj) )
./pkg/diagnostics/diagstats_global.F 13 DIAGSTATS_GLOBAL
     I                    undef, nLev, jReg,
./pkg/diagnostics/diagstats_global.F 36 DIAGSTATS_GLOBAL
      INTEGER nLev, jReg, ndId, mate, iSp, iSm
./pkg/diagnostics/diagstats_global.F 74 DIAGSTATS_GLOBAL
            IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN
./pkg/diagnostics/diagstats_global.F 77 DIAGSTATS_GLOBAL
                qtmp1(i,k) = qSdiag(i,jReg,kd,bi,bj)
./pkg/diagnostics/diagstats_global.F 81 DIAGSTATS_GLOBAL
                qtmp1(i,k) = qtmp1(i,k) + qSdiag(i,jReg,kd,bi,bj)
./pkg/diagnostics/diagstats_global.F 83 DIAGSTATS_GLOBAL
              qtmp1(im,k) = MIN( qtmp1(im,k),qSdiag(im,jReg,kd,bi,bj) )
./pkg/diagnostics/diagstats_global.F 84 DIAGSTATS_GLOBAL
              qtmp1(ix,k) = MAX( qtmp1(ix,k),qSdiag(ix,jReg,kd,bi,bj) )
./pkg/diagnostics/diagstats_global.F 91 DIAGSTATS_GLOBAL
            IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN
./pkg/diagnostics/diagstats_global.F 94 DIAGSTATS_GLOBAL
                qtmp2(i,k) = qSdiag(i,jReg,kd,bi,bj)
./pkg/diagnostics/diagstats_global.F 98 DIAGSTATS_GLOBAL
                qtmp2(i,k) = qtmp2(i,k) + qSdiag(i,jReg,kd,bi,bj)