File |
Line number |
Procedure |
Code |
./pkg/mdsio/mdsio_read_tape.F |
13 |
MDS_READ_TAPE |
I nSize, |
./pkg/mdsio/mdsio_read_tape.F |
172 |
MDS_READ_TAPE |
CALL SCATTER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
./pkg/mdsio/mdsio_read_tape.F |
174 |
MDS_READ_TAPE |
CALL SCATTER_VEC_R8( gl_buffer_r8, local_r8, nSize, myThid ) |
./pkg/mdsio/mdsio_read_tape.F |
198 |
MDS_READ_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_read_tape.F |
218 |
MDS_READ_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_read_tape.F |
242 |
MDS_READ_TAPE |
CALL MDS_BYTESWAPR4( nSize, local_r4 ) |
./pkg/mdsio/mdsio_read_tape.F |
247 |
MDS_READ_TAPE |
CALL MDS_BYTESWAPR8( nSize, local_r8 ) |
./pkg/mdsio/mdsio_read_tape.F |
270 |
MDS_READ_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_read_tape.F |
274 |
MDS_READ_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_read_tape.F |
280 |
MDS_READ_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_read_tape.F |
284 |
MDS_READ_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_read_tape.F |
46 |
MDS_READ_TAPE |
INTEGER nSize |
./pkg/mdsio/mdsio_read_tape.F |
75 |
MDS_READ_TAPE |
_R8 gl_buffer_r8(nSize*nPx*nPy) |
./pkg/mdsio/mdsio_read_tape.F |
76 |
MDS_READ_TAPE |
_R4 gl_buffer_r4(nSize*nPx*nPy) |
./pkg/mdsio/mdsio_read_tape.F |
77 |
MDS_READ_TAPE |
_R8 local_r8 (nSize) |
./pkg/mdsio/mdsio_read_tape.F |
78 |
MDS_READ_TAPE |
_R4 local_r4 (nSize) |
./pkg/mdsio/mdsio_read_tape.F |
81 |
MDS_READ_TAPE |
vec_size = nSize*nPx*nPy |
./pkg/mdsio/mdsio_readvec_loc.F |
107 |
MDS_READVEC_LOC |
IF ( nSize.GT.buffSize ) THEN |
./pkg/mdsio/mdsio_readvec_loc.F |
112 |
MDS_READVEC_LOC |
& ' MDS_READVEC_LOC: dim of array to read=', nSize |
./pkg/mdsio/mdsio_readvec_loc.F |
14 |
MDS_READVEC_LOC |
I nSize, |
./pkg/mdsio/mdsio_readvec_loc.F |
181 |
MDS_READVEC_LOC |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_readvec_loc.F |
209 |
MDS_READVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
./pkg/mdsio/mdsio_readvec_loc.F |
212 |
MDS_READVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
./pkg/mdsio/mdsio_readvec_loc.F |
64 |
MDS_READVEC_LOC |
INTEGER nSize |
./pkg/mdsio/mdsio_write_tape.F |
102 |
MDS_WRITE_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_write_tape.F |
108 |
MDS_WRITE_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_write_tape.F |
112 |
MDS_WRITE_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_write_tape.F |
14 |
MDS_WRITE_TAPE |
I nSize, |
./pkg/mdsio/mdsio_write_tape.F |
167 |
MDS_WRITE_TAPE |
CALL GATHER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
169 |
MDS_WRITE_TAPE |
CALL GATHER_VEC_R8( gl_buffer_r8, local_r8, nSize, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
225 |
MDS_WRITE_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
240 |
MDS_WRITE_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
271 |
MDS_WRITE_TAPE |
CALL MDS_BYTESWAPR4( nSize, local_r4 ) |
./pkg/mdsio/mdsio_write_tape.F |
276 |
MDS_WRITE_TAPE |
CALL MDS_BYTESWAPR8( nSize, local_r8 ) |
./pkg/mdsio/mdsio_write_tape.F |
301 |
MDS_WRITE_TAPE |
dimList(1,1) = nPx*nPy*nSize |
./pkg/mdsio/mdsio_write_tape.F |
302 |
MDS_WRITE_TAPE |
dimList(2,1) = 1 + myProcId*nSize |
./pkg/mdsio/mdsio_write_tape.F |
303 |
MDS_WRITE_TAPE |
dimList(3,1) = (1+myProcId)*nSize |
./pkg/mdsio/mdsio_write_tape.F |
52 |
MDS_WRITE_TAPE |
INTEGER nSize |
./pkg/mdsio/mdsio_write_tape.F |
81 |
MDS_WRITE_TAPE |
_R8 gl_buffer_r8(nSize*nPx*nPy) |
./pkg/mdsio/mdsio_write_tape.F |
82 |
MDS_WRITE_TAPE |
_R4 gl_buffer_r4(nSize*nPx*nPy) |
./pkg/mdsio/mdsio_write_tape.F |
83 |
MDS_WRITE_TAPE |
_R8 local_r8 (nSize) |
./pkg/mdsio/mdsio_write_tape.F |
84 |
MDS_WRITE_TAPE |
_R4 local_r4 (nSize) |
./pkg/mdsio/mdsio_write_tape.F |
93 |
MDS_WRITE_TAPE |
vec_size = nSize*nPx*nPy |
./pkg/mdsio/mdsio_write_tape.F |
98 |
MDS_WRITE_TAPE |
DO j=1,nSize |
./pkg/mdsio/mdsio_writevec_loc.F |
119 |
MDS_WRITEVEC_LOC |
IF ( nSize.GT.buffSize ) THEN |
./pkg/mdsio/mdsio_writevec_loc.F |
124 |
MDS_WRITEVEC_LOC |
& ' MDS_WRITEVEC_LOC: dim of array to write=', nSize |
./pkg/mdsio/mdsio_writevec_loc.F |
14 |
MDS_WRITEVEC_LOC |
I nSize, |
./pkg/mdsio/mdsio_writevec_loc.F |
168 |
MDS_WRITEVEC_LOC |
length_of_rec=MDS_RECLEN( filePrec, nSize, myThid ) |
./pkg/mdsio/mdsio_writevec_loc.F |
190 |
MDS_WRITEVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
./pkg/mdsio/mdsio_writevec_loc.F |
193 |
MDS_WRITEVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
./pkg/mdsio/mdsio_writevec_loc.F |
238 |
MDS_WRITEVEC_LOC |
dimList(1,3)=nSize |
./pkg/mdsio/mdsio_writevec_loc.F |
240 |
MDS_WRITEVEC_LOC |
dimList(3,3)=nSize |
./pkg/mdsio/mdsio_writevec_loc.F |
242 |
MDS_WRITEVEC_LOC |
IF ( nSize.EQ.1 ) nDims=2 |
./pkg/mdsio/mdsio_writevec_loc.F |
65 |
MDS_WRITEVEC_LOC |
INTEGER nSize |