Symbol Description Uses
mDbl processing mate Id number (in case processing requires 2 diags) 12



File Line number Procedure Code
./pkg/diagnostics/diagnostics_out.F 167 DIAGNOSTICS_OUT
        mDbl = 0
./pkg/diagnostics/diagnostics_out.F 180 DIAGNOSTICS_OUT
           IF ( mdiag(md,listId).NE.0 ) mDbl = hdiag(nn)
./pkg/diagnostics/diagnostics_out.F 192 DIAGNOSTICS_OUT
          IF (mDbl.GT.0) im = im + kdiag(mDbl)*(lm-1)
./pkg/diagnostics/diagnostics_out.F 256 DIAGNOSTICS_OUT
               IF ( mDbl.EQ.0 ) THEN
./pkg/diagnostics/diagnostics_out.F 263 DIAGNOSTICS_OUT
     &            cdiag(mDbl),' (#',mDbl,') Cnt=',ndiag(im,1,1)
./pkg/diagnostics/diagnostics_out.F 302 DIAGNOSTICS_OUT
              IF ( mDbl.GT.0 ) THEN
./pkg/diagnostics/diagnostics_out.F 310 DIAGNOSTICS_OUT
     I                         mDbl, 0, im, 0, bi, bj, myThid )
./pkg/diagnostics/diagnostics_out.F 325 DIAGNOSTICS_OUT
              IF ( mDbl.GT.0 ) THEN
./pkg/diagnostics/diagnostics_out.F 331 DIAGNOSTICS_OUT
     I                         mDbl, 0, im, 0, bi, bj, myThid )
./pkg/diagnostics/diagnostics_out.F 71 DIAGNOSTICS_OUT
      INTEGER mate, mDbl, mVec