File |
Line number |
Procedure |
Code |
./pkg/diagnostics/DIAGNOSTICS.h |
79 |
NO PROCEDURE |
INTEGER pdiag(numLists,nSx,nSy) |
./pkg/diagnostics/DIAGNOSTICS.h |
82 |
NO PROCEDURE |
COMMON / DIAG_STORE_I / ndiag, pdiag |
./pkg/diagnostics/diagnostics_fill.F |
100 |
DIAGNOSTICS_FILL |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |
./pkg/diagnostics/diagnostics_fill_rs.F |
100 |
DIAGNOSTICS_FILL_RS |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |
./pkg/diagnostics/diagnostics_fract_fill.F |
113 |
DIAGNOSTICS_FRACT_FILL |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |
./pkg/diagnostics/diagnostics_init_varia.F |
54 |
DIAGNOSTICS_INIT_VARIA |
pdiag(k,bi,bj) = 0 |
./pkg/diagnostics/diagnostics_scale_fill.F |
102 |
DIAGNOSTICS_SCALE_FILL |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
102 |
DIAGNOSTICS_SCALE_FILL_RS |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |
./pkg/diagnostics/diagnostics_switch_onoff.F |
142 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.pdiag(n,1,1).NE.nInterval) |
./pkg/diagnostics/diagnostics_switch_onoff.F |
145 |
DIAGNOSTICS_SWITCH_ONOFF |
& ' switch', pdiag(n,1,1),' ->', nInterval, xInterval |
./pkg/diagnostics/diagnostics_switch_onoff.F |
158 |
DIAGNOSTICS_SWITCH_ONOFF |
pdiag(n,bi,bj) = nInterval |
./pkg/diagnostics/diagnostics_utils.F |
75 |
DIAGNOSTICS_COUNT |
ipt = ipt + pdiag(n,bi,bj)*kdiag(ndId) |