| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS.h |
104 |
NO PROCEDURE |
& iSdiag, jSdiag, mSdiag, diagSt_region, |
|
./pkg/diagnostics/DIAGNOSTICS.h |
93 |
NO PROCEDURE |
INTEGER iSdiag(numperlist,numlists) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
48 |
DIAGSTATS_SET_POINTERS |
iSdiag(md,ld) = 0 |
|
./pkg/diagnostics/diagstats_set_pointers.F |
97 |
DIAGSTATS_SET_POINTERS |
iSdiag(mm,ld) = SIGN(mSdiag(md,ld),mate) |
|
./pkg/diagnostics/diagnostics_fill.F |
105 |
DIAGNOSTICS_FILL |
IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill.F |
106 |
DIAGNOSTICS_FILL |
iSp = iSdiag(m,n) |
|
./pkg/diagnostics/diagnostics_fill.F |
117 |
DIAGNOSTICS_FILL |
IF ( iSdiag(k,l).EQ.-iSp ) THEN |
|
./pkg/diagnostics/diagnostics_is_on.F |
55 |
NO PROCEDURE |
& .AND.iSdiag(m,n).NE.0 ) THEN |
|
./pkg/diagnostics/diagnostics_is_on.F |
56 |
NO PROCEDURE |
iSp = ABS(iSdiag(m,n)) |
|
./pkg/diagnostics/diagnostics_summary.F |
161 |
DIAGNOSTICS_SUMMARY |
& jSdiag(md,ld),' |', diagSt_Flds(md,ld),'|',iSdiag(md,ld), |
|
./pkg/diagnostics/diagnostics_summary.F |
163 |
DIAGNOSTICS_SUMMARY |
ipt = ABS(iSdiag(md,ld)) |
|
./pkg/diagnostics/diagstats_clear.F |
33 |
DIAGSTATS_CLEAR |
IF ( iSdiag(m,listId).GT.0 ) THEN |
|
./pkg/diagnostics/diagstats_clear.F |
35 |
DIAGSTATS_CLEAR |
iSp = iSdiag(m,listId) |
|
./pkg/diagnostics/diagstats_setdiag.F |
123 |
DIAGSTATS_SETDIAG |
mSdiag(mId,listId) = ABS(iSdiag(k,l)) |
|
./pkg/diagnostics/diagstats_setdiag.F |
75 |
DIAGSTATS_SETDIAG |
iSdiag(mId,listId) = -ABS(iSdiag(k,l)) |
|
./pkg/diagnostics/diagstats_setdiag.F |
95 |
DIAGSTATS_SETDIAG |
iSdiag(mId,listId) = ndiagmx + 1 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
130 |
DIAGNOSTICS_SWITCH_ONOFF |
iSp = iSdiag(m,n) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
142 |
DIAGNOSTICS_SWITCH_ONOFF |
iSp = iSdiag(m,n) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
108 |
DIAGNOSTICS_SCALE_FILL |
IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
109 |
DIAGNOSTICS_SCALE_FILL |
iSp = iSdiag(m,n) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
120 |
DIAGNOSTICS_SCALE_FILL |
IF ( iSdiag(k,l).EQ.-iSp ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
136 |
DIAGNOSTICS_FRACT_FILL |
IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
137 |
DIAGNOSTICS_FRACT_FILL |
iSp = iSdiag(m,n) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
164 |
DIAGNOSTICS_FRACT_FILL |
IF ( iSdiag(k,l).EQ.-iSp ) THEN |
|
./pkg/diagnostics/diagstats_output.F |
67 |
DIAGSTATS_OUTPUT |
IF ( iSdiag(m,listId).NE.0 .AND. parms1(5:5).NE.'D' ) THEN |
|
./pkg/diagnostics/diagstats_output.F |
81 |
DIAGSTATS_OUTPUT |
iSp = ABS(iSdiag(m,listId)) |