| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagstats_global.F |
100 |
DIAGSTATS_GLOBAL |
qtmp2(im,k) = MIN( qtmp2(im,k),qSdiag(im,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
101 |
DIAGSTATS_GLOBAL |
qtmp2(ix,k) = MAX( qtmp2(ix,k),qSdiag(ix,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
74 |
DIAGSTATS_GLOBAL |
IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN |
|
./pkg/diagnostics/diagstats_global.F |
77 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
81 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = qtmp1(i,k) + qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
83 |
DIAGSTATS_GLOBAL |
qtmp1(im,k) = MIN( qtmp1(im,k),qSdiag(im,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
84 |
DIAGSTATS_GLOBAL |
qtmp1(ix,k) = MAX( qtmp1(ix,k),qSdiag(ix,jReg,kd,bi,bj) ) |
|
./pkg/diagnostics/diagstats_global.F |
91 |
DIAGSTATS_GLOBAL |
IF ( qSdiag(0,jReg,kd,bi,bj).GT.0. ) THEN |
|
./pkg/diagnostics/diagstats_global.F |
94 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/diagstats_global.F |
98 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qtmp2(i,k) + qSdiag(i,jReg,kd,bi,bj) |
|
./pkg/diagnostics/DIAGNOSTICS.h |
46 |
NO PROCEDURE |
_RL qSdiag(0:nStats,0:nRegions,diagSt_size,nSx,nSy) |
|
./pkg/diagnostics/DIAGNOSTICS.h |
49 |
NO PROCEDURE |
common /diagnostics/ qdiag, qSdiag, ndiag |
|
./pkg/diagnostics/diagnostics_fill.F |
107 |
DIAGNOSTICS_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagstats_fill.F |
200 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,bi,bj), |
|
./pkg/diagnostics/diagstats_fill.F |
217 |
DIAGSTATS_FILL |
U qSdiag(0,0,kd,biArg,bjArg), |
|
./pkg/diagnostics/diagnostics_is_on.F |
57 |
NO PROCEDURE |
IF (qSdiag(0,0,iSp,1,1).GE.0.) DIAGNOSTICS_IS_ON = .TRUE. |
|
./pkg/diagnostics/diagnostics_summary.F |
168 |
DIAGNOSTICS_SUMMARY |
& qSdiag(0,0,ipt,1,1),' |' |
|
./pkg/diagnostics/diagnostics_summary.F |
175 |
DIAGNOSTICS_SUMMARY |
& qSdiag(0,0,im, 1,1),' |' |
|
./pkg/diagnostics/diagstats_clear.F |
81 |
DIAGSTATS_CLRDIAG |
qSdiag(i,j,k,bi,bj) = 0. |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
133 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE. 0.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
135 |
DIAGNOSTICS_SWITCH_ONOFF |
& nd,' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->', 0 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
136 |
DIAGNOSTICS_SWITCH_ONOFF |
qSdiag(0,0,iSp,bi,bj) = 0. |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
145 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE.-1.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
147 |
DIAGNOSTICS_SWITCH_ONOFF |
& nd,' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->',-1 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
148 |
DIAGNOSTICS_SWITCH_ONOFF |
qSdiag(0,0,iSp,bi,bj) = -1. |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
110 |
DIAGNOSTICS_SCALE_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |
|
./pkg/diagnostics/diagnostics_init_varia.F |
53 |
DIAGNOSTICS_INIT_VARIA |
qSdiag(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
138 |
DIAGNOSTICS_FRACT_FILL |
IF ( qSdiag(0,0,iSp,bi,bj).GE.0. ) THEN |