Symbol Description Uses
parms1 9



File Line number Procedure Code
./pkg/diagnostics/diagnostics_fill_field.F 122 DIAGNOSTICS_FILL_FIELD
        parms1 = gdiag(ndiagnum)(1:8)
./pkg/diagnostics/diagnostics_fill_field.F 123 DIAGNOSTICS_FILL_FIELD
        IF ( parms1(2:2).EQ.'M' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 126 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'U' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 129 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'V' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 132 DIAGNOSTICS_FILL_FIELD
        ELSEIF ( parms1(2:2).EQ.'Z' ) THEN
./pkg/diagnostics/diagnostics_fill_field.F 99 DIAGNOSTICS_FILL_FIELD
      CHARACTER*8 parms1
./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