| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/DIAGNOSTICS.h |
40 |
NO PROCEDURE |
CHARACTER*16 gdiag(ndiagMax) |
|
./pkg/diagnostics/DIAGNOSTICS.h |
46 |
NO PROCEDURE |
& cdiag, gdiag, tdiag, udiag |
|
./pkg/diagnostics/diagnostics_addtolist.F |
101 |
DIAGNOSTICS_ADDTOLIST |
& 'change parser="',gdiag(n),'" & mate=',hdiag(n) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
119 |
DIAGNOSTICS_ADDTOLIST |
gdiag(diagNum) = diagCode |
|
./pkg/diagnostics/diagnostics_addtolist.F |
83 |
DIAGNOSTICS_ADDTOLIST |
IF ( gdiag(n).EQ.diagCode .AND. hdiag(n).EQ.diagMate ) THEN |
|
./pkg/diagnostics/diagnostics_check.F |
157 |
DIAGNOSTICS_CHECK |
& gdiag(nd)(10:10) .EQ. 'L') THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
122 |
DIAGNOSTICS_FILL_FIELD |
parms1 = gdiag(ndiagnum)(1:8) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
108 |
DIAGNOSTICS_FRACT_FILL |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
147 |
DIAGNOSTICS_FRACT_FILL |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagnostics_init_early.F |
104 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 3) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
109 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 4) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
114 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 5) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
119 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 6) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
124 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 7) = 'SU L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
129 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 8) = 'SV L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
134 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 9) = 'UU L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
140 |
DIAGNOSTICS_INIT_EARLY |
gdiag(10) = 'VV L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
146 |
DIAGNOSTICS_INIT_EARLY |
gdiag(11) = 'SM MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
151 |
DIAGNOSTICS_INIT_EARLY |
gdiag(12) = 'SM MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
156 |
DIAGNOSTICS_INIT_EARLY |
gdiag(13) = 'SMR MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
161 |
DIAGNOSTICS_INIT_EARLY |
gdiag(14) = 'SMR MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
166 |
DIAGNOSTICS_INIT_EARLY |
gdiag(15) = 'SU MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
171 |
DIAGNOSTICS_INIT_EARLY |
gdiag(16) = 'SV MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
176 |
DIAGNOSTICS_INIT_EARLY |
gdiag(17) = 'UUR MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
182 |
DIAGNOSTICS_INIT_EARLY |
gdiag(18) = 'VVR MR ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
188 |
DIAGNOSTICS_INIT_EARLY |
gdiag(19) = 'SM ML ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
193 |
DIAGNOSTICS_INIT_EARLY |
gdiag(20) = 'SM ML ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
198 |
DIAGNOSTICS_INIT_EARLY |
gdiag(21) = 'SM C L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
204 |
DIAGNOSTICS_INIT_EARLY |
gdiag(22) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
78 |
DIAGNOSTICS_INIT_EARLY |
gdiag(n) = ' ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
94 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 1) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_init_early.F |
99 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 2) = 'SM L1 ' |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
159 |
DIAGNOSTICS_INTERP_VERT |
IF ( useFIZHI.AND.gdiag(ndId)(10:10).EQ.'L') THEN |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
94 |
DIAGNOSTICS_INTERP_VERT |
& gdiag(ndId)(10:10) .EQ. 'L') THEN |
|
./pkg/diagnostics/diagnostics_out.F |
313 |
DIAGNOSTICS_OUT |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagnostics_out.F |
384 |
DIAGNOSTICS_OUT |
& ' Counter:',ndiag(ip,1,1),' Parms: ',gdiag(ndId) |
|
./pkg/diagnostics/diagnostics_out.F |
501 |
DIAGNOSTICS_OUT |
IF (gdiag(ndId)(2:2) .EQ. 'M') THEN |
|
./pkg/diagnostics/diagnostics_out.F |
506 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'U') THEN |
|
./pkg/diagnostics/diagnostics_out.F |
511 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'V') THEN |
|
./pkg/diagnostics/diagnostics_out.F |
516 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'Z') THEN |
|
./pkg/diagnostics/diagnostics_out.F |
525 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
|
./pkg/diagnostics/diagnostics_out.F |
526 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'M') ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
529 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
|
./pkg/diagnostics/diagnostics_out.F |
530 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'L') ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
533 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
|
./pkg/diagnostics/diagnostics_out.F |
534 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'U') ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
558 |
DIAGNOSTICS_OUT |
& .AND.gdiag(ndId)(1:2).EQ.'SM' |
|
./pkg/diagnostics/diagnostics_set_levels.F |
130 |
DIAGNOSTICS_SET_LEVELS |
gcode = gdiag(n)(1:10) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
205 |
DIAGNOSTICS_SET_LEVELS |
gcode = gdiag(n)(1:10) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
88 |
DIAGNOSTICS_SET_LEVELS |
g10code = gdiag(n)(10:10) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
148 |
DIAGNOSTICS_SET_POINTERS |
& nd, ' ', cdiag(nd), ' , Parms: ', gdiag(nd)(1:10), |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
223 |
DIAGNOSTICS_SET_POINTERS |
& ' parsing code >>',gdiag(nd),'<<' |
|
./pkg/diagnostics/diagnostics_setdiag.F |
60 |
DIAGNOSTICS_SETDIAG |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
69 |
DIAGNOSTICS_SUM_LEVELS |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagnostics_utils.F |
372 |
DIAGNOSTICS_SETKLEV |
& .AND. gdiag(ndId)(10:10).EQ.'X' ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
375 |
DIAGNOSTICS_SETKLEV |
& .AND. gdiag(ndId)(10:10).EQ.'X' ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
385 |
DIAGNOSTICS_SETKLEV |
ELSEIF ( gdiag(ndId)(10:10).EQ.'X' ) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
400 |
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 |
73 |
DIAGSTATS_OUTPUT |
gcode = gdiag(ndId)(1:10) |
|
./pkg/diagnostics/diagstats_setdiag.F |
60 |
DIAGSTATS_SETDIAG |
gcode = gdiag(ndId)(1:8) |