| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_interp.F |
131 |
EXF_INTERP |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp.F |
18 |
EXF_INTERP |
I irecord, xG_in, yG, |
|
./pkg/exf/exf_interp.F |
321 |
EXF_INTERP |
& ' EXF_INTERP: file="',inFile(1:l),'", rec=', irecord, |
|
./pkg/exf/exf_interp.F |
361 |
EXF_INTERP |
& 'EXF_INTERP: file="', inFile(1:l), '", rec=', irecord |
|
./pkg/exf/exf_interp.F |
421 |
EXF_INTERP |
& 'EXF_INTERP: file="', inFile(1:l), '", rec=', irecord, |
|
./pkg/exf/exf_interp.F |
451 |
EXF_INTERP |
I inFile, irecord, method, |
|
./pkg/exf/exf_interp.F |
59 |
EXF_INTERP |
INTEGER filePrec, irecord, nxIn, nyIn |
|
./pkg/exf/exf_interp_read.F |
12 |
EXF_INTERP_READ |
I irecord, nx_in, ny_in, myThid ) |
|
./pkg/exf/exf_interp_read.F |
140 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r4 |
|
./pkg/exf/exf_interp_read.F |
142 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r4(i),i=1,nx_in*ny_in) |
|
./pkg/exf/exf_interp_read.F |
149 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r8 |
|
./pkg/exf/exf_interp_read.F |
151 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r8(i),i=1,nx_in*ny_in) |
|
./pkg/exf/exf_interp_read.F |
37 |
EXF_INTERP_READ |
INTEGER filePrec, irecord, nx_in, ny_in |
|
./pkg/exf/exf_interp_uv.F |
12 |
EXF_INTERP_UV |
I inFileU, inFileV, filePrec, irecord, |
|
./pkg/exf/exf_interp_uv.F |
145 |
EXF_INTERP_UV |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
149 |
EXF_INTERP_UV |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
343 |
EXF_INTERP_UV |
& ' EXF_INTERP_UV: fileU="',inFileU(1:l),'", rec=', irecord, |
|
./pkg/exf/exf_interp_uv.F |
387 |
EXF_INTERP_UV |
& 'EXF_INTERP_UV: fileU="',inFileU(1:l),'", rec=',irecord |
|
./pkg/exf/exf_interp_uv.F |
447 |
EXF_INTERP_UV |
& 'EXF_INTERP_UV: file="', inFileU(1:l), '", rec=', irecord, |
|
./pkg/exf/exf_interp_uv.F |
477 |
EXF_INTERP_UV |
I inFileU, irecord, methodU, |
|
./pkg/exf/exf_interp_uv.F |
485 |
EXF_INTERP_UV |
I inFileV, irecord, methodV, |
|
./pkg/exf/exf_interp_uv.F |
65 |
EXF_INTERP_UV |
INTEGER filePrec, irecord, nxIn, nyIn |
|
./pkg/exf/exf_interpolate.F |
103 |
EXF_INTERPOLATE |
INTEGER irecord, method |
|
./pkg/exf/exf_interpolate.F |
238 |
EXF_INTERPOLATE |
& 'EXF_INTERPOLATE: file="', inFile(1:l), '", rec=', irecord |
|
./pkg/exf/exf_interpolate.F |
63 |
EXF_INTERPOLATE |
I inFile, irecord, method, |
|
./pkg/flt/flt_traj.F |
233 |
FLT_TRAJ |
irecord = npart_read+ip+1 |
|
./pkg/flt/flt_traj.F |
234 |
FLT_TRAJ |
IF ( ip.NE.npart_tile(bi,bj) ) irecord = -irecord |
|
./pkg/flt/flt_traj.F |
237 |
FLT_TRAJ |
I bi, bj, irecord, myIter, myThid ) |
|
./pkg/flt/flt_traj.F |
57 |
FLT_TRAJ |
INTEGER fp, ioUnit, irecord |
|
./pkg/flt/flt_up.F |
231 |
FLT_UP |
irecord = npart_read+ip+1 |
|
./pkg/flt/flt_up.F |
232 |
FLT_UP |
IF ( ip.NE.npart_tile(bi,bj) ) irecord = -irecord |
|
./pkg/flt/flt_up.F |
235 |
FLT_UP |
& bi, bj, irecord, myIter, myThid ) |
|
./pkg/flt/flt_up.F |
54 |
FLT_UP |
INTEGER fp, ioUnit, irecord |
|
./pkg/flt/flt_write_pickup.F |
43 |
FLT_WRITE_PICKUP |
INTEGER ioUnit, irecord |
|
./pkg/flt/flt_write_pickup.F |
92 |
FLT_WRITE_PICKUP |
irecord = ip+1 |
|
./pkg/flt/flt_write_pickup.F |
93 |
FLT_WRITE_PICKUP |
IF ( ip.NE.npart_tile(bi,bj) ) irecord = -irecord |
|
./pkg/flt/flt_write_pickup.F |
96 |
FLT_WRITE_PICKUP |
& bi,bj,irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1059 |
MDSREADFIELD_2D_GL |
& + nSx*nPx*Ny*nLocz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
1063 |
MDSREADFIELD_2D_GL |
irec=j + sNy*(k-1) + sNy*nLocz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
111 |
MDSREADFIELD_3D_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
113 |
MDSREADFIELD_3D_GL |
& ' MDSREADFIELD_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl.F |
1144 |
MDSREADFIELD_2D_GL |
irec = k+nNz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
1213 |
MDSWRITEFIELD_2D_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl.F |
1269 |
MDSWRITEFIELD_2D_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl.F |
1324 |
MDSWRITEFIELD_2D_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
1326 |
MDSWRITEFIELD_2D_GL |
& ' MDSWRITEFIELD_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl.F |
1364 |
MDSWRITEFIELD_2D_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
1394 |
MDSWRITEFIELD_2D_GL |
irec=k+nLocz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
1446 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1468 |
MDSWRITEFIELD_2D_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
1487 |
MDSWRITEFIELD_2D_GL |
irec=j + sNy*(k-1) + sNy*nLocz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
1564 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
21 |
MDSREADFIELD_3D_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl.F |
272 |
MDSREADFIELD_3D_GL |
& + nSx*nPx*Ny*nNz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
276 |
MDSREADFIELD_3D_GL |
irec=j + sNy*(k-1) + sNy*Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
357 |
MDSREADFIELD_3D_GL |
irec = k+nNz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
426 |
MDSWRITEFIELD_3D_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl.F |
481 |
MDSWRITEFIELD_3D_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl.F |
536 |
MDSWRITEFIELD_3D_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
538 |
MDSWRITEFIELD_3D_GL |
& ' MDSWRITEFIELD_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl.F |
575 |
MDSWRITEFIELD_3D_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
605 |
MDSWRITEFIELD_3D_GL |
irec=k+nNz*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
63 |
MDSREADFIELD_3D_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl.F |
657 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
679 |
MDSWRITEFIELD_3D_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
698 |
MDSWRITEFIELD_3D_GL |
irec=j + sNy*(k-1) + sNy*Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl.F |
775 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
807 |
MDSREADFIELD_2D_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl.F |
850 |
MDSREADFIELD_2D_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl.F |
898 |
MDSREADFIELD_2D_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl.F |
900 |
MDSREADFIELD_2D_GL |
& ' MDSREADFIELD_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
180 |
MDSREADFIELD_XZ_GL |
irec=k + Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl_slice.F |
21 |
MDSREADFIELD_XZ_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl_slice.F |
262 |
MDSREADFIELD_YZ_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl_slice.F |
304 |
MDSREADFIELD_YZ_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
336 |
MDSREADFIELD_YZ_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
338 |
MDSREADFIELD_YZ_GL |
& ' MDSREADFIELD_YZ_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
420 |
MDSREADFIELD_YZ_GL |
irec=k + Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl_slice.F |
502 |
MDSWRITEFIELD_XZ_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl_slice.F |
557 |
MDSWRITEFIELD_XZ_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
595 |
MDSWRITEFIELD_XZ_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
597 |
MDSWRITEFIELD_XZ_GL |
& ' MDSWRITEFIELD_XZ_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
625 |
MDSWRITEFIELD_XZ_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
63 |
MDSREADFIELD_XZ_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
643 |
MDSWRITEFIELD_XZ_GL |
irec=k + Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl_slice.F |
718 |
MDSWRITEFIELD_XZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
743 |
MDSWRITEFIELD_YZ_GL |
I irecord, |
|
./pkg/mdsio/mdsio_gl_slice.F |
798 |
MDSWRITEFIELD_YZ_GL |
integer irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
836 |
MDSWRITEFIELD_YZ_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
838 |
MDSWRITEFIELD_YZ_GL |
& ' MDSWRITEFIELD_YZ_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_gl_slice.F |
866 |
MDSWRITEFIELD_YZ_GL |
if (irecord .EQ. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
884 |
MDSWRITEFIELD_YZ_GL |
irec=k + Nr*(irecord-1) |
|
./pkg/mdsio/mdsio_gl_slice.F |
959 |
MDSWRITEFIELD_YZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
95 |
MDSREADFIELD_XZ_GL |
if (irecord .LT. 1) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
97 |
MDSREADFIELD_XZ_GL |
& ' MDSREADFIELD_XZ_GL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_read_field.F |
164 |
MDS_READ_FIELD |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
16 |
MDS_READ_FIELD |
I irecord, |
|
./pkg/mdsio/mdsio_read_field.F |
170 |
MDS_READ_FIELD |
& ' MDS_READ_FIELD: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_read_field.F |
295 |
MDS_READ_FIELD |
irec = 1 + k-kLo + (irecord-1)*nNz |
|
./pkg/mdsio/mdsio_read_field.F |
434 |
MDS_READ_FIELD |
& +( k-kLo + (irecord-1)*nNz )*global_nTx*ySize |
|
./pkg/mdsio/mdsio_read_field.F |
486 |
MDS_READ_FIELD |
irec = irecord |
|
./pkg/mdsio/mdsio_read_field.F |
87 |
MDS_READ_FIELD |
INTEGER irecord |
|
./pkg/mdsio/mdsio_read_section.F |
100 |
MDS_READ_SEC_XZ |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_read_section.F |
102 |
MDS_READ_SEC_XZ |
& ' MDS_READ_SEC_XZ: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_read_section.F |
212 |
MDS_READ_SEC_XZ |
& + ( k-1 + (irecord-1)*kSize )*exch2_xStack_Nx |
|
./pkg/mdsio/mdsio_read_section.F |
218 |
MDS_READ_SEC_XZ |
& + nSx*nPx*kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_read_section.F |
223 |
MDS_READ_SEC_XZ |
irec=k + kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_read_section.F |
23 |
MDS_READ_SEC_XZ |
I irecord, |
|
./pkg/mdsio/mdsio_read_section.F |
300 |
MDS_READ_SEC_YZ |
I irecord, |
|
./pkg/mdsio/mdsio_read_section.F |
348 |
MDS_READ_SEC_YZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_read_section.F |
378 |
MDS_READ_SEC_YZ |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_read_section.F |
380 |
MDS_READ_SEC_YZ |
& ' MDS_READ_SEC_YZ: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_read_section.F |
490 |
MDS_READ_SEC_YZ |
& + ( k-1 + (irecord-1)*kSize )*exch2_yStack_Ny |
|
./pkg/mdsio/mdsio_read_section.F |
496 |
MDS_READ_SEC_YZ |
& + nSy*nPy*kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_read_section.F |
501 |
MDS_READ_SEC_YZ |
irec=k + kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_read_section.F |
71 |
MDS_READ_SEC_XZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_field.F |
120 |
MDSREADFIELD_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_field.F |
132 |
MDSREADFIELD_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
137 |
MDSREADFIELD_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
156 |
MDSWRITEFIELD |
I irecord, |
|
./pkg/mdsio/mdsio_rw_field.F |
191 |
MDSWRITEFIELD |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_field.F |
204 |
MDSWRITEFIELD |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
209 |
MDSWRITEFIELD |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
228 |
MDSWRITEFIELD_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_field.F |
23 |
MDSREADFIELD |
I irecord, |
|
./pkg/mdsio/mdsio_rw_field.F |
263 |
MDSWRITEFIELD_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_field.F |
276 |
MDSWRITEFIELD_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
281 |
MDSWRITEFIELD_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
54 |
MDSREADFIELD |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_field.F |
66 |
MDSREADFIELD |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
71 |
MDSREADFIELD |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
89 |
MDSREADFIELD_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
122 |
MDSREADFIELDYZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
134 |
MDSREADFIELDYZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
139 |
MDSREADFIELDYZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
157 |
MDSREADFIELDXZ_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
187 |
MDSREADFIELDXZ_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
199 |
MDSREADFIELDXZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
204 |
MDSREADFIELDXZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
222 |
MDSREADFIELDYZ_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
252 |
MDSREADFIELDYZ_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
264 |
MDSREADFIELDYZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
269 |
MDSREADFIELDYZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
27 |
MDSREADFIELDXZ |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
288 |
MDSWRITEFIELDXZ |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
322 |
MDSWRITEFIELDXZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
335 |
MDSWRITEFIELDXZ |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
340 |
MDSWRITEFIELDXZ |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
359 |
MDSWRITEFIELDYZ |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
393 |
MDSWRITEFIELDYZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
406 |
MDSWRITEFIELDYZ |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
411 |
MDSWRITEFIELDYZ |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
430 |
MDSWRITEFIELDXZ_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
464 |
MDSWRITEFIELDXZ_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
477 |
MDSWRITEFIELDXZ_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
482 |
MDSWRITEFIELDXZ_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
501 |
MDSWRITEFIELDYZ_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_rw_slice.F |
535 |
MDSWRITEFIELDYZ_LOC |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
548 |
MDSWRITEFIELDYZ_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
553 |
MDSWRITEFIELDYZ_LOC |
I irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
57 |
MDSREADFIELDXZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_rw_slice.F |
69 |
MDSREADFIELDXZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
74 |
MDSREADFIELDXZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
92 |
MDSREADFIELDYZ |
I irecord, |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
142 |
MDS_WR_METAFILES |
I nTimRec, timList, misVal, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
20 |
MDS_WR_METAFILES |
I irecord, |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
211 |
MDS_WR_METAFILES |
I nTimRec, timList, misVal, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
85 |
MDS_WR_METAFILES |
INTEGER irecord |
|
./pkg/mdsio/mdsio_write_field.F |
126 |
MDS_WRITE_FIELD |
INTEGER irecord |
|
./pkg/mdsio/mdsio_write_field.F |
166 |
MDS_WRITE_FIELD |
irecord = ABS(jrecord) |
|
./pkg/mdsio/mdsio_write_field.F |
192 |
MDS_WRITE_FIELD |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
198 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_write_field.F |
278 |
MDS_WRITE_FIELD |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
345 |
MDS_WRITE_FIELD |
irec = 1 + k-kLo + (irecord-1)*nNz |
|
./pkg/mdsio/mdsio_write_field.F |
430 |
MDS_WRITE_FIELD |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
481 |
MDS_WRITE_FIELD |
& +( k-kLo + (irecord-1)*nNz )*global_nTx*ySize |
|
./pkg/mdsio/mdsio_write_field.F |
502 |
MDS_WRITE_FIELD |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
511 |
MDS_WRITE_FIELD |
irec = irecord |
|
./pkg/mdsio/mdsio_write_field.F |
554 |
MDS_WRITE_FIELD |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
600 |
MDS_WRITE_FIELD |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
107 |
MDS_WRITE_SEC_XZ |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
109 |
MDS_WRITE_SEC_XZ |
& ' MDS_WRITE_SEC_XZ: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_write_section.F |
137 |
MDS_WRITE_SEC_XZ |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
159 |
MDS_WRITE_SEC_XZ |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
183 |
MDS_WRITE_SEC_XZ |
& + ( k-1 + (irecord-1)*kSize )*exch2_xStack_Nx |
|
./pkg/mdsio/mdsio_write_section.F |
189 |
MDS_WRITE_SEC_XZ |
& + nSx*nPx*kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_write_section.F |
194 |
MDS_WRITE_SEC_XZ |
irec=k + kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_write_section.F |
24 |
MDS_WRITE_SEC_XZ |
I irecord, |
|
./pkg/mdsio/mdsio_write_section.F |
278 |
MDS_WRITE_SEC_YZ |
I irecord, |
|
./pkg/mdsio/mdsio_write_section.F |
333 |
MDS_WRITE_SEC_YZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_write_section.F |
360 |
MDS_WRITE_SEC_YZ |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
362 |
MDS_WRITE_SEC_YZ |
& ' MDS_WRITE_SEC_YZ: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_write_section.F |
390 |
MDS_WRITE_SEC_YZ |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
412 |
MDS_WRITE_SEC_YZ |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_write_section.F |
436 |
MDS_WRITE_SEC_YZ |
& + ( k-1 + (irecord-1)*kSize )*exch2_yStack_Ny |
|
./pkg/mdsio/mdsio_write_section.F |
442 |
MDS_WRITE_SEC_YZ |
& + nSy*nPy*kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_write_section.F |
447 |
MDS_WRITE_SEC_YZ |
irec=k + kSize*(irecord-1) |
|
./pkg/mdsio/mdsio_write_section.F |
79 |
MDS_WRITE_SEC_XZ |
INTEGER irecord |
|
./pkg/mdsio/mdsio_writelocal.F |
179 |
MDS_WRITELOCAL |
IF (irecord .LT. 1) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
17 |
MDS_WRITELOCAL |
I irecord, |
|
./pkg/mdsio/mdsio_writelocal.F |
185 |
MDS_WRITELOCAL |
& ' MDS_WRITELOCAL: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_writelocal.F |
275 |
MDS_WRITELOCAL |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
335 |
MDS_WRITELOCAL |
& + ( k-1 + (irecord-1)*nNz )*global_nTx*ySize |
|
./pkg/mdsio/mdsio_writelocal.F |
356 |
MDS_WRITELOCAL |
IF (irecord .EQ. 1) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
365 |
MDS_WRITELOCAL |
irec = irecord |
|
./pkg/mdsio/mdsio_writelocal.F |
405 |
MDS_WRITELOCAL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
436 |
MDS_WRITELOCAL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
96 |
MDS_WRITELOCAL |
INTEGER irecord |
|
./pkg/mdsio/mdsio_writevec_loc.F |
104 |
MDS_WRITEVEC_LOC |
iRec = ABS(irecord) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
109 |
MDS_WRITEVEC_LOC |
& ' MDS_WRITEVEC_LOC: argument irecord = ',irecord |
|
./pkg/mdsio/mdsio_writevec_loc.F |
17 |
MDS_WRITEVEC_LOC |
I irecord, |
|
./pkg/mdsio/mdsio_writevec_loc.F |
214 |
MDS_WRITEVEC_LOC |
IF ( irecord.GT.0 ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
246 |
MDS_WRITEVEC_LOC |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
69 |
MDS_WRITEVEC_LOC |
INTEGER irecord |
|
./pkg/sbo/sbo_output.F |
102 |
SBO_OUTPUT |
I 0, 0, irecord, myIter, myThid ) |
|
./pkg/sbo/sbo_output.F |
50 |
SBO_OUTPUT |
INTEGER irecord |
|
./pkg/sbo/sbo_output.F |
87 |
SBO_OUTPUT |
irecord = myIter - nIter0 + 1 |