| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS.h |
115 |
NO PROCEDURE |
& flds, fnames, fflags |
|
./pkg/diagnostics/DIAGNOSTICS.h |
98 |
NO PROCEDURE |
CHARACTER*8 flds (numperlist,numlists) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
90 |
DIAG_VEGTILE_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill.F |
88 |
DIAGNOSTICS_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
88 |
DIAGNOSTICS_FILL_RS |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
101 |
DIAGNOSTICS_FRACT_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
103 |
DIAGNOSTICS_INTERP_VERT |
& 'fails to interpolate diag.(#', ndId,'): ',flds(md,listId) |
|
./pkg/diagnostics/diagnostics_is_on.F |
46 |
NO PROCEDURE |
IF ( diagName.EQ.flds(m,n) .AND. idiag(m,n).NE.0 ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
346 |
DIAGNOSTICS_OUT |
& '- WARNING - diag.#',ndId, ' : ',flds(md,listId), |
|
./pkg/diagnostics/diagnostics_out.F |
631 |
DIAGNOSTICS_OUT |
& nfields(listId), flds(1,listId), nTimRec, timeRec, |
|
./pkg/diagnostics/diagnostics_readparms.F |
199 |
DIAGNOSTICS_READPARMS |
flds(m,n) = blk8c |
|
./pkg/diagnostics/diagnostics_readparms.F |
289 |
DIAGNOSTICS_READPARMS |
flds(nfields(n),n) = fields(m,l) |
|
./pkg/diagnostics/diagnostics_readparms.F |
511 |
DIAGNOSTICS_READPARMS |
WRITE(msgBuf,'(21A)') ' Fields: ',(' ',flds(l,n),l=nf,m) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
90 |
DIAGNOSTICS_SCALE_FILL |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
90 |
DIAGNOSTICS_SCALE_FILL_RS |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
66 |
DIAGNOSTICS_SET_POINTERS |
IF ( flds(md,ld).EQ.cdiag(nd) ) THEN |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
75 |
DIAGNOSTICS_SET_POINTERS |
I ld, md, nlists, nfields, flds, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
78 |
DIAGNOSTICS_SET_POINTERS |
& flds(md,ld),' is not a Diagnostic' |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
88 |
DIAGNOSTICS_SET_POINTERS |
flds (mm,ld) = cdiag(mate) |
|
./pkg/diagnostics/diagnostics_summary.F |
114 |
DIAGNOSTICS_SUMMARY |
& jdiag(md,ld),' |', flds(md,ld),'|',idiag(md,ld),' |', |
|
./pkg/diagnostics/diagnostics_utils.F |
169 |
DIAGNOSTICS_COUNT |
IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
252 |
DIAGNOSTICS_GET_POINTERS |
IF ( ip.EQ.0 .AND. diagName.EQ.flds(m,n) |
|
./pkg/diagnostics/diagnostics_utils.F |
273 |
DIAGNOSTICS_GET_POINTERS |
IF ( ip.EQ.0 .AND. diagName.EQ.flds(m,n) |
|
./pkg/diagnostics/diagnostics_utils.F |
281 |
DIAGNOSTICS_GET_POINTERS |
IF ( ip.EQ.0 .AND. diagName.EQ.flds(m,n) |