File |
Line number |
Procedure |
Code |
./pkg/diagnostics/diagnostics_set_levels.F |
140 |
DIAGNOSTICS_SET_LEVELS |
& kdiag(n),' |',gdiag(n),'|',udiag(n),'|',tdiag(n)(1:l) |
./pkg/diagnostics/diagnostics_set_levels.F |
143 |
DIAGNOSTICS_SET_LEVELS |
& kdiag(n),' |',gdiag(n),'|',udiag(n),'|' |
./pkg/diagnostics/diagnostics_set_levels.F |
78 |
DIAGNOSTICS_SET_LEVELS |
IF (gdiag(n)(10:10) .EQ. '0') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
80 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .EQ. '1') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
82 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .EQ. 'R') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
84 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .EQ. 'L') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
86 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .EQ. 'M') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
88 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .EQ. 'G') THEN |
./pkg/diagnostics/diagnostics_set_levels.F |
90 |
DIAGNOSTICS_SET_LEVELS |
ELSEIF (gdiag(n)(10:10) .NE. ' ') THEN |
./pkg/diagnostics/DIAGNOSTICS.h |
32 |
NO PROCEDURE |
character*16 gdiag(ndiagMax) |
./pkg/diagnostics/DIAGNOSTICS.h |
39 |
NO PROCEDURE |
common /diagarrays/ gdiag |
./pkg/diagnostics/diagnostics_fill_field.F |
108 |
DIAGNOSTICS_FILL_FIELD |
parms1 = gdiag(ndiagnum)(1:8) |
./pkg/diagnostics/diagnostics_add2list.F |
55 |
DIAGNOSTICS_ADD2LIST |
IF ( gdiag(n).EQ.diagCode ) THEN |
./pkg/diagnostics/diagnostics_add2list.F |
73 |
DIAGNOSTICS_ADD2LIST |
& ' parser=',gdiag(n),'< cannot be changed' |
./pkg/diagnostics/diagnostics_add2list.F |
94 |
DIAGNOSTICS_ADD2LIST |
gdiag(diagNum) = diagCode |
./pkg/diagnostics/diagnostics_out.F |
210 |
DIAGNOSTICS_OUT |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_out.F |
256 |
DIAGNOSTICS_OUT |
& ' Counter:',ndiag(ip,1,1),' Parms: ',gdiag(ndId) |
./pkg/diagnostics/diagnostics_out.F |
322 |
DIAGNOSTICS_OUT |
if(gdiag(ndId)(10:10) .EQ. 'L')then |
./pkg/diagnostics/diagnostics_out.F |
381 |
DIAGNOSTICS_OUT |
if(gdiag(ndId)(10:10).eq.'R') then |
./pkg/diagnostics/diagnostics_out.F |
388 |
DIAGNOSTICS_OUT |
elseif(gdiag(ndId)(10:10).eq.'L') then |
./pkg/diagnostics/diagnostics_out.F |
462 |
DIAGNOSTICS_OUT |
IF (gdiag(ndId)(2:2) .EQ. 'M') THEN |
./pkg/diagnostics/diagnostics_out.F |
467 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'U') THEN |
./pkg/diagnostics/diagnostics_out.F |
472 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'V') THEN |
./pkg/diagnostics/diagnostics_out.F |
477 |
DIAGNOSTICS_OUT |
ELSEIF (gdiag(ndId)(2:2) .EQ. 'Z') THEN |
./pkg/diagnostics/diagnostics_out.F |
486 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagnostics_out.F |
487 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'M') ) THEN |
./pkg/diagnostics/diagnostics_out.F |
490 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagnostics_out.F |
491 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'L') ) THEN |
./pkg/diagnostics/diagnostics_out.F |
494 |
DIAGNOSTICS_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagnostics_out.F |
495 |
DIAGNOSTICS_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'U') ) THEN |
./pkg/diagnostics/diagstats_mnc_out.F |
190 |
DIAGSTATS_MNC_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagstats_mnc_out.F |
191 |
DIAGSTATS_MNC_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'M') ) THEN |
./pkg/diagnostics/diagstats_mnc_out.F |
194 |
DIAGSTATS_MNC_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagstats_mnc_out.F |
195 |
DIAGSTATS_MNC_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'L') ) THEN |
./pkg/diagnostics/diagstats_mnc_out.F |
198 |
DIAGSTATS_MNC_OUT |
IF ( (gdiag(ndId)(10:10) .EQ. 'R') |
./pkg/diagnostics/diagstats_mnc_out.F |
199 |
DIAGSTATS_MNC_OUT |
& .AND. (gdiag(ndId)(9:9) .EQ. 'U') ) THEN |
./pkg/diagnostics/diagstats_fill.F |
206 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
./pkg/diagnostics/diagstats_fill.F |
223 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
./pkg/diagnostics/diagstats_fill.F |
98 |
DIAGSTATS_FILL |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_init_early.F |
102 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 5) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
107 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 6) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
112 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 7) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
117 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 8) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
122 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 9) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
127 |
DIAGNOSTICS_INIT_EARLY |
gdiag(10) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
132 |
DIAGNOSTICS_INIT_EARLY |
gdiag(11) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
137 |
DIAGNOSTICS_INIT_EARLY |
gdiag(12) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
142 |
DIAGNOSTICS_INIT_EARLY |
gdiag(13) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
147 |
DIAGNOSTICS_INIT_EARLY |
gdiag(14) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
152 |
DIAGNOSTICS_INIT_EARLY |
gdiag(15) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
157 |
DIAGNOSTICS_INIT_EARLY |
gdiag(16) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
162 |
DIAGNOSTICS_INIT_EARLY |
gdiag(17) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
167 |
DIAGNOSTICS_INIT_EARLY |
gdiag(18) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
172 |
DIAGNOSTICS_INIT_EARLY |
gdiag(19) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
177 |
DIAGNOSTICS_INIT_EARLY |
gdiag(20) = 'SM ML ' |
./pkg/diagnostics/diagnostics_init_early.F |
182 |
DIAGNOSTICS_INIT_EARLY |
gdiag(21) = 'SM C022L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
187 |
DIAGNOSTICS_INIT_EARLY |
gdiag(22) = 'SM D L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
69 |
DIAGNOSTICS_INIT_EARLY |
gdiag(n) = ' ' |
./pkg/diagnostics/diagnostics_init_early.F |
82 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 1) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
87 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 2) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
92 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 3) = 'SM L1 ' |
./pkg/diagnostics/diagnostics_init_early.F |
97 |
DIAGNOSTICS_INIT_EARLY |
gdiag( 4) = 'SM L1 ' |
./pkg/diagnostics/diagstats_setdiag.F |
61 |
DIAGSTATS_SETDIAG |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_fract_fill.F |
104 |
DIAGNOSTICS_FRACT_FILL |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_fract_fill.F |
142 |
DIAGNOSTICS_FRACT_FILL |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_setdiag.F |
61 |
DIAGNOSTICS_SETDIAG |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagstats_output.F |
116 |
DIAGSTATS_OUTPUT |
& ' vol(',j,' ):', statGlob(0,0,j),' Parms: ',gdiag(ndId) |
./pkg/diagnostics/diagstats_output.F |
66 |
DIAGSTATS_OUTPUT |
parms1 = gdiag(ndId)(1:8) |
./pkg/diagnostics/diagnostics_set_pointers.F |
131 |
DIAGNOSTICS_SET_POINTERS |
mate_index = gdiag(nd)(6:8) |
./pkg/diagnostics/diagnostics_set_pointers.F |
144 |
DIAGNOSTICS_SET_POINTERS |
& nd, ' ', cdiag(nd), ' , Parms: ', gdiag(nd) |
./pkg/diagnostics/diagnostics_set_pointers.F |
208 |
DIAGNOSTICS_SET_POINTERS |
& ' parsing code >>',gdiag(nd),'<<' |