| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_gl.F |
102 |
MDSREADFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1070 |
MDSREADFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1074 |
MDSREADFIELD_2D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
1087 |
MDSREADFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1091 |
MDSREADFIELD_2D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
1210 |
MDSWRITEFIELD_2D_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl.F |
1262 |
MDSWRITEFIELD_2D_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl.F |
1315 |
MDSWRITEFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1489 |
MDSWRITEFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1493 |
MDSWRITEFIELD_2D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
1506 |
MDSWRITEFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
1510 |
MDSWRITEFIELD_2D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
18 |
MDSREADFIELD_3D_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl.F |
283 |
MDSREADFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
287 |
MDSREADFIELD_3D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
300 |
MDSREADFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
304 |
MDSREADFIELD_3D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
423 |
MDSWRITEFIELD_3D_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl.F |
475 |
MDSWRITEFIELD_3D_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl.F |
527 |
MDSWRITEFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
60 |
MDSREADFIELD_3D_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl.F |
700 |
MDSWRITEFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
704 |
MDSWRITEFIELD_3D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
717 |
MDSWRITEFIELD_3D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl.F |
721 |
MDSWRITEFIELD_3D_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl.F |
804 |
MDSREADFIELD_2D_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl.F |
846 |
MDSREADFIELD_2D_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl.F |
889 |
MDSREADFIELD_2D_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
186 |
MDSREADFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
18 |
MDSREADFIELD_XZ_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl_slice.F |
190 |
MDSREADFIELD_XZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
203 |
MDSREADFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
207 |
MDSREADFIELD_XZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
259 |
MDSREADFIELD_YZ_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl_slice.F |
301 |
MDSREADFIELD_YZ_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl_slice.F |
327 |
MDSREADFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
426 |
MDSREADFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
430 |
MDSREADFIELD_YZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
443 |
MDSREADFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
447 |
MDSREADFIELD_YZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
499 |
MDSWRITEFIELD_XZ_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl_slice.F |
551 |
MDSWRITEFIELD_XZ_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl_slice.F |
586 |
MDSWRITEFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
60 |
MDSREADFIELD_XZ_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl_slice.F |
645 |
MDSWRITEFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
649 |
MDSWRITEFIELD_XZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
662 |
MDSWRITEFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
666 |
MDSWRITEFIELD_XZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
740 |
MDSWRITEFIELD_YZ_GL |
I arrType, |
|
./pkg/mdsio/mdsio_gl_slice.F |
792 |
MDSWRITEFIELD_YZ_GL |
character*(2) arrType |
|
./pkg/mdsio/mdsio_gl_slice.F |
827 |
MDSWRITEFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
86 |
MDSREADFIELD_XZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
886 |
MDSWRITEFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
890 |
MDSWRITEFIELD_YZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
903 |
MDSWRITEFIELD_YZ_GL |
if (arrType .eq. 'RS') then |
|
./pkg/mdsio/mdsio_gl_slice.F |
907 |
MDSWRITEFIELD_YZ_GL |
elseif (arrType .eq. 'RL') then |
|
./pkg/mdsio/mdsio_read_field.F |
13 |
MDS_READ_FIELD |
I arrType, |
|
./pkg/mdsio/mdsio_read_field.F |
322 |
MDS_READ_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
325 |
MDS_READ_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
343 |
MDS_READ_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
346 |
MDS_READ_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
530 |
MDS_READ_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
533 |
MDS_READ_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
544 |
MDS_READ_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
547 |
MDS_READ_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
85 |
MDS_READ_FIELD |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_read_section.F |
20 |
MDS_READ_SEC_XZ |
I arrType, |
|
./pkg/mdsio/mdsio_read_section.F |
230 |
MDS_READ_SEC_XZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
233 |
MDS_READ_SEC_XZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
247 |
MDS_READ_SEC_XZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
250 |
MDS_READ_SEC_XZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
297 |
MDS_READ_SEC_YZ |
I arrType, |
|
./pkg/mdsio/mdsio_read_section.F |
346 |
MDS_READ_SEC_YZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_read_section.F |
508 |
MDS_READ_SEC_YZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
511 |
MDS_READ_SEC_YZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
525 |
MDS_READ_SEC_YZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
528 |
MDS_READ_SEC_YZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_read_section.F |
69 |
MDS_READ_SEC_XZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_read_tape.F |
12 |
MDS_READ_TAPE |
I arrType, |
|
./pkg/mdsio/mdsio_read_tape.F |
268 |
MDS_READ_TAPE |
IF ( arrType.EQ.'R4' ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
278 |
MDS_READ_TAPE |
ELSEIF ( arrType.EQ.'R8' ) THEN |
|
./pkg/mdsio/mdsio_read_tape.F |
45 |
MDS_READ_TAPE |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_readvec_loc.F |
13 |
MDS_READVEC_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_readvec_loc.F |
207 |
MDS_READVEC_LOC |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
210 |
MDS_READVEC_LOC |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
63 |
MDS_READVEC_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_field.F |
117 |
MDSREADFIELD_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_field.F |
128 |
MDSREADFIELD_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_field.F |
130 |
MDSREADFIELD_LOC |
I fName, filePrec, .TRUE., arrType, nNz, 1, nNz, |
|
./pkg/mdsio/mdsio_rw_field.F |
135 |
MDSREADFIELD_LOC |
I fName, filePrec, .TRUE., arrType, nNz, 1, nNz, |
|
./pkg/mdsio/mdsio_rw_field.F |
153 |
MDSWRITEFIELD |
I arrType, |
|
./pkg/mdsio/mdsio_rw_field.F |
188 |
MDSWRITEFIELD |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_field.F |
200 |
MDSWRITEFIELD |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_field.F |
203 |
MDSWRITEFIELD |
I arrType, nNz, 1, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_field.F |
208 |
MDSWRITEFIELD |
I arrType, nNz, 1, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_field.F |
20 |
MDSREADFIELD |
I arrType, |
|
./pkg/mdsio/mdsio_rw_field.F |
225 |
MDSWRITEFIELD_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_field.F |
260 |
MDSWRITEFIELD_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_field.F |
272 |
MDSWRITEFIELD_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_field.F |
275 |
MDSWRITEFIELD_LOC |
I arrType, nNz, 1, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_field.F |
280 |
MDSWRITEFIELD_LOC |
I arrType, nNz, 1, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_field.F |
51 |
MDSREADFIELD |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_field.F |
62 |
MDSREADFIELD |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_field.F |
64 |
MDSREADFIELD |
I fName, filePrec, .FALSE., arrType, nNz, 1, nNz, |
|
./pkg/mdsio/mdsio_rw_field.F |
69 |
MDSREADFIELD |
I fName, filePrec, .FALSE., arrType, nNz, 1, nNz, |
|
./pkg/mdsio/mdsio_rw_field.F |
86 |
MDSREADFIELD_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
119 |
MDSREADFIELDYZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
130 |
MDSREADFIELDYZ |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
132 |
MDSREADFIELDYZ |
I fName, filePrec, .FALSE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
137 |
MDSREADFIELDYZ |
I fName, filePrec, .FALSE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
154 |
MDSREADFIELDXZ_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
184 |
MDSREADFIELDXZ_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
195 |
MDSREADFIELDXZ_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
197 |
MDSREADFIELDXZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
202 |
MDSREADFIELDXZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
219 |
MDSREADFIELDYZ_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
249 |
MDSREADFIELDYZ_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
24 |
MDSREADFIELDXZ |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
260 |
MDSREADFIELDYZ_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
262 |
MDSREADFIELDYZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
267 |
MDSREADFIELDYZ_LOC |
I fName, filePrec, .TRUE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
285 |
MDSWRITEFIELDXZ |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
319 |
MDSWRITEFIELDXZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
331 |
MDSWRITEFIELDXZ |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
334 |
MDSWRITEFIELDXZ |
I arrType, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_slice.F |
339 |
MDSWRITEFIELDXZ |
I arrType, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_slice.F |
356 |
MDSWRITEFIELDYZ |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
390 |
MDSWRITEFIELDYZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
402 |
MDSWRITEFIELDYZ |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
405 |
MDSWRITEFIELDYZ |
I arrType, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_slice.F |
410 |
MDSWRITEFIELDYZ |
I arrType, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_slice.F |
427 |
MDSWRITEFIELDXZ_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
461 |
MDSWRITEFIELDXZ_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
473 |
MDSWRITEFIELDXZ_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
476 |
MDSWRITEFIELDXZ_LOC |
I arrType, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_slice.F |
481 |
MDSWRITEFIELDXZ_LOC |
I arrType, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_slice.F |
498 |
MDSWRITEFIELDYZ_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_rw_slice.F |
532 |
MDSWRITEFIELDYZ_LOC |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
544 |
MDSWRITEFIELDYZ_LOC |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
547 |
MDSWRITEFIELDYZ_LOC |
I arrType, nNz, arr, dummyRS, |
|
./pkg/mdsio/mdsio_rw_slice.F |
54 |
MDSREADFIELDXZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_rw_slice.F |
552 |
MDSWRITEFIELDYZ_LOC |
I arrType, nNz, dummyRL, arr, |
|
./pkg/mdsio/mdsio_rw_slice.F |
65 |
MDSREADFIELDXZ |
IF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_rw_slice.F |
67 |
MDSREADFIELDXZ |
I fName, filePrec, .FALSE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
72 |
MDSREADFIELDXZ |
I fName, filePrec, .FALSE., arrType, nNz, |
|
./pkg/mdsio/mdsio_rw_slice.F |
89 |
MDSREADFIELDYZ |
I arrType, |
|
./pkg/mdsio/mdsio_write_field.F |
14 |
MDS_WRITE_FIELD |
I arrType, |
|
./pkg/mdsio/mdsio_write_field.F |
292 |
MDS_WRITE_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
295 |
MDS_WRITE_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
300 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: illegal value for arrType=', arrType |
|
./pkg/mdsio/mdsio_write_field.F |
313 |
MDS_WRITE_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
316 |
MDS_WRITE_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
321 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: illegal value for arrType=', arrType |
|
./pkg/mdsio/mdsio_write_field.F |
377 |
MDS_WRITE_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
380 |
MDS_WRITE_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
385 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: illegal value for arrType=', arrType |
|
./pkg/mdsio/mdsio_write_field.F |
391 |
MDS_WRITE_FIELD |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
394 |
MDS_WRITE_FIELD |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
399 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: illegal value for arrType=', arrType |
|
./pkg/mdsio/mdsio_write_field.F |
99 |
MDS_WRITE_FIELD |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_write_section.F |
197 |
MDS_WRITE_SEC_XZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
200 |
MDS_WRITE_SEC_XZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
214 |
MDS_WRITE_SEC_XZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
217 |
MDS_WRITE_SEC_XZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
21 |
MDS_WRITE_SEC_XZ |
I arrType, |
|
./pkg/mdsio/mdsio_write_section.F |
275 |
MDS_WRITE_SEC_YZ |
I arrType, |
|
./pkg/mdsio/mdsio_write_section.F |
329 |
MDS_WRITE_SEC_YZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_write_section.F |
450 |
MDS_WRITE_SEC_YZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
453 |
MDS_WRITE_SEC_YZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
467 |
MDS_WRITE_SEC_YZ |
IF (arrType .EQ. 'RS') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
470 |
MDS_WRITE_SEC_YZ |
ELSEIF (arrType .EQ. 'RL') THEN |
|
./pkg/mdsio/mdsio_write_section.F |
75 |
MDS_WRITE_SEC_XZ |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_write_tape.F |
106 |
MDS_WRITE_TAPE |
ELSEIF ( arrType.EQ.'R8' ) THEN |
|
./pkg/mdsio/mdsio_write_tape.F |
13 |
MDS_WRITE_TAPE |
I arrType, |
|
./pkg/mdsio/mdsio_write_tape.F |
51 |
MDS_WRITE_TAPE |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_write_tape.F |
96 |
MDS_WRITE_TAPE |
IF ( arrType.EQ.'R4' ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
13 |
MDS_WRITELOCAL |
I arrType, |
|
./pkg/mdsio/mdsio_writelocal.F |
223 |
MDS_WRITELOCAL |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
226 |
MDS_WRITELOCAL |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
237 |
MDS_WRITELOCAL |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
240 |
MDS_WRITELOCAL |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
91 |
MDS_WRITELOCAL |
CHARACTER*(2) arrType |
|
./pkg/mdsio/mdsio_writevec_loc.F |
13 |
MDS_WRITEVEC_LOC |
I arrType, |
|
./pkg/mdsio/mdsio_writevec_loc.F |
188 |
MDS_WRITEVEC_LOC |
IF ( arrType.EQ.'RS' ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
191 |
MDS_WRITEVEC_LOC |
ELSEIF ( arrType.EQ.'RL' ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
64 |
MDS_WRITEVEC_LOC |
CHARACTER*(2) arrType |
|
./pkg/diagnostics/diagnostics_fill.F |
104 |
DIAGNOSTICS_FILL |
I scaleFact, 1, arrType, wFac, |
|
./pkg/diagnostics/diagnostics_fill.F |
145 |
DIAGNOSTICS_FILL |
I scaleFact, 1, arrType, 0, |
|
./pkg/diagnostics/diagnostics_fill.F |
68 |
DIAGNOSTICS_FILL |
INTEGER arrType, wFac |
|
./pkg/diagnostics/diagnostics_fill.F |
81 |
DIAGNOSTICS_FILL |
arrType = 0 |
|
./pkg/diagnostics/diagnostics_fill_field.F |
18 |
DIAGNOSTICS_FILL_FIELD |
I scaleFact, power, arrType, nLevFrac, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
233 |
DIAGNOSTICS_FILL_FIELD |
I scaleFact, power, arrType, useFract, sizF, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
242 |
DIAGNOSTICS_FILL_FIELD |
I scaleFact, power, arrType, thickFac, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
259 |
DIAGNOSTICS_FILL_FIELD |
I scaleFact, power, arrType, useFract, sizF, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
268 |
DIAGNOSTICS_FILL_FIELD |
I scaleFact, power, arrType, thickFac, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
295 |
DIAGNOSTICS_HF_CUMUL |
I scaleFact, power, arrType, thickFac, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
339 |
DIAGNOSTICS_HF_CUMUL |
INTEGER arrType, thickFac |
|
./pkg/diagnostics/diagnostics_fill_field.F |
355 |
DIAGNOSTICS_HF_CUMUL |
IF ( arrType.EQ.0 .OR. arrType.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
361 |
DIAGNOSTICS_HF_CUMUL |
ELSEIF ( arrType.EQ.2 .OR. arrType.EQ.3 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
419 |
DIAGNOSTICS_CUMULATE |
I scaleFact, power, arrType, useFract, sizF, |
|
./pkg/diagnostics/diagnostics_fill_field.F |
464 |
DIAGNOSTICS_CUMULATE |
INTEGER arrType |
|
./pkg/diagnostics/diagnostics_fill_field.F |
483 |
DIAGNOSTICS_CUMULATE |
IF ( arrType.EQ.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
492 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
501 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.2 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
510 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.3 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
526 |
DIAGNOSTICS_CUMULATE |
IF ( arrType.EQ.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
534 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
542 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.2 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
550 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.3 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
564 |
DIAGNOSTICS_CUMULATE |
IF ( arrType.EQ.0 .OR. arrType.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
572 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.2 .OR. arrType.EQ.3 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
586 |
DIAGNOSTICS_CUMULATE |
IF ( arrType.EQ.0 .OR. arrType.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
597 |
DIAGNOSTICS_CUMULATE |
ELSEIF ( arrType.EQ.2 .OR. arrType.EQ.3 ) THEN |
|
./pkg/diagnostics/diagnostics_fill_field.F |
84 |
DIAGNOSTICS_FILL_FIELD |
INTEGER arrType |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
104 |
DIAGNOSTICS_FILL_RS |
I scaleFact, 1, arrType, wFac, |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
147 |
DIAGNOSTICS_FILL_RS |
I scaleFact, 1, arrType, 0, |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
68 |
DIAGNOSTICS_FILL_RS |
INTEGER arrType, wFac |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
81 |
DIAGNOSTICS_FILL_RS |
arrType = 2 |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
132 |
DIAGNOSTICS_FRACT_FILL |
I scaleFact, power, arrType, nLevFract, |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
189 |
DIAGNOSTICS_FRACT_FILL |
I scaleFact, power, arrType, nLevFract, |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
85 |
DIAGNOSTICS_FRACT_FILL |
INTEGER arrType |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
96 |
DIAGNOSTICS_FRACT_FILL |
arrType = 0 |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
106 |
DIAGNOSTICS_SCALE_FILL |
I scaleFact, power, arrType, wFac, |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
147 |
DIAGNOSTICS_SCALE_FILL |
I scaleFact, power, arrType, 0, |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
72 |
DIAGNOSTICS_SCALE_FILL |
INTEGER arrType, wFac |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
84 |
DIAGNOSTICS_SCALE_FILL |
arrType = 0 |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
106 |
DIAGNOSTICS_SCALE_FILL_RS |
I scaleFact, power, arrType, wFac, |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
149 |
DIAGNOSTICS_SCALE_FILL_RS |
I scaleFact, power, arrType, 0, |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
72 |
DIAGNOSTICS_SCALE_FILL_RS |
INTEGER arrType, wFac |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
84 |
DIAGNOSTICS_SCALE_FILL_RS |
arrType = 2 |
|
./pkg/diagnostics/diagstats_fill.F |
217 |
DIAGSTATS_FILL |
IF ( arrType.EQ.0 .OR. ( arrType.EQ.1 .AND. .NOT.useFract ) ) THEN |
|
./pkg/diagnostics/diagstats_fill.F |
21 |
DIAGSTATS_FILL |
I scaleFact, power, arrType, nLevFract, |
|
./pkg/diagnostics/diagstats_fill.F |
264 |
DIAGSTATS_FILL |
I arrType, useFract, sizF, |
|
./pkg/diagnostics/diagstats_fill.F |
287 |
DIAGSTATS_FILL |
I arrType, useFract, sizF, |
|
./pkg/diagnostics/diagstats_fill.F |
320 |
DIAGSTATS_TO_RL |
I arrType, useFract, sizF, |
|
./pkg/diagnostics/diagstats_fill.F |
363 |
DIAGSTATS_TO_RL |
INTEGER arrType |
|
./pkg/diagnostics/diagstats_fill.F |
372 |
DIAGSTATS_TO_RL |
IF ( arrType.LE.1 ) THEN |
|
./pkg/diagnostics/diagstats_fill.F |
388 |
DIAGSTATS_TO_RL |
IF ( arrType.EQ.0 .OR. arrType.EQ.2 ) THEN |
|
./pkg/diagnostics/diagstats_fill.F |
91 |
DIAGSTATS_FILL |
INTEGER arrType |