File |
Line number |
Procedure |
Code |
./pkg/diagnostics/DIAGNOSTICS.h |
76 |
NO PROCEDURE |
_RL qdiag(1-OLx:sNx+OLx,1-OLy:sNy+OLy,numDiags,nSx,nSy) |
./pkg/diagnostics/DIAGNOSTICS.h |
81 |
NO PROCEDURE |
COMMON / DIAG_STORE_R / qdiag, qSdiag |
./pkg/diagnostics/diag_vegtile_fill.F |
159 |
DIAG_VEGTILE_FILL |
qdiag(i,j,kd,bi,bj) = undef |
./pkg/diagnostics/diag_vegtile_fill.F |
160 |
DIAG_VEGTILE_FILL |
ELSEIF ( qdiag(i,j,kd,bi,bj).NE.undef ) THEN |
./pkg/diagnostics/diag_vegtile_fill.F |
161 |
DIAG_VEGTILE_FILL |
qdiag(i,j,kd,bi,bj) = qdiag(i,j,kd,bi,bj) |
./pkg/diagnostics/diag_vegtile_fill.F |
170 |
DIAG_VEGTILE_FILL |
qdiag(i,j,kd,bi,bj) = qdiag(i,j,kd,bi,bj) |
./pkg/diagnostics/diagnostics_clear.F |
94 |
DIAGNOSTICS_CLRDIAG |
qdiag(i,j,kl,bi,bj) = 0.0 |
./pkg/diagnostics/diagnostics_fill_field.F |
231 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,bi,bj), |
./pkg/diagnostics/diagnostics_fill_field.F |
240 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,bi,bj), |
./pkg/diagnostics/diagnostics_fill_field.F |
257 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,biArg,bjArg), |
./pkg/diagnostics/diagnostics_fill_field.F |
266 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,biArg,bjArg), |
./pkg/diagnostics/diagnostics_init_varia.F |
46 |
DIAGNOSTICS_INIT_VARIA |
qdiag(i,j,k,bi,bj) = 0. _d 0 |
./pkg/diagnostics/diagnostics_read_pickup.F |
101 |
DIAGNOSTICS_READ_PICKUP |
& d_cw_name, qdiag, myThid) |
./pkg/diagnostics/diagnostics_read_pickup.F |
141 |
DIAGNOSTICS_READ_PICKUP |
& numDiags, qdiag, nIter0, myThid ) |
./pkg/diagnostics/diagnostics_utils.F |
163 |
DIAGNOSTICS_GET_DIAG |
IF ( qdiag(i,j,ipnt,bi,bj) .LE. undefRL ) THEN |
./pkg/diagnostics/diagnostics_utils.F |
164 |
DIAGNOSTICS_GET_DIAG |
qtmp(i,j,k) = qdiag(i,j,ipnt,bi,bj)*factor |
./pkg/diagnostics/diagnostics_utils.F |
173 |
DIAGNOSTICS_GET_DIAG |
qtmp(i,j,k) = qdiag(i,j,ipnt,bi,bj)*factor |
./pkg/diagnostics/diagnostics_utils.F |
186 |
DIAGNOSTICS_GET_DIAG |
IF ( qdiag(i,j,ipCt,bi,bj) .NE. 0. ) THEN |
./pkg/diagnostics/diagnostics_utils.F |
187 |
DIAGNOSTICS_GET_DIAG |
qtmp(i,j,k) = qdiag(i,j,ipnt,bi,bj) |
./pkg/diagnostics/diagnostics_utils.F |
188 |
DIAGNOSTICS_GET_DIAG |
& / qdiag(i,j,ipCt,bi,bj) |
./pkg/diagnostics/diagnostics_write_pickup.F |
135 |
DIAGNOSTICS_WRITE_PICKUP |
& d_cw_name, qdiag, myThid) |
./pkg/diagnostics/diagnostics_write_pickup.F |
178 |
DIAGNOSTICS_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, numDiags, qdiag, |