File |
Line number |
Procedure |
Code |
./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 |
10 |
DIAGNOSTICS_FILL |
I inpFld, chardiag, |
./pkg/diagnostics/diagnostics_fill.F |
57 |
DIAGNOSTICS_FILL |
CHARACTER*8 chardiag |
./pkg/diagnostics/diagnostics_fill.F |
83 |
DIAGNOSTICS_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
./pkg/diagnostics/diag_vegtile_fill.F |
10 |
DIAG_VEGTILE_FILL |
. check, chardiag, kLev, nLevs, bi, bj, myThid) |
./pkg/diagnostics/diag_vegtile_fill.F |
127 |
DIAG_VEGTILE_FILL |
. 'for Diagnostics #', ndiagnum, ' : ', chardiag |
./pkg/diagnostics/diag_vegtile_fill.F |
51 |
DIAG_VEGTILE_FILL |
CHARACTER*8 chardiag |
./pkg/diagnostics/diag_vegtile_fill.F |
77 |
DIAG_VEGTILE_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
./pkg/diagnostics/diagnostics_setunits.F |
13 |
DIAGNOSTICS_SETUNITS |
I chardiag, |
./pkg/diagnostics/diagnostics_setunits.F |
27 |
DIAGNOSTICS_SETUNITS |
character*8 chardiag |
./pkg/diagnostics/diagnostics_setunits.F |
40 |
DIAGNOSTICS_SETUNITS |
if(chardiag.eq.cdiag(n)) then |
./pkg/diagnostics/diagnostics_setunits.F |
48 |
DIAGNOSTICS_SETUNITS |
write(6,1000)chardiag |
./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 |
10 |
DIAGNOSTICS_SCALE_FILL |
I inpFld, scaleFact, power, chardiag, |
./pkg/diagnostics/diagnostics_scale_fill.F |
62 |
DIAGNOSTICS_SCALE_FILL |
CHARACTER*8 chardiag |
./pkg/diagnostics/diagnostics_scale_fill.F |
86 |
DIAGNOSTICS_SCALE_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
./pkg/diagnostics/diagnostics_fract_fill.F |
10 |
DIAGNOSTICS_FRACT_FILL |
I inpFld, fractFld, scaleFact, power, chardiag, |
./pkg/diagnostics/diagnostics_fract_fill.F |
112 |
DIAGNOSTICS_FRACT_FILL |
& 'for diag(#',ndId,' ) :', chardiag |
./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 |
150 |
DIAGNOSTICS_FRACT_FILL |
& 'for diag(#',ndId,' ) :', chardiag |
./pkg/diagnostics/diagnostics_fract_fill.F |
71 |
DIAGNOSTICS_FRACT_FILL |
CHARACTER*8 chardiag |
./pkg/diagnostics/diagnostics_fract_fill.F |
98 |
DIAGNOSTICS_FRACT_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
./pkg/diagnostics/diagnostics_utils.F |
102 |
DIAGNOSTICS_COUNT |
SUBROUTINE DIAGNOSTICS_COUNT (chardiag, |
./pkg/diagnostics/diagnostics_utils.F |
127 |
DIAGNOSTICS_COUNT |
CHARACTER*8 chardiag |
./pkg/diagnostics/diagnostics_utils.F |
143 |
DIAGNOSTICS_COUNT |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |