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) |