| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS.h |
77 |
NO PROCEDURE |
_RL qSdiag(0:nStats,0:nRegions,diagSt_size,nSx,nSy) |
|
./pkg/diagnostics/DIAGNOSTICS.h |
81 |
NO PROCEDURE |
COMMON / DIAG_STORE_R / qdiag, qSdiag |
|
./pkg/diagnostics/diag_vegtile_fill.F |
193 |
DIAG_VEGTILE_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_fill.F |
122 |
DIAGNOSTICS_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
122 |
DIAGNOSTICS_FILL_RS |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
150 |
DIAGNOSTICS_FRACT_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_init_varia.F |
65 |
DIAGNOSTICS_INIT_VARIA |
qSdiag(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/diagnostics/diagnostics_is_on.F |
60 |
NO PROCEDURE |
IF (qSdiag(0,0,iSp,bi,bj).GE.0.) DIAGNOSTICS_IS_ON = .TRUE. |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
124 |
DIAGNOSTICS_SCALE_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
124 |
DIAGNOSTICS_SCALE_FILL_RS |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_summary.F |
208 |
DIAGNOSTICS_SUMMARY |
& qSdiag(0,0,ipt,1,1),' |' |
|
./pkg/diagnostics/diagnostics_summary.F |
215 |
DIAGNOSTICS_SUMMARY |
& qSdiag(0,0,im, 1,1),' |' |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
203 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE. 0.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
206 |
DIAGNOSTICS_SWITCH_ONOFF |
& ' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->', 0 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
207 |
DIAGNOSTICS_SWITCH_ONOFF |
qSdiag(0,0,iSp,bi,bj) = 0. |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
216 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE.-1.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
219 |
DIAGNOSTICS_SWITCH_ONOFF |
& ' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->', -1 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
220 |
DIAGNOSTICS_SWITCH_ONOFF |
qSdiag(0,0,iSp,bi,bj) = -1. |
|
./pkg/diagnostics/diagstats_clear.F |
81 |
DIAGSTATS_CLRDIAG |
qSdiag(i,j,k,bi,bj) = 0. |
|
./pkg/diagnostics/diagstats_fill.F |
226 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,bi,bj), |
|
./pkg/diagnostics/diagstats_fill.F |
243 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,biArg,bjArg), |
|
./pkg/diagnostics/diagstats_fill.F |
268 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,bi,bj), |
|
./pkg/diagnostics/diagstats_fill.F |
291 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,biArg,bjArg), |
|
./pkg/diagnostics/diagstats_global.F |
75 |
DIAGSTATS_GLOBAL |
IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN |
|
./pkg/diagnostics/diagstats_global.F |
78 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
82 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = qtmp1(i,k) + qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
84 |
DIAGSTATS_GLOBAL |
qtmp1(im,k) = MIN( qtmp1(im,k),qSdiag(im,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
85 |
DIAGSTATS_GLOBAL |
qtmp1(ix,k) = MAX( qtmp1(ix,k),qSdiag(ix,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
92 |
DIAGSTATS_GLOBAL |
IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN |
|
./pkg/diagnostics/diagstats_global.F |
95 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
99 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qtmp2(i,k) + qSdiag(i,jReg,kd,bi,bj) |