Symbol Description Uses
jSdiag 17



File Line number Procedure Code
./pkg/diagnostics/DIAGNOSTICS.h 104 NO PROCEDURE
     &     iSdiag, jSdiag, mSdiag, diagSt_region,
./pkg/diagnostics/DIAGNOSTICS.h 94 NO PROCEDURE
      INTEGER   jSdiag(numperlist,numlists)
./pkg/diagnostics/diagstats_set_pointers.F 49 DIAGSTATS_SET_POINTERS
        jSdiag(md,ld) = 0
./pkg/diagnostics/diagstats_set_pointers.F 68 DIAGSTATS_SET_POINTERS
            jSdiag(md,ld) = nd
./pkg/diagnostics/diagstats_set_pointers.F 99 DIAGSTATS_SET_POINTERS
             jSdiag(mm,ld) = mate
./pkg/diagnostics/diagnostics_fill.F 108 DIAGNOSTICS_FILL
           ndId = jSdiag(m,n)
./pkg/diagnostics/diagnostics_summary.F 161 DIAGNOSTICS_SUMMARY
     &       jSdiag(md,ld),' |', diagSt_Flds(md,ld),'|',iSdiag(md,ld),
./pkg/diagnostics/diagstats_clear.F 34 DIAGSTATS_CLEAR
         ndId = jSdiag(m,listId)
./pkg/diagnostics/diagstats_setdiag.F 119 DIAGSTATS_SETDIAG
           IF (flag .AND. jSdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagstats_setdiag.F 120 DIAGSTATS_SETDIAG
            IF (cdiag(mate).EQ.cdiag(jSdiag(k,l)) ) THEN
./pkg/diagnostics/diagstats_setdiag.F 71 DIAGSTATS_SETDIAG
         IF (flag .AND. jSdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagstats_setdiag.F 72 DIAGSTATS_SETDIAG
          IF (cdiag(ndId).EQ.cdiag(jSdiag(k,l)) ) THEN
./pkg/diagnostics/diagnostics_switch_onoff.F 132 DIAGNOSTICS_SWITCH_ONOFF
               nd = jSdiag(m,n)
./pkg/diagnostics/diagnostics_switch_onoff.F 144 DIAGNOSTICS_SWITCH_ONOFF
               nd = jSdiag(m,n)
./pkg/diagnostics/diagnostics_scale_fill.F 111 DIAGNOSTICS_SCALE_FILL
           ndId = jSdiag(m,n)
./pkg/diagnostics/diagnostics_fract_fill.F 139 DIAGNOSTICS_FRACT_FILL
           ndId = jSdiag(m,n)
./pkg/diagnostics/diagstats_output.F 65 DIAGSTATS_OUTPUT
       ndId = jSdiag(m,listId)