Symbol Description Uses
parms1 9



File Line number Procedure Code
./pkg/diagnostics/diagnostics_fill_field.F 102 DIAGNOSTICS_FILL_FIELD
      CHARACTER*8 parms1
./pkg/diagnostics/diagnostics_fill_field.F 126 DIAGNOSTICS_FILL_FIELD
        parms1 = gdiag(ndId)(1:8)
./pkg/diagnostics/diagnostics_fill_field.F 127 DIAGNOSTICS_FILL_FIELD
        IF ( parms1(2:2).EQ.'M' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 131 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'U' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 135 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'V' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 139 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'Z' ) THEN
./pkg/diagnostics/diagstats_fill.F 109 DIAGSTATS_FILL
      CHARACTER*8 parms1
./pkg/diagnostics/diagstats_fill.F 122 DIAGSTATS_FILL
        parms1 = gdiag(ndId)(1:8)
./pkg/diagnostics/diagstats_fill.F 123 DIAGSTATS_FILL
        IF ( parms1(2:2).EQ.'Z' ) THEN