Symbol Description Uses
chardiag Character expression for diag to fill 32



File Line number Procedure Code
./pkg/diagnostics/diag_vegtile_fill.F 11 DIAG_VEGTILE_FILL
     &                check, chardiag, kLev, nLevs, bi, bj, myThid )
./pkg/diagnostics/diag_vegtile_fill.F 139 DIAG_VEGTILE_FILL
     &      'for Diagnostics #', ndiagnum, ' : ', chardiag
./pkg/diagnostics/diag_vegtile_fill.F 191 DIAG_VEGTILE_FILL
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diag_vegtile_fill.F 47 DIAG_VEGTILE_FILL
      CHARACTER*8 chardiag
./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 10 DIAGNOSTICS_FILL
     I               inpFld, chardiag,
./pkg/diagnostics/diagnostics_fill.F 120 DIAGNOSTICS_FILL
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_fill.F 58 DIAGNOSTICS_FILL
      CHARACTER*8 chardiag
./pkg/diagnostics/diagnostics_fill.F 78 DIAGNOSTICS_FILL
     &                   ' ', chardiag, ready2fillDiags, myThid )
./pkg/diagnostics/diagnostics_fill.F 95 DIAGNOSTICS_FILL
        IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_fill_rs.F 10 DIAGNOSTICS_FILL_RS
     I               inpFld, chardiag,
./pkg/diagnostics/diagnostics_fill_rs.F 120 DIAGNOSTICS_FILL_RS
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_fill_rs.F 58 DIAGNOSTICS_FILL_RS
      CHARACTER*8 chardiag
./pkg/diagnostics/diagnostics_fill_rs.F 78 DIAGNOSTICS_FILL_RS
     &                   ' ', chardiag, ready2fillDiags, myThid )
./pkg/diagnostics/diagnostics_fill_rs.F 95 DIAGNOSTICS_FILL_RS
        IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_fract_fill.F 109 DIAGNOSTICS_FRACT_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 123 DIAGNOSTICS_FRACT_FILL
     &            'for diag(#',ndId,' ) :', chardiag
./pkg/diagnostics/diagnostics_fract_fill.F 148 DIAGNOSTICS_FRACT_FILL
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_fract_fill.F 162 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 93 DIAGNOSTICS_FRACT_FILL
     &                   ' ', chardiag, ready2fillDiags, myThid )
./pkg/diagnostics/diagnostics_scale_fill.F 10 DIAGNOSTICS_SCALE_FILL
     I               inpFld, scaleFact, power, chardiag,
./pkg/diagnostics/diagnostics_scale_fill.F 122 DIAGNOSTICS_SCALE_FILL
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_scale_fill.F 62 DIAGNOSTICS_SCALE_FILL
      CHARACTER*8 chardiag
./pkg/diagnostics/diagnostics_scale_fill.F 81 DIAGNOSTICS_SCALE_FILL
     &                   ' ', chardiag, ready2fillDiags, myThid )
./pkg/diagnostics/diagnostics_scale_fill.F 97 DIAGNOSTICS_SCALE_FILL
        IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_scale_fill_rs.F 10 DIAGNOSTICS_SCALE_FILL_RS
     I               inpFld, scaleFact, power, chardiag,
./pkg/diagnostics/diagnostics_scale_fill_rs.F 122 DIAGNOSTICS_SCALE_FILL_RS
        IF ( chardiag.EQ.diagSt_Flds(m,n) .AND. iSdiag(m,n).GT.0 ) THEN
./pkg/diagnostics/diagnostics_scale_fill_rs.F 62 DIAGNOSTICS_SCALE_FILL_RS
      CHARACTER*8 chardiag
./pkg/diagnostics/diagnostics_scale_fill_rs.F 81 DIAGNOSTICS_SCALE_FILL_RS
     &                   ' ', chardiag, ready2fillDiags, myThid )
./pkg/diagnostics/diagnostics_scale_fill_rs.F 97 DIAGNOSTICS_SCALE_FILL_RS
        IF ( chardiag.EQ.flds(m,n) .AND. idiag(m,n).GT.0 ) THEN