Symbol Description Uses
chardiag Character expression for diag to fill 25



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