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) |