File |
Line number |
Procedure |
Code |
./pkg/mdsio/mdsio_read_tape.F |
159 |
MDS_READ_TAPE |
READ(dUnit,rec=iRec) gl_buffer_r8 |
./pkg/mdsio/mdsio_read_tape.F |
161 |
MDS_READ_TAPE |
CALL MDS_BYTESWAPR8( vec_size, gl_buffer_r8 ) |
./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 |
75 |
MDS_READ_TAPE |
_R8 gl_buffer_r8(nSize*nPx*nPy) |
./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 |
198 |
MDS_WRITE_TAPE |
CALL MDS_BYTESWAPR8( vec_size, gl_buffer_r8 ) |
./pkg/mdsio/mdsio_write_tape.F |
200 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=iRec) gl_buffer_r8 |
./pkg/mdsio/mdsio_write_tape.F |
81 |
MDS_WRITE_TAPE |
_R8 gl_buffer_r8(nSize*nPx*nPy) |