| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_fill_field.F |
108 |
DIAGNOSTICS_FILL_FIELD |
parms1 = gdiag(ndiagnum)(1:8) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
109 |
DIAGNOSTICS_FILL_FIELD |
IF ( parms1(2:2).EQ.'M' ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
112 |
DIAGNOSTICS_FILL_FIELD |
ELSEIF ( parms1(2:2).EQ.'U' ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
115 |
DIAGNOSTICS_FILL_FIELD |
ELSEIF ( parms1(2:2).EQ.'V' ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
118 |
DIAGNOSTICS_FILL_FIELD |
ELSEIF ( parms1(2:2).EQ.'Z' ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
85 |
DIAGNOSTICS_FILL_FIELD |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagstats_setdiag.F |
109 |
DIAGSTATS_SETDIAG |
IF ( parms1(5:5).EQ.'C') THEN |
|
./pkg/diagnostics/diagstats_setdiag.F |
110 |
DIAGSTATS_SETDIAG |
mate_index = parms1(6:8) |
|
./pkg/diagnostics/diagstats_setdiag.F |
52 |
DIAGSTATS_SETDIAG |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagstats_setdiag.F |
61 |
DIAGSTATS_SETDIAG |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagstats_output.F |
46 |
DIAGSTATS_OUTPUT |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagstats_output.F |
66 |
DIAGSTATS_OUTPUT |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagstats_output.F |
67 |
DIAGSTATS_OUTPUT |
IF ( iSdiag(m,listId).NE.0 .AND. parms1(5:5).NE.'D' ) THEN |
|
./pkg/diagnostics/diagstats_output.F |
70 |
DIAGSTATS_OUTPUT |
IF ( parms1(5:5).EQ.'C' ) THEN |
|
./pkg/diagnostics/diagstats_output.F |
73 |
DIAGSTATS_OUTPUT |
mate_index = parms1(6:8) |
|
./pkg/diagnostics/diagstats_fill.F |
89 |
DIAGSTATS_FILL |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagstats_fill.F |
98 |
DIAGSTATS_FILL |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagstats_fill.F |
99 |
DIAGSTATS_FILL |
IF ( parms1(2:2).EQ.'Z' ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
105 |
DIAGNOSTICS_FRACT_FILL |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
106 |
DIAGNOSTICS_FRACT_FILL |
IF ( parms1(5:5).EQ.'C' ) READ(parms1,'(5X,I3)') mate |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
143 |
DIAGNOSTICS_FRACT_FILL |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
144 |
DIAGNOSTICS_FRACT_FILL |
IF ( parms1(5:5).EQ.'C' ) READ(parms1,'(5X,I3)') mate |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
83 |
DIAGNOSTICS_FRACT_FILL |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagnostics_out.F |
203 |
DIAGNOSTICS_OUT |
parms1 = gdiag(ndId)(1:8) |
|
./pkg/diagnostics/diagnostics_out.F |
206 |
DIAGNOSTICS_OUT |
IF ( parms1(5:5).EQ.'C' ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
208 |
DIAGNOSTICS_OUT |
READ(parms1,'(5X,I3)') mate |
|
./pkg/diagnostics/diagnostics_out.F |
209 |
DIAGNOSTICS_OUT |
ELSEIF ( parms1(1:1).EQ.'U' .OR. parms1(1:1).EQ.'V' ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
211 |
DIAGNOSTICS_OUT |
READ(parms1,'(5X,I3)') mVec |
|
./pkg/diagnostics/diagnostics_out.F |
213 |
DIAGNOSTICS_OUT |
IF ( idiag(md,listId).NE.0 .AND. parms1(5:5).NE.'D' ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
58 |
DIAGNOSTICS_OUT |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagnostics_setdiag.F |
112 |
DIAGNOSTICS_SETDIAG |
IF ( parms1(5:5).EQ.'C') THEN |
|
./pkg/diagnostics/diagnostics_setdiag.F |
113 |
DIAGNOSTICS_SETDIAG |
READ(parms1,'(5X,I3)') mate |
|
./pkg/diagnostics/diagnostics_setdiag.F |
52 |
DIAGNOSTICS_SETDIAG |
CHARACTER*8 parms1 |
|
./pkg/diagnostics/diagnostics_setdiag.F |
60 |
DIAGNOSTICS_SETDIAG |
parms1 = gdiag(ndId)(1:8) |