Symbol Description Uses
gdiag parser field with characteristics of the diagnostics 81



File Line number Procedure Code
./pkg/diagnostics/DIAGNOSTICS.h 62 NO PROCEDURE
      CHARACTER*16   gdiag(ndiagMax)
./pkg/diagnostics/DIAGNOSTICS.h 68 NO PROCEDURE
     &  cdiag, gdiag, tdiag, udiag
./pkg/diagnostics/diagnostics_addtolist.F 108 DIAGNOSTICS_ADDTOLIST
        gdiag(diagNum) = diagCode
./pkg/diagnostics/diagnostics_addtolist.F 72 DIAGNOSTICS_ADDTOLIST
         IF ( gdiag(n).EQ.diagCode .AND. hdiag(n).EQ.diagMate ) THEN
./pkg/diagnostics/diagnostics_addtolist.F 90 DIAGNOSTICS_ADDTOLIST
     &     'change parser="',gdiag(n),'" & mate=',hdiag(n)
./pkg/diagnostics/diagnostics_check.F 183 DIAGNOSTICS_CHECK
     &          gdiag(nd)(10:10) .EQ. 'L') THEN
./pkg/diagnostics/diagnostics_fill_field.F 126 DIAGNOSTICS_FILL_FIELD
        parms1 = gdiag(ndId)(1:8)
./pkg/diagnostics/diagnostics_fract_fill.F 116 DIAGNOSTICS_FRACT_FILL
           gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagnostics_fract_fill.F 154 DIAGNOSTICS_FRACT_FILL
           gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagnostics_init_early.F 102 DIAGNOSTICS_INIT_EARLY
      gdiag( 2) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 107 DIAGNOSTICS_INIT_EARLY
      gdiag( 3) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 112 DIAGNOSTICS_INIT_EARLY
      gdiag( 4) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 117 DIAGNOSTICS_INIT_EARLY
      gdiag( 5) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 122 DIAGNOSTICS_INIT_EARLY
      gdiag( 6) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 127 DIAGNOSTICS_INIT_EARLY
      gdiag( 7) = 'SU      L1      '
./pkg/diagnostics/diagnostics_init_early.F 132 DIAGNOSTICS_INIT_EARLY
      gdiag( 8) = 'SV      L1      '
./pkg/diagnostics/diagnostics_init_early.F 137 DIAGNOSTICS_INIT_EARLY
      gdiag( 9) = 'UU      L1      '
./pkg/diagnostics/diagnostics_init_early.F 143 DIAGNOSTICS_INIT_EARLY
      gdiag(10) = 'VV      L1      '
./pkg/diagnostics/diagnostics_init_early.F 149 DIAGNOSTICS_INIT_EARLY
      gdiag(11) = 'SM      MR      '
./pkg/diagnostics/diagnostics_init_early.F 154 DIAGNOSTICS_INIT_EARLY
      gdiag(12) = 'SM      MR      '
./pkg/diagnostics/diagnostics_init_early.F 159 DIAGNOSTICS_INIT_EARLY
      gdiag(13) = 'SMR     MR      '
./pkg/diagnostics/diagnostics_init_early.F 164 DIAGNOSTICS_INIT_EARLY
      gdiag(14) = 'SMR     MR      '
./pkg/diagnostics/diagnostics_init_early.F 169 DIAGNOSTICS_INIT_EARLY
      gdiag(15) = 'SU      MR      '
./pkg/diagnostics/diagnostics_init_early.F 174 DIAGNOSTICS_INIT_EARLY
      gdiag(16) = 'SV      MR      '
./pkg/diagnostics/diagnostics_init_early.F 179 DIAGNOSTICS_INIT_EARLY
      gdiag(17) = 'UUR     MR      '
./pkg/diagnostics/diagnostics_init_early.F 185 DIAGNOSTICS_INIT_EARLY
      gdiag(18) = 'VVR     MR      '
./pkg/diagnostics/diagnostics_init_early.F 191 DIAGNOSTICS_INIT_EARLY
      gdiag(19) = 'SM      ML      '
./pkg/diagnostics/diagnostics_init_early.F 196 DIAGNOSTICS_INIT_EARLY
      gdiag(20) = 'SM      ML      '
./pkg/diagnostics/diagnostics_init_early.F 201 DIAGNOSTICS_INIT_EARLY
      gdiag(21) = 'SM  C   L1      '
./pkg/diagnostics/diagnostics_init_early.F 207 DIAGNOSTICS_INIT_EARLY
      gdiag(22) = 'SM      L1      '
./pkg/diagnostics/diagnostics_init_early.F 80 DIAGNOSTICS_INIT_EARLY
        gdiag(n) = '                '
./pkg/diagnostics/diagnostics_init_early.F 97 DIAGNOSTICS_INIT_EARLY
      gdiag( 1) = 'SM      L1      '
./pkg/diagnostics/diagnostics_interp_vert.F 157 DIAGNOSTICS_INTERP_VERT
           IF ( useFIZHI.AND.gdiag(ndId)(10:10).EQ.'L') THEN
./pkg/diagnostics/diagnostics_interp_vert.F 96 DIAGNOSTICS_INTERP_VERT
     &          gdiag(ndId)(10:10) .EQ. 'L') THEN
./pkg/diagnostics/diagnostics_mnc_out.F 302 DIAGNOSTICS_MNC_OUT
         IF (gdiag(ndId)(2:2) .EQ. 'M') THEN
./pkg/diagnostics/diagnostics_mnc_out.F 307 DIAGNOSTICS_MNC_OUT
         ELSEIF (gdiag(ndId)(2:2) .EQ. 'U') THEN
./pkg/diagnostics/diagnostics_mnc_out.F 312 DIAGNOSTICS_MNC_OUT
         ELSEIF (gdiag(ndId)(2:2) .EQ. 'V') THEN
./pkg/diagnostics/diagnostics_mnc_out.F 317 DIAGNOSTICS_MNC_OUT
         ELSEIF (gdiag(ndId)(2:2) .EQ. 'Z') THEN
./pkg/diagnostics/diagnostics_mnc_out.F 326 DIAGNOSTICS_MNC_OUT
         IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagnostics_mnc_out.F 327 DIAGNOSTICS_MNC_OUT
     &        .AND. (gdiag(ndId)(9:9) .EQ. 'M') ) THEN
./pkg/diagnostics/diagnostics_mnc_out.F 330 DIAGNOSTICS_MNC_OUT
         IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagnostics_mnc_out.F 331 DIAGNOSTICS_MNC_OUT
     &        .AND. (gdiag(ndId)(9:9) .EQ. 'L') ) THEN
./pkg/diagnostics/diagnostics_mnc_out.F 334 DIAGNOSTICS_MNC_OUT
         IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagnostics_mnc_out.F 335 DIAGNOSTICS_MNC_OUT
     &        .AND. (gdiag(ndId)(9:9) .EQ. 'U') ) THEN
./pkg/diagnostics/diagnostics_mnc_out.F 360 DIAGNOSTICS_MNC_OUT
         IF ( useMissingValue.AND.gdiag(ndId)(1:2).EQ.'SM' ) THEN
./pkg/diagnostics/diagnostics_out.F 171 DIAGNOSTICS_OUT
        gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagnostics_out.F 181 DIAGNOSTICS_OUT
           IF ( gdiag(hdiag(ndId))(5:5).EQ.'P' ) ppFld = 2
./pkg/diagnostics/diagnostics_out.F 184 DIAGNOSTICS_OUT
           DO WHILE ( gdiag(nn)(5:5).EQ.'P' )
./pkg/diagnostics/diagnostics_out.F 262 DIAGNOSTICS_OUT
     &         '   Parms: ',gdiag(ndId)
./pkg/diagnostics/diagnostics_out.F 275 DIAGNOSTICS_OUT
     &         '     Counter:',ndiag(ip,1,1),'   Parms: ',gdiag(ndId)
./pkg/diagnostics/diagnostics_set_levels.F 131 DIAGNOSTICS_SET_LEVELS
       gcode = gdiag(n)(1:10)
./pkg/diagnostics/diagnostics_set_levels.F 156 DIAGNOSTICS_SET_LEVELS
       gcode = gdiag(n)(1:10)
./pkg/diagnostics/diagnostics_set_levels.F 215 DIAGNOSTICS_SET_LEVELS
         gcode = gdiag(n)(1:10)
./pkg/diagnostics/diagnostics_set_levels.F 89 DIAGNOSTICS_SET_LEVELS
        g10code = gdiag(n)(10:10)
./pkg/diagnostics/diagnostics_set_pointers.F 216 DIAGNOSTICS_SET_POINTERS
     &         nd, '  ', cdiag(nd), ' , Parms: ', gdiag(nd)(1:10),
./pkg/diagnostics/diagnostics_set_pointers.F 291 DIAGNOSTICS_SET_POINTERS
     &       ' parsing code >>',gdiag(nd),'<<'
./pkg/diagnostics/diagnostics_set_pointers.F 60 DIAGNOSTICS_SET_POINTERS
           IF ( gdiag(nd)(5:5).EQ.'P' ) THEN
./pkg/diagnostics/diagnostics_set_pointers.F 62 DIAGNOSTICS_SET_POINTERS
             IF ( gdiag(mate)(5:5).EQ.'P' ) THEN
./pkg/diagnostics/diagnostics_setdiag.F 103 DIAGNOSTICS_SETDIAG
        flagP = flagD .AND. gdiag(nn)(5:5).EQ.'P'
./pkg/diagnostics/diagnostics_setdiag.F 116 DIAGNOSTICS_SETDIAG
      gcode   = gdiag(nn)(1:10)
./pkg/diagnostics/diagnostics_setdiag.F 64 DIAGNOSTICS_SETDIAG
      diagIsPP = gdiag(ndId)(5:5).EQ.'P'
./pkg/diagnostics/diagnostics_setdiag.F 69 DIAGNOSTICS_SETDIAG
        gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagnostics_sum_levels.F 70 DIAGNOSTICS_SUM_LEVELS
        gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagnostics_utils.F 369 DIAGNOSTICS_SETKLEV
     &   .AND. gdiag(ndId)(10:10).EQ.'X' ) THEN
./pkg/diagnostics/diagnostics_utils.F 372 DIAGNOSTICS_SETKLEV
     &   .AND. gdiag(ndId)(10:10).EQ.'X' ) THEN
./pkg/diagnostics/diagnostics_utils.F 382 DIAGNOSTICS_SETKLEV
      ELSEIF ( gdiag(ndId)(10:10).EQ.'X' ) THEN
./pkg/diagnostics/diagnostics_utils.F 397 DIAGNOSTICS_SETKLEV
     &     ' from diagCode(ndId=', ndId, ')="', gdiag(ndId)(1:10), '"'
./pkg/diagnostics/diagstats_fill.F 122 DIAGSTATS_FILL
        parms1 = gdiag(ndId)(1:8)
./pkg/diagnostics/diagstats_fill.F 232 DIAGSTATS_FILL
     I                  ndId, gdiag(ndId), myThid )
./pkg/diagnostics/diagstats_fill.F 249 DIAGSTATS_FILL
     I                  ndId, gdiag(ndId), myThid )
./pkg/diagnostics/diagstats_fill.F 274 DIAGSTATS_FILL
     I                  ndId, gdiag(ndId), myThid )
./pkg/diagnostics/diagstats_fill.F 297 DIAGSTATS_FILL
     I                  ndId, gdiag(ndId), myThid )
./pkg/diagnostics/diagstats_mnc_out.F 192 DIAGSTATS_MNC_OUT
        IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagstats_mnc_out.F 193 DIAGSTATS_MNC_OUT
     &       .AND. (gdiag(ndId)(9:9) .EQ. 'M') ) THEN
./pkg/diagnostics/diagstats_mnc_out.F 196 DIAGSTATS_MNC_OUT
        IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagstats_mnc_out.F 197 DIAGSTATS_MNC_OUT
     &       .AND. (gdiag(ndId)(9:9) .EQ. 'L') ) THEN
./pkg/diagnostics/diagstats_mnc_out.F 200 DIAGSTATS_MNC_OUT
        IF ( (gdiag(ndId)(10:10) .EQ. 'R')
./pkg/diagnostics/diagstats_mnc_out.F 201 DIAGSTATS_MNC_OUT
     &       .AND. (gdiag(ndId)(9:9) .EQ. 'U') ) THEN
./pkg/diagnostics/diagstats_output.F 122 DIAGSTATS_OUTPUT
     &         '  vol(',j,' ):', statGlob(0,0,j),'  Parms: ',gdiag(ndId)
./pkg/diagnostics/diagstats_output.F 68 DIAGSTATS_OUTPUT
       gcode = gdiag(ndId)(1:10)
./pkg/diagnostics/diagstats_setdiag.F 60 DIAGSTATS_SETDIAG
      gcode   = gdiag(ndId)(1:8)