| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS.h |
45 |
NO PROCEDURE |
_RL qdiag(1-OLx:sNx+Olx,1-Oly:sNy+Oly,numdiags,nSx,nSy) |
|
./pkg/diagnostics/DIAGNOSTICS.h |
49 |
NO PROCEDURE |
common /diagnostics/ qdiag, qSdiag, ndiag |
|
./pkg/diagnostics/diagnostics_fill_field.F |
208 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,bi,bj), |
|
./pkg/diagnostics/diagnostics_fill_field.F |
223 |
DIAGNOSTICS_FILL_FIELD |
U qdiag(1-OLx,1-OLy,kd,biArg,bjArg), |
|
./pkg/diagnostics/diagnostics_clear.F |
87 |
DIAGNOSTICS_CLRDIAG |
qdiag(i,j,ipt+k-1,bi,bj) = 0.0 |
|
./pkg/diagnostics/diag_vegtile_fill.F |
146 |
DIAG_VEGTILE_FILL |
if(qdiag(newindx,1,kd,bi,bj).eq.undef |
|
./pkg/diagnostics/diag_vegtile_fill.F |
148 |
DIAG_VEGTILE_FILL |
qdiag(newindx,1,kd,bi,bj) = undef |
|
./pkg/diagnostics/diag_vegtile_fill.F |
150 |
DIAG_VEGTILE_FILL |
qdiag(newindx,1,kd,bi,bj)=qdiag(newindx,1,kd,bi,bj)+ |
|
./pkg/diagnostics/diag_vegtile_fill.F |
158 |
DIAG_VEGTILE_FILL |
qdiag(newindx,1,kd,bi,bj)=qdiag(newindx,1,kd,bi,bj)+ |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
122 |
DIAGNOSTICS_WRITE_PICKUP |
& d_cw_name, qdiag, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
172 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',numdiags,qdiag, |
|
./pkg/diagnostics/diagnostics_init_varia.F |
38 |
DIAGNOSTICS_INIT_VARIA |
qdiag(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/diagnostics/diagnostics_utils.F |
65 |
GETDIAG |
IF ( qdiag(i,j,ipnt,bi,bj) .LE. undef ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
66 |
GETDIAG |
qtmp(i,j) = qdiag(i,j,ipnt,bi,bj)*factor |
|
./pkg/diagnostics/diagnostics_utils.F |
81 |
GETDIAG |
IF ( qdiag(i,j,ipCt,bi,bj) .NE. 0. ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
82 |
GETDIAG |
qtmp(i,j) = qdiag(i,j,ipnt,bi,bj) |
|
./pkg/diagnostics/diagnostics_utils.F |
83 |
GETDIAG |
& / qdiag(i,j,ipCt,bi,bj) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
103 |
DIAGNOSTICS_READ_PICKUP |
& d_cw_name, qdiag, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
147 |
DIAGNOSTICS_READ_PICKUP |
& numdiags,qdiag,1,myThid) |